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

collect BMin BMax ExpLim Accuracy in "accuracy.h", kill `Acc'

This commit is contained in:
rlar 2010-10-15 19:24:52 +00:00
parent de10506199
commit 7f8ee8818e
5 changed files with 11 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ChangeLog
View File

@ -1,3 +1,10 @@
2010-10-15 Robert Larice
* src/include/ngspice.h ,
* src/main.c ,
* src/maths/misc/accuracy.c ,
* src/maths/misc/accuracy.h :
collect BMin BMax ExpLim Accuracy in "accuracy.h", kill `Acc'
2010-10-15 Robert Larice 2010-10-15 Robert Larice
* src/xspice/cmpp/pp_mod.c : * src/xspice/cmpp/pp_mod.c :
cmpp shall add a function prototype to the generated "cfunc.c" file cmpp shall add a function prototype to the generated "cfunc.c" file

12
src/include/ngspice.h
View File

@ -260,17 +260,5 @@ extern int tcl_fprintf(FILE *f, const char *format, ...);
#endif #endif
#ifdef CIDER
/* Definitions of globals for Machine Accuracy Limits
* Imported from cider
*/
extern double BMin; /* lower limit for B(x) */
extern double BMax; /* upper limit for B(x) */
extern double ExpLim; /* limit for exponential */
extern double Accuracy; /* accuracy of the machine */
extern double Acc, MuLim, MutLim;
#endif /* CIDER */
#endif /* NGSPICE_H_INCLUDED */ #endif /* NGSPICE_H_INCLUDED */

2
src/main.c
View File

@ -119,7 +119,7 @@ double BMin; /* lower limit for B(x) */
double BMax; /* upper limit for B(x) */ double BMax; /* upper limit for B(x) */
double ExpLim; /* limit for exponential */ double ExpLim; /* limit for exponential */
double Accuracy; /* accuracy of the machine */ double Accuracy; /* accuracy of the machine */
double Acc, MuLim, MutLim; double MuLim, MutLim;
#ifdef CIDER #ifdef CIDER
/* Global debug flags from CIDER, soon they will become /* Global debug flags from CIDER, soon they will become

6
src/maths/misc/accuracy.c
View File

@ -70,17 +70,13 @@ evalAccLimits(void)
double xhold, dif; /* Introduced to avoid numerical trap if double xhold, dif; /* Introduced to avoid numerical trap if
using non IEEE754 FPU */ using non IEEE754 FPU */
#ifndef CIDER
double Acc, BMin, BMax, ExpLim, MuLim, MutLim;
#endif
/* First we compute accuracy */ /* First we compute accuracy */
for( ; (acc + 1.0) > 1.0 ; ) { for( ; (acc + 1.0) > 1.0 ; ) {
acc *= 0.5; acc *= 0.5;
} }
acc *= 2.0; acc *= 2.0;
Acc = acc; Accuracy = acc;
/* /*
* This loop has been modified to include a variable to track * This loop has been modified to include a variable to track

2
src/maths/misc/accuracy.h
View File

@ -15,6 +15,8 @@ extern double BMin; /* lower limit for B(x) */
extern double BMax; /* upper limit for B(x) */ extern double BMax; /* upper limit for B(x) */
extern double ExpLim; /* limit for exponential */ extern double ExpLim; /* limit for exponential */
extern double Accuracy; /* accuracy of the machine */ extern double Accuracy; /* accuracy of the machine */
extern double MuLim, MutLim;
extern void evalAccLimits(void); extern void evalAccLimits(void);