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