Revision 1287 trunk/src/linad99/df13fun.cpp
df13fun.cpp (revision 1287)  

300  300 
* Description not yet available. 
301  301 
* \param 
302  302 
*/ 
303 
df1_three_variable operator  (const df1_three_variable& v)


304 
{


305 
df1_three_variable z;


303 
df1_three_variable operator(const df1_three_variable& v)


304 
{ 

305 
df1_three_variable z; 

306  306  
307 
*z.get_u() = *v.get_u();


308 
*z.get_u_x() = *v.get_u_x();


309 
*z.get_u_y() = *v.get_u_y();


310 
*z.get_u_z() = *v.get_u_z();


307 
*z.get_u() = (*v.get_u());


308 
*z.get_u_x() = (*v.get_u_x());


309 
*z.get_u_y() = (*v.get_u_y());


310 
*z.get_u_z() = (*v.get_u_z());


311  311  
312 
return z;


313 
}


312 
return z; 

313 
} 

314  314  
315  315 
/** 
316  316 
* Description not yet available. 
...  ...  
478  478 
df1_three_variable z; 
479  479 
double u=::sqrt(*x.get_u()); 
480  480 
*z.get_u()=u; 
481 
double xinv=1.0/(*x.get_u()); 

481 
//double xinv=1.0/(*x.get_u());


482  482 
double zp=0.5/u; 
483  483  
484  
485  484 
set_derivatives(z,x,u,zp); 
486  485  
487  486 
return z; 
...  ...  
496  495 
df1_three_variable z; 
497  496 
double cx=value(x); 
498  497 
double d=1.0/(1+square(cx)); 
499 
double d2=square(d); 

498 
//double d2=square(d);


500  499 
double u=::atan(cx); 
501  500 
*z.get_u()=u; 
502  501 
double zp=d; 
...  ...  
530  529 
double u=::tan(*x.get_u()); 
531  530 
*z.get_u()=u; 
532  531 
double v=1.0/::cos(*x.get_u()); 
533 
double w=::sin(*x.get_u()); 

532 
//double w=::sin(*x.get_u());


534  533 
double v2=v*v; 
535  534 
double zp=v2; 
536  535 
Also available in: Unified diff