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

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

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

revision 1.3 by jmc, Tue Nov 23 20:13:31 2010 UTC revision 1.6 by jmc, Tue May 24 20:25:33 2011 UTC
# Line 32  c#endif Line 32  c#endif
32  #ifdef ALLOW_EXF  #ifdef ALLOW_EXF
33  # include "EXF_PARAM.h"  # include "EXF_PARAM.h"
34  #endif  #endif
35    #ifdef ALLOW_OBCS
36    # include "OBCS_PARAMS.h"
37    #endif
38    
39  C     !INPUT/OUTPUT PARAMETERS:  C     !INPUT/OUTPUT PARAMETERS:
40  C     seqFlag :: flag that indicates where this S/R is called from:  C     seqFlag :: flag that indicates where this S/R is called from:
# Line 54  C--   Set output freq. to zero to avoid Line 57  C--   Set output freq. to zero to avoid
57  C     averaged fields in reverse checkpointing loops  C     averaged fields in reverse checkpointing loops
58        monitorFreq  = 0.        monitorFreq  = 0.
59        dumpFreq     = 0.        dumpFreq     = 0.
60          diagFreq     = 0.
61        taveFreq     = 0.        taveFreq     = 0.
62        chkPtFreq    = 0.        chkPtFreq    = 0.
63        pChkPtFreq   = 0.        pChkPtFreq   = 0.
64        dumpInitAndLast = .FALSE.        dumpInitAndLast = .FALSE.
65        writePickupAtEnd= .FALSE.        writePickupAtEnd= .FALSE.
66          printDomain  = .FALSE.
67    
68  #ifdef ALLOW_MNC  #ifdef ALLOW_MNC
69  C--   Not the best solution to fix some MNC output, since it is likely  C--   Not the best solution to fix some MNC output, since it is likely
# Line 74  C-    should call a S/R EXF_TURNOFF_IO ( Line 79  C-    should call a S/R EXF_TURNOFF_IO (
79        IF ( useEXF ) exf_monFreq = 0.        IF ( useEXF ) exf_monFreq = 0.
80  #endif  #endif
81    
82    #ifdef ALLOW_OBCS
83    C-    should call a S/R OBCS_TURNOFF_IO (like SEAICE) to reset this flag
84          IF ( useOBCS ) OBCS_monitorFreq = 0.
85    #endif
86    
87  C--   Disable SBO output  C--   Disable SBO output
88        useSBO       = .FALSE.        useSBO       = .FALSE.
89    
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22