/[MITgcm]/MITgcm/pkg/exf/exf_ad_dump.F
ViewVC logotype

Diff of /MITgcm/pkg/exf/exf_ad_dump.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.5 by gforget, Tue Aug 28 19:17:45 2012 UTC revision 1.6 by jmc, Wed Aug 29 02:14:13 2012 UTC
# Line 75  CEOP Line 75  CEOP
75    
76  C--     Set suffix for this set of data files.  C--     Set suffix for this set of data files.
77          WRITE(suff,'(I10.10)') myIter          WRITE(suff,'(I10.10)') myIter
78          writeBinaryPrec = writeStatePrec  C ==>> Resetting run-time parameter writeBinaryPrec in the middle of a run
79    C ==>>  is very very very nasty !!!
80    c       writeBinaryPrec = writeStatePrec
81    C <<==  If you really want to mess-up with this at your own risk,
82    C <<==  uncomment the line above
83    
84          CALL WRITE_REC_3D_RL(          CALL WRITE_REC_3D_RL(
85       &       'ADJhflux.'//suff, writeBinaryPrec, 1,       &       'ADJhflux.'//suff, writeBinaryPrec, 1,
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22