| File |
Line number |
Procedure |
Code |
|
./pkg/autodiff/AUTODIFF.h |
6 |
NO PROCEDURE |
& tapeFileCounter, tapeMaxCounter, tapeFileUnit, tapeFileUnitS |
|
./pkg/autodiff/AUTODIFF.h |
7 |
NO PROCEDURE |
integer tapeFileCounter, tapeMaxCounter |
|
./pkg/autodiff/adautodiff_whtapeio_sync.F |
30 |
ADAUTODIFF_WHTAPEIO_SYNC |
tapeFileCounter=0 |
|
./pkg/autodiff/adread_adwrite.F |
191 |
ADREAD |
tapeFileCounter=tapeFileCounter+1 |
|
./pkg/autodiff/adread_adwrite.F |
192 |
ADREAD |
jrec=tapeFileCounter+tapeMaxCounter*(irec-1) |
|
./pkg/autodiff/adread_adwrite.F |
193 |
ADREAD |
if (tapeFileCounter.GT.tapeMaxCounter) stop |
|
./pkg/autodiff/adread_adwrite.F |
390 |
ADWRITE |
tapeFileCounter=tapeFileCounter+1 |
|
./pkg/autodiff/adread_adwrite.F |
391 |
ADWRITE |
jrec=tapeFileCounter+tapeMaxCounter*(irec-1) |
|
./pkg/autodiff/adread_adwrite.F |
392 |
ADWRITE |
if (tapeFileCounter.GT.tapeMaxCounter) then |
|
./pkg/autodiff/adread_adwrite.F |
395 |
ADWRITE |
& tapeFileCounter, tapeMaxCounter |
|
./pkg/autodiff/autodiff_ini_model_io.F |
98 |
AUTODIFF_INI_MODEL_IO |
tapeFileCounter=0 |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
102 |
AUTODIFF_WHTAPEIO_SYNC |
tapeFileCounter=0 |