| [4d61ad0] | 1 | #ifndef DEBUGAD_INCLUDED
|
|---|
| 2 | #define DEBUGAD_INCLUDED
|
|---|
| 3 |
|
|---|
| 4 | void debug_tgt_init(double epsilon, double ezero, double errmax, double seed) ;
|
|---|
| 5 | void debug_tgt_call(char *unitname, int traced, int forcetraced) ;
|
|---|
| 6 | void debug_tgt_exit() ;
|
|---|
| 7 | int debug_tgt_here(char* placename, int forcetraced) ;
|
|---|
| 8 |
|
|---|
| 9 | void debug_tgt_initreal8(char* varname, double *indep, double *indepd) ;
|
|---|
| 10 | void debug_tgt_initreal8array(char* varname, double *indep, double *indepd, int length) ;
|
|---|
| 11 | void debug_tgt_concludereal8(char *varname, double dep, double depd) ;
|
|---|
| 12 | void debug_tgt_concludereal8array(char *varname, double *tvar, double *tvard, int length) ;
|
|---|
| 13 | void debug_tgt_conclude() ;
|
|---|
| 14 | void debug_tgt_real8(char *varname, double var, double vard) ;
|
|---|
| 15 | void debug_tgt_real8array(char *varname, double *var, double *vard, int length) ;
|
|---|
| 16 | void debug_tgt_display(char *placename) ;
|
|---|
| 17 |
|
|---|
| 18 | void debug_bwd_init(double ezero, double errmax, double seed) ;
|
|---|
| 19 | void debug_bwd_call(char *funcname, int deltadepth) ;
|
|---|
| 20 | void debug_bwd_exit() ;
|
|---|
| 21 | int debug_bwd_here(char* placename) ;
|
|---|
| 22 |
|
|---|
| 23 | void debug_fwd_init(double ezero, double errmax, double seed) ;
|
|---|
| 24 | void debug_fwd_call(char *funcname) ;
|
|---|
| 25 | void debug_fwd_exit() ;
|
|---|
| 26 | int debug_fwd_here(char* placename) ;
|
|---|
| 27 |
|
|---|
| 28 | void debug_adj_rwreal8(double *vard) ;
|
|---|
| 29 | void debug_adj_rreal8(double *vard) ;
|
|---|
| 30 | void debug_adj_wreal8(double *vard) ;
|
|---|
| 31 | void debug_adj_rwreal8array(double *vard, int length) ;
|
|---|
| 32 | void debug_adj_rreal8array(double *vard, int length) ;
|
|---|
| 33 | void debug_adj_wreal8array(double *vard, int length) ;
|
|---|
| 34 | void debug_adj_rwdisplay(char *placename, int indent) ;
|
|---|
| 35 | void debug_adj_rdisplay(char *placename, int indent) ;
|
|---|
| 36 | void debug_adj_wdisplay(char *placename, int indent) ;
|
|---|
| 37 | void debug_adj_skip(char *placename) ;
|
|---|
| 38 | void debug_adj_conclude() ;
|
|---|
| 39 |
|
|---|
| 40 | #endif
|
|---|