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
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