| 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/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 |
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 |
99 |
AUTODIFF_INI_MODEL_IO |
tapeMaxCounter=nWh |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
118 |
AUTODIFF_WHTAPEIO_SYNC |
iWh=tapeMaxCounter*MAX(nchklev_2,nchklev_3)/nWh+1 |