| [4d61ad0] | 1 | INTEGER dbad_mode, dbad_phase, dbad_file, dbad_nberrors
|
|---|
| 2 | REAL*8 dbad_epszero, dbad_errormax, dbad_ddeps
|
|---|
| 3 | REAL*8 dbad_coeff, dbad_seed, dbad_sum
|
|---|
| 4 | REAL*8 dbad_refsum, dbad_nextrefsum
|
|---|
| 5 | INTEGER dbad_callsz, dbad_callindex
|
|---|
| 6 | PARAMETER (dbad_callsz=99)
|
|---|
| 7 | CHARACTER*40 dbad_callnames(dbad_callsz)
|
|---|
| 8 | INTEGER dbad_callcodes(dbad_callsz)
|
|---|
| 9 | LOGICAL dbad_calltraced(dbad_callsz)
|
|---|
| 10 | COMMON /DEBUG_AD_CONTROL/ dbad_mode, dbad_phase,dbad_file,
|
|---|
| 11 | + dbad_nberrors, dbad_epszero, dbad_errormax, dbad_ddeps,
|
|---|
| 12 | + dbad_coeff, dbad_seed, dbad_sum, dbad_refsum, dbad_nextrefsum,
|
|---|
| 13 | + dbad_callindex, dbad_callcodes, dbad_calltraced, dbad_callnames
|
|---|
