/[MITgcm]/MITgcm/model/src/config_summary.F
ViewVC logotype

Diff of /MITgcm/model/src/config_summary.F

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

revision 1.42 by jmc, Fri Aug 1 01:45:45 2003 UTC revision 1.43 by jmc, Wed Oct 15 22:55:51 2003 UTC
# Line 329  CEOP Line 329  CEOP
329       &'   /* Rolling restart/checkpoint file interval ( s ). */')       &'   /* Rolling restart/checkpoint file interval ( s ). */')
330        CALL WRITE_0D_R8( dumpFreq, INDEX_NONE,'dumpFreq =',        CALL WRITE_0D_R8( dumpFreq, INDEX_NONE,'dumpFreq =',
331       &'   /* Model state write out interval ( s ). */')       &'   /* Model state write out interval ( s ). */')
332          CALL WRITE_0D_R8( externForcingPeriod, INDEX_NONE,
333         &   'externForcingPeriod =', '   /* forcing period (s) */')
334          CALL WRITE_0D_R8( externForcingCycle, INDEX_NONE,
335         &   'externForcingCycle =', '   /* period of the cyle (s). */')
336          CALL WRITE_0D_R8( tauThetaClimRelax, INDEX_NONE,
337         &   'tauThetaClimRelax =', '   /* relaxation time scale (s) */')
338          CALL WRITE_0D_R8( tauSaltClimRelax, INDEX_NONE,
339         &   'tauSaltClimRelax =',  '   /* relaxation time scale (s) */')
340          CALL WRITE_0D_R8( latBandClimRelax, INDEX_NONE,
341         &   'latBandClimRelax =', '   /* max. Lat. where relaxation */')
342        WRITE(msgBuf,'(A)') '//  '        WRITE(msgBuf,'(A)') '//  '
343        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
344       &                    SQUEEZE_RIGHT , 1)       &                    SQUEEZE_RIGHT , 1)

Legend:
Removed from v.1.42  
changed lines
  Added in v.1.43

  ViewVC Help
Powered by ViewVC 1.1.22