unification for func and derivative
This commit is contained in:
parent
00cf9ec22a
commit
b5ce155b97
|
|
@ -3,7 +3,10 @@
|
|||
<!--
|
||||
$Id$
|
||||
$Log$
|
||||
Revision 1.10 2006-03-07 10:12:12 r29173
|
||||
Revision 1.11 2007-02-10 16:08:41 dwarning
|
||||
unification for func and derivative
|
||||
|
||||
Revision 1.10 2006/03/07 10:12:12 r29173
|
||||
replaced '<' by xml special sequence '<'
|
||||
|
||||
Revision 1.9 2006/03/06 16:36:55 dwarning
|
||||
|
|
@ -202,7 +205,7 @@ if(isinf(var)) \\
|
|||
#define _pow(xy,x,y) xy = pow(x,y);
|
||||
#define _dx_pow(dx,xy,x,y) dx = (x==0.0)?0.0:((y/x)*xy);
|
||||
#define _dy_pow(dy,xy,x,y) dy = (x==0.0)?0.0:((log(x)/exp(0.0))*xy);
|
||||
#define _limexp(val,arg) val = ((arg)<(50)) ? (exp(arg)) : (exp(50)*(1.0+(arg-50)));
|
||||
#define _limexp(val,arg) val = ((arg)<(80)) ? (exp(arg)) : (exp(80)*(1.0+(arg-80)));
|
||||
#define _d_limexp(val,dval,arg) val = ((arg)<(80)) ? (exp(arg)) : (exp(80)*(1.0+(arg-80))); dval = val;
|
||||
#define _fabs(val,arg) val = fabs(arg);
|
||||
#define _d_fabs(val,dval,arg) val = fabs(arg); dval = (((val)>=0)?(+1.0):(-1.0));
|
||||
|
|
|
|||
Loading…
Reference in New Issue