[MITgcm-cvs] MITgcm/pkg/autodiff CVS Commit
Gael Forget
gforget at baudelaire.csail.mit.edu
Thu Jan 20 20:19:03 EST 2011
Update of /u/gcmpack/MITgcm/pkg/autodiff
In directory baudelaire:/u/u2/gforget/MITgcm/pkg/autodiff
Modified Files:
AUTODIFF.h adread_adwrite.F autodiff_ini_model_io.F
Added Files:
adautodiff_whtapeio_sync.F autodiff_whtapeio_sync.F
autodiff_whtapeio_sync.flow
Log Message:
- within WHTAPEIO, if tapeConcatIO then concatenate
all lev2 tapes to one file, and lev3/lev4 accordingly.
Those files (e.g tapes2.data) stay open all the way.
- to do this I add WHTAPEIO parameters in AUTODIFF.h, and
introduce S/R autodiff_whtapeio_sync.F
- WHTAPEIO params are intialized in autodiff_ini_model_io.F
- autodiff_whtapeio_sync is called before autodiff_store and
after autodiff_restore in the_main_loop.F
- autodiff_whtapeio_sync.F first open tape files if needed,
and then it sets/resets the associated units/counters.
- adread_adwrite.F now passes tapeFileUnit and tapeSingleCpuIO to
mdsio_read(write)_whalos.F, and it includes the loop over 2D slices.
More information about the MITgcm-cvs
mailing list