| 1 | #ifndef CONTEXTAD_INCLUDED
|
|---|
| 2 | #define CONTEXTAD_INCLUDED
|
|---|
| 3 |
|
|---|
| 4 | static int dbad_mode, dbad_phase ;
|
|---|
| 5 | static double dbad_ddeps = 1.e-6 ;
|
|---|
| 6 | static double dbad_seed = 0.137 ;
|
|---|
| 7 | static double dbad_currentSeed = 0.0 ;
|
|---|
| 8 | static double dbad_condensed_val, dbad_condensed_tgt, dbad_condensed_adj ;
|
|---|
| 9 |
|
|---|
| 10 | void context_tgt_init(double epsilon, double seed) ;
|
|---|
| 11 | void context_tgt_initreal8(char* varname, double *indep, double *indepd) ;
|
|---|
| 12 | void context_tgt_initreal8array(char* varname, double *indep, double *indepd, int length) ;
|
|---|
| 13 | void context_tgt_concludestart() ;
|
|---|
| 14 | void context_tgt_concludereal8(char* varname, double dep, double depd) ;
|
|---|
| 15 | void context_tgt_concludereal8array(char* varname, double *dep, double *depd, int length) ;
|
|---|
| 16 | void context_tgt_conclude() ;
|
|---|
| 17 | void context_adj_init(double seed) ;
|
|---|
| 18 | void context_adj_initreal8(char* varname, double *dep, double *depb) ;
|
|---|
| 19 | void context_adj_initreal8array(char* varname, double *dep, double *depb, int length) ;
|
|---|
| 20 | void context_adj_concludestart() ;
|
|---|
| 21 | void context_adj_concludereal8(char* varname, double dep, double depb) ;
|
|---|
| 22 | void context_adj_concludereal8array(char* varname, double *dep, double *depb, int length) ;
|
|---|
| 23 | void context_adj_conclude() ;
|
|---|
| 24 |
|
|---|
| 25 | #endif
|
|---|
