luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Macros for exp() limiting added.

This commit is contained in:
dwarning 2006-03-06 16:36:55 +00:00
parent 3bc2a371a6
commit f034cc153f
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/spicelib/devices/adms/admst/ngspiceMODULEdefs.h.xml
View File

@ -3,7 +3,10 @@
<!--
$Id$
$Log$
Revision 1.8 2006-03-06 12:50:52 r29173
Revision 1.9 2006-03-06 16:36:55 dwarning
Macros for exp() limiting added.
Revision 1.8 2006/03/06 12:50:52 r29173
added support to 'analog functions'
Revision 1.7 2006/03/05 09:38:41 pnenzi
@ -196,8 +199,8 @@ 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) _exp(val,arg)
#define _d_limexp(val,dval,arg) _d_exp(val,dval,arg)
#define _limexp(val,arg) val = ((arg)<(50)) ? (exp(arg)) : (exp(50)*(1.0+(arg-50)));
#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)&gt;=0)?(+1.0):(-1.0));
#define _abs(val) ((val)&lt;(0) ? (-(val)):(val))