Back to home page

MITgcm

 
 

    


File indexing completed on 2021-06-17 05:11:24 UTC

view on githubraw file Latest commit 7c50f079 on 2021-06-16 15:05:49 UTC
2f58e54336 Gael*0001 #ifdef ALLOW_AUTODIFF_WHTAPEIO
                0002       COMMON /AUTODIFF_WHTAPEIO_I/
                0003      &  tapeFileCounter, tapeMaxCounter, tapeFileUnit, tapeFileUnitS
f255f6c083 Jean*0004       INTEGER tapeFileCounter, tapeMaxCounter
                0005       INTEGER tapeFileUnit, tapeFileUnitS(4)
                0006       COMMON /AUTODIFF_WHTAPEIO_L/
2f58e54336 Gael*0007      &  tapeConcatIO, tapeSingleCpuIO, tapeBufferIO
395a4223f4 Jean*0008       LOGICAL tapeConcatIO, tapeSingleCpuIO, tapeBufferIO
2f58e54336 Gael*0009 #endif
                0010 
816e6857b6 Gael*0011 c ad dump record number (used only if dumpAdByRec is true)
f255f6c083 Jean*0012       INTEGER dumpAdRecMn
                0013       INTEGER dumpAdRecDy
                0014       INTEGER dumpAdRecSi
                0015       INTEGER dumpAdRecEt
                0016       COMMON /AUTODIFF_DUMP_AD_REC/
52dd931a85 Timo*0017      &       dumpAdRecMn, dumpAdRecDy, dumpAdRecSi,
                0018      &       dumpAdRecEt