| File |
Line number |
Procedure |
Code |
|
./pkg/autodiff/adautodiff_whtapeio_sync.F |
25 |
ADAUTODIFF_WHTAPEIO_SYNC |
integer myLev |
|
./pkg/autodiff/adautodiff_whtapeio_sync.F |
7 |
ADAUTODIFF_WHTAPEIO_SYNC |
subroutine ADAUTODIFF_WHTAPEIO_SYNC( myLev, myStep, myThid ) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
55 |
AUTODIFF_INI_MODEL_IO |
INTEGER iL, pIL, myLev |
|
./pkg/autodiff/autodiff_ini_model_io.F |
94 |
AUTODIFF_INI_MODEL_IO |
do myLev=1,4 |
|
./pkg/autodiff/autodiff_ini_model_io.F |
95 |
AUTODIFF_INI_MODEL_IO |
tapeFileUnitS(myLev)=0 |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
101 |
AUTODIFF_WHTAPEIO_SYNC |
tapeFileUnit=tapeFileUnitS(myLev) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
105 |
AUTODIFF_WHTAPEIO_SYNC |
& (myLev.GT.0).AND.(tapeFileUnit.EQ.0) ) THEN |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
10 |
AUTODIFF_WHTAPEIO_SYNC |
subroutine AUTODIFF_WHTAPEIO_SYNC( myLev, myStep, myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
114 |
AUTODIFF_WHTAPEIO_SYNC |
tapeFileUnitS(myLev)=tapeFileUnit |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
120 |
AUTODIFF_WHTAPEIO_SYNC |
& myLev,' rec ',iWh |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
149 |
AUTODIFF_WHTAPEIO_SYNC |
& myLev,' rec ',iWh |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
32 |
AUTODIFF_WHTAPEIO_SYNC |
integer myLev |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
89 |
AUTODIFF_WHTAPEIO_SYNC |
& adTapeDir(1:IL),'tapes',myLev,'.',myProcId,'.data' |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
93 |
AUTODIFF_WHTAPEIO_SYNC |
& adTapeDir(1:IL),'tapes',myLev,'.data' |