| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_ad_dump.F |
73 |
EXF_AD_DUMP |
& DIFFERENT_MULTIPLE(adjDumpFreq,myTime,deltaTClock) |
|
./pkg/exf/exf_adjoint_snapshots__g.F |
66 |
G_EXF_ADJOINT_SNAPSHOTS |
& DIFFERENT_MULTIPLE(adjDumpFreq,myTime,deltaTClock) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
79 |
ADEXF_ADJOINT_SNAPSHOTS |
& DIFFERENT_MULTIPLE(adjDumpFreq,myTime,deltaTClock) |
|
./pkg/exf/exf_getffieldrec.F |
227 |
EXF_GETFFIELDREC |
I deltaTClock, locTime, myThid ) |
|
./pkg/exf/exf_monitor.F |
64 |
EXF_MONITOR |
IF ( DIFFERENT_MULTIPLE(exf_monFreq,myTime,deltaTClock) |
|
./pkg/exf/exf_monitor_ad.F |
62 |
ADEXF_MONITOR |
IF ( DIFFERENT_MULTIPLE(adjmonitorFreq,myTime,deltaTClock) ) THEN |
|
./model/inc/PARAMS.h |
800 |
NO PROCEDURE |
& deltaT, deltaTMom, dTtracerLev, deltaTFreeSurf, deltaTClock, |
|
./model/inc/PARAMS.h |
857 |
NO PROCEDURE |
_RL deltaTClock |
|
./pkg/fizhi/fizhi_init_fixed.F |
83 |
FIZHI_INIT_FIXED |
call FIZHI_ALARMS(nymdb,nhmsb,deltaTClock) |
|
./pkg/fizhi/fizhi_write_state.F |
52 |
FIZHI_WRITE_STATE |
& DIFFERENT_MULTIPLE(dumpFreq,myTime,deltaTClock) |
|
./pkg/flt/flt_main.F |
139 |
FLT_MAIN |
IF ( DIFFERENT_MULTIPLE( flt_int_prof, myTime, deltaTClock ) |
|
./pkg/flt/flt_main.F |
160 |
FLT_MAIN |
IF ( DIFFERENT_MULTIPLE( flt_int_traj, myTime, deltaTClock ) |
|
./pkg/flt/flt_readparms.F |
51 |
FLT_READPARMS |
flt_deltaT = deltaTClock |
|
./pkg/ggl90/ggl90_output.F |
124 |
GGL90_OUTPUT |
DDTT = deltaTClock |
|
./pkg/ggl90/ggl90_output.F |
143 |
GGL90_OUTPUT |
& DIFFERENT_MULTIPLE(GGL90taveFreq,myTime,deltaTClock) |
|
./pkg/ggl90/ggl90_output.F |
79 |
GGL90_OUTPUT |
& DIFFERENT_MULTIPLE(GGL90dumpFreq,myTime,deltaTClock) |
|
./pkg/gmredi/gmredi_k3d.F |
218 |
GMREDI_K3D |
IF ( DIFFERENT_MULTIPLE(GM_K3D_vecFreq,myTime,deltaTClock) ) |
|
./pkg/gmredi/gmredi_output.F |
112 |
GMREDI_OUTPUT |
IF ( DIFFERENT_MULTIPLE( taveFreq, myTime, deltaTClock ) |
|
./pkg/gmredi/gmredi_output.F |
61 |
GMREDI_OUTPUT |
IF ( DIFFERENT_MULTIPLE(diagFreq,myTime,deltaTClock) |
|
./pkg/kl10/kl10_output.F |
119 |
KL10_OUTPUT |
DDTT=deltaTClock |
|
./pkg/kl10/kl10_output.F |
134 |
KL10_OUTPUT |
& DIFFERENT_MULTIPLE( KLtaveFreq, myTime, deltaTClock ) |
|
./pkg/kl10/kl10_output.F |
82 |
KL10_OUTPUT |
& DIFFERENT_MULTIPLE( KLdumpFreq, myTime, deltaTClock ) |
|
./pkg/kpp/kpp_calc.F |
238 |
KPP_CALC |
IF ( DIFFERENT_MULTIPLE(kpp_freq,myTime,deltaTClock) |
|
./pkg/kpp/kpp_output.F |
127 |
KPP_OUTPUT |
& DIFFERENT_MULTIPLE(kpp_dumpFreq,myTime,deltaTClock) |
|
./pkg/kpp/kpp_output.F |
222 |
KPP_OUTPUT |
DDTT = deltaTClock |
|
./pkg/kpp/kpp_output.F |
261 |
KPP_OUTPUT |
& DIFFERENT_MULTIPLE(KPP_taveFreq,myTime,deltaTClock) |
|
./pkg/kpp/kpp_output.F |
264 |
KPP_OUTPUT |
CALL CAL_TIME2DUMP( zeroRL, KPP_taveFreq, deltaTClock, |
|
./pkg/kpp/kpp_readparms.F |
82 |
KPP_READPARMS |
kpp_freq = deltaTClock |
|
./pkg/land/land_monitor.F |
81 |
LAND_MONITOR |
IF ( DIFFERENT_MULTIPLE(land_monFreq,myTime,deltaTClock) |
|
./pkg/layers/layers_calc.F |
228 |
LAYERS_CALC |
IF ( DIFFERENT_MULTIPLE(layers_diagFreq,myTime,deltaTClock) |
|
./pkg/layers/layers_calc.F |
407 |
LAYERS_CALC |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
410 |
LAYERS_CALC |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
415 |
LAYERS_CALC |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
418 |
LAYERS_CALC |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
425 |
LAYERS_CALC |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
428 |
LAYERS_CALC |
layers_TimeAve(bi,bj)=layers_TimeAve(bi,bj)+deltaTClock |
|
./pkg/layers/layers_output.F |
86 |
LAYERS_OUTPUT |
& DIFFERENT_MULTIPLE(layers_taveFreq,myTime,deltaTClock) |
|
./pkg/longstep/longstep_check_iters.F |
61 |
LONGSTEP_CHECK_ITERS |
endTime = baseTime + deltaTClock*DFLOAT(nEndIter) |
|
./pkg/matrix/matrix_write_tendency.F |
36 |
MATRIX_WRITE_TENDENCY |
IF ( DIFFERENT_MULTIPLE(expMatrixWriteTime,myTime,deltaTClock) |
|
./pkg/matrix/matrix_write_tendency.F |
95 |
MATRIX_WRITE_TENDENCY |
IF ( DIFFERENT_MULTIPLE(impMatrixWriteTime,myTime,deltaTClock) |
|
./pkg/mnc/mnc_update_time.F |
54 |
MNC_UPDATE_TIME |
IF (DIFFERENT_MULTIPLE(mnc_filefreq,myTime,deltaTClock)) |
|
./pkg/mom_vecinv/mom_vecinv.F |
164 |
MOM_VECINV |
writeDiag = DIFFERENT_MULTIPLE(diagFreq, myTime, deltaTClock) |
|
./pkg/mom_vecinv/mom_vecinv.F |
742 |
MOM_VECINV |
CALL TIMEAVE_CUMUL_1K1T(uZetatave,vCf,deltaTClock, |
|
./pkg/mom_vecinv/mom_vecinv.F |
744 |
MOM_VECINV |
CALL TIMEAVE_CUMUL_1K1T(vZetatave,uCf,deltaTClock, |
|
./pkg/monitor/monitor.F |
51 |
MONITOR |
IF ( DIFFERENT_MULTIPLE(monitorFreq,myTime,deltaTClock) ) THEN |
|
./pkg/monitor/monitor_ad.F |
66 |
ADMONITOR |
IF ( DIFFERENT_MULTIPLE(adjmonitorFreq,myTime,deltaTClock) ) THEN |
|
./pkg/monitor/monitor_g.F |
62 |
G_MONITOR |
IF ( DIFFERENT_MULTIPLE(adjmonitorFreq,myTime,deltaTClock) ) THEN |
|
./model/src/config_summary.F |
678 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( deltaTClock, INDEX_NONE,'deltaTClock =', |
|
./pkg/my82/my82_output.F |
149 |
MY82_OUTPUT |
DDTT = deltaTClock |
|
./pkg/my82/my82_output.F |
166 |
MY82_OUTPUT |
& DIFFERENT_MULTIPLE( MYtaveFreq, myTime, deltaTClock ) |
|
./pkg/my82/my82_output.F |
87 |
MY82_OUTPUT |
& DIFFERENT_MULTIPLE( MYdumpFreq, myTime, deltaTClock ) |
|
./model/src/convective_adjustment.F |
213 |
CONVECTIVE_ADJUSTMENT |
I Nr, deltaTClock, bi, bj, myThid) |
|
./model/src/convective_adjustment.F |
71 |
CONVECTIVE_ADJUSTMENT |
IF ( DIFFERENT_MULTIPLE(cAdjFreq,myTime,deltaTClock) |
|
./model/src/convective_adjustment_ini.F |
75 |
CONVECTIVE_ADJUSTMENT_INI |
IF ( DIFFERENT_MULTIPLE(cAdjFreq,myTime,deltaTClock) |
|
./pkg/obcs/obcs_monitor.F |
59 |
OBCS_MONITOR |
IF ( DIFFERENT_MULTIPLE( OBCS_monitorFreq,myTime,deltaTClock ) |
|
./pkg/obcs/obcs_output.F |
51 |
OBCS_OUTPUT |
IF ( DIFFERENT_MULTIPLE( dumpFreq, myTime, deltaTClock ) |
|
./pkg/obcs/obcs_output.F |
92 |
OBCS_OUTPUT |
IF ( DIFFERENT_MULTIPLE( diagFreq, myTime, deltaTClock ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
60 |
CPL_OUTPUT |
& DIFFERENT_MULTIPLE(cpl_taveFreq,myTime,deltaTClock) |
|
./pkg/ocn_compon_interf/ocn_cpl_diags.F |
56 |
OCN_CPL_DIAGS |
DDTT = deltaTClock |
|
./model/src/do_atmospheric_phys.F |
126 |
DO_ATMOSPHERIC_PHYS |
CALL FIZHI_UPDATE_TIME ( myIter, myThid, deltaTClock ) |
|
./pkg/opps/opps_output.F |
111 |
OPPS_OUTPUT |
DDTT = deltaTClock |
|
./pkg/opps/opps_output.F |
124 |
OPPS_OUTPUT |
& DIFFERENT_MULTIPLE( OPPStaveFreq, myTime, deltaTClock ) |
|
./model/src/do_oceanic_phys.F |
1069 |
DO_OCEANIC_PHYS |
I Nr, deltaTClock, bi, bj, myThid) |
|
./model/src/do_oceanic_phys.F |
273 |
DO_OCEANIC_PHYS |
CALL OBCS_CALC( myTime+deltaTClock, myIter+1, |
|
./pkg/pp81/pp81_output.F |
116 |
PP81_OUTPUT |
DDTT = deltaTClock |
|
./pkg/pp81/pp81_output.F |
131 |
PP81_OUTPUT |
& DIFFERENT_MULTIPLE( PPtaveFreq, myTime, deltaTClock ) |
|
./pkg/pp81/pp81_output.F |
79 |
PP81_OUTPUT |
& DIFFERENT_MULTIPLE( PPdumpFreq, myTime, deltaTClock ) |
|
./pkg/ptracers/ptracers_ad_dump.F |
67 |
PTRACERS_AD_DUMP |
& DIFFERENT_MULTIPLE(adjDumpFreq,myTime,deltaTClock) |
|
./model/src/do_the_model_io.F |
107 |
DO_THE_MODEL_IO |
IF ( DIFFERENT_MULTIPLE(dumpFreq,myTime,deltaTClock) |
|
./model/src/do_write_pickup.F |
64 |
DO_WRITE_PICKUP |
& DIFFERENT_MULTIPLE(pChkPtFreq,myTime,deltaTClock) |
|
./model/src/do_write_pickup.F |
66 |
DO_WRITE_PICKUP |
& DIFFERENT_MULTIPLE( chkPtFreq,myTime,deltaTClock) |
|
./model/src/do_write_pickup.F |
70 |
DO_WRITE_PICKUP |
CALL CAL_TIME2DUMP( zeroRL, pChkPtFreq, deltaTClock, |
|
./model/src/do_write_pickup.F |
73 |
DO_WRITE_PICKUP |
CALL CAL_TIME2DUMP( zeroRL, chkPtFreq, deltaTClock, |
|
./pkg/ptracers/ptracers_monitor.F |
55 |
PTRACERS_MONITOR |
IF ( DIFFERENT_MULTIPLE( PTRACERS_monitorFreq,myTime,deltaTClock ) |
|
./pkg/ptracers/ptracers_monitor_ad.F |
63 |
ADPTRACERS_MONITOR |
IF ( DIFFERENT_MULTIPLE( adjmonitorFreq,myTime,deltaTClock ) |
|
./pkg/ptracers/ptracers_reset.F |
58 |
PTRACERS_RESET |
& myTime + PTRACERS_resetPhase(iTracer), deltaTClock ) ) THEN |
|
./pkg/ptracers/ptracers_timeave.F |
73 |
PTRACERS_TIMEAVE |
& DIFFERENT_MULTIPLE( PTRACERS_taveFreq, myTime, deltaTClock ) |
|
./pkg/ptracers/ptracers_write_state.F |
54 |
PTRACERS_WRITE_STATE |
IF ( DIFFERENT_MULTIPLE( PTRACERS_dumpFreq, myTime, deltaTClock ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
61 |
PTRACERS_WRITE_TIMEAVE |
IF ( DIFFERENT_MULTIPLE( PTRACERS_taveFreq, myTime, deltaTClock ) |
|
./model/src/external_fields_load.F |
75 |
EXTERNAL_FIELDS_LOAD |
I deltaTClock, myTime, myThid ) |
|
./model/src/forward_step.F |
405 |
FORWARD_STEP |
myTime = startTime + deltaTClock*(iLoop-1) |
|
./model/src/forward_step.F |
831 |
FORWARD_STEP |
myTime = startTime + deltaTClock*iLoop |
|
./pkg/sbo/sbo_output.F |
114 |
SBO_OUTPUT |
& DIFFERENT_MULTIPLE(sbo_monFreq,myTime,deltaTClock) |
|
./pkg/seaice/cost_ice_test.F |
88 |
COST_ICE_TEST |
& / deltaTClock ) |
|
./pkg/seaice/seaice_ad_dump.F |
77 |
SEAICE_AD_DUMP |
& DIFFERENT_MULTIPLE(adjDumpFreq,myTime,deltaTClock) |
|
./pkg/seaice/seaice_cost_accumulate_mean.F |
57 |
SEAICE_COST_ACCUMULATE_MEAN |
& *_dyG(i,j,bi,bj)/lastinterval*deltaTClock |
|
./pkg/seaice/seaice_cost_accumulate_mean.F |
62 |
SEAICE_COST_ACCUMULATE_MEAN |
& *_dxG(i,j,bi,bj)/lastinterval*deltaTClock |
|
./pkg/seaice/seaice_evp.F |
183 |
SEAICE_EVP |
& .AND. DIFFERENT_MULTIPLE( SEAICE_monFreq, myTime, deltaTClock ) |
|
./pkg/seaice/seaice_jfnk.F |
132 |
SEAICE_JFNK |
& DIFFERENT_MULTIPLE( SEAICE_monFreq, myTime, deltaTClock ) ) |
|
./pkg/seaice/seaice_jfnk.F |
370 |
SEAICE_JFNK |
& myTime+deltaTClock, deltaTClock) |
|
./pkg/seaice/seaice_jfnk.F |
374 |
SEAICE_JFNK |
I zeroRL, SEAICE_monFreq, deltaTClock, |
|
./pkg/seaice/seaice_krylov.F |
132 |
SEAICE_KRYLOV |
& DIFFERENT_MULTIPLE( SEAICE_monFreq, myTime, deltaTClock ) ) |
|
./pkg/seaice/seaice_krylov.F |
425 |
SEAICE_KRYLOV |
& myTime+deltaTClock, deltaTClock) |
|
./pkg/seaice/seaice_krylov.F |
429 |
SEAICE_KRYLOV |
I zeroRL, SEAICE_monFreq, deltaTClock, |
|
./pkg/seaice/seaice_lsr.F |
160 |
SEAICE_LSR |
& .AND. DIFFERENT_MULTIPLE( SEAICE_monFreq, myTime, deltaTClock ) |
|
./pkg/seaice/seaice_monitor.F |
55 |
SEAICE_MONITOR |
IF ( DIFFERENT_MULTIPLE(SEAICE_monFreq,myTime,deltaTClock) |
|
./pkg/seaice/seaice_monitor_ad.F |
64 |
ADSEAICE_MONITOR |
IF ( DIFFERENT_MULTIPLE(adjmonitorFreq,myTime,deltaTClock) |
|
./pkg/seaice/seaice_obcs_output.F |
59 |
SEAICE_OBCS_OUTPUT |
& DIFFERENT_MULTIPLE(diagFreq,myTime,deltaTClock) |
|
./pkg/seaice/seaice_output.F |
197 |
SEAICE_OUTPUT |
& FUtave(i,j,bi,bj) +FU(i,j,bi,bj) *deltaTClock |
|
./pkg/seaice/seaice_output.F |
199 |
SEAICE_OUTPUT |
& FVtave(i,j,bi,bj) +FV(i,j,bi,bj) *deltaTClock |
|
./pkg/seaice/seaice_output.F |
201 |
SEAICE_OUTPUT |
& EmPmRtave(i,j,bi,bj)+EmPmR(i,j,bi,bj) *deltaTClock |
|
./pkg/seaice/seaice_output.F |
203 |
SEAICE_OUTPUT |
& QNETtave(i,j,bi,bj) +QNET(i,j,bi,bj) *deltaTClock |
|
./pkg/seaice/seaice_output.F |
205 |
SEAICE_OUTPUT |
& QSWtave(i,j,bi,bj) +QSW(i,j,bi,bj) *deltaTClock |
|
./pkg/seaice/seaice_output.F |
207 |
SEAICE_OUTPUT |
& UICEtave(i,j,bi,bj) +UICE(i,j,bi,bj)*deltaTClock |
|
./pkg/seaice/seaice_output.F |
209 |
SEAICE_OUTPUT |
& VICEtave(i,j,bi,bj) +VICE(i,j,bi,bj)*deltaTClock |
|
./pkg/seaice/seaice_output.F |
211 |
SEAICE_OUTPUT |
& HEFFtave(i,j,bi,bj) +HEFF(i,j,bi,bj)*deltaTClock |
|
./pkg/seaice/seaice_output.F |
213 |
SEAICE_OUTPUT |
& AREAtave(i,j,bi,bj) +AREA(i,j,bi,bj)*deltaTClock |
|
./pkg/seaice/seaice_output.F |
221 |
SEAICE_OUTPUT |
& HEFFITDtave(i,j,k,bi,bj) +HEFFITD(i,j,k,bi,bj)*deltaTClock |
|
./pkg/seaice/seaice_output.F |
223 |
SEAICE_OUTPUT |
& AREAITDtave(i,j,k,bi,bj) +AREAITD(i,j,k,bi,bj)*deltaTClock |
|
./pkg/seaice/seaice_output.F |
228 |
SEAICE_OUTPUT |
SEAICE_timeAve(bi,bj) = SEAICE_timeAve(bi,bj)+deltaTClock |
|
./pkg/seaice/seaice_output.F |
236 |
SEAICE_OUTPUT |
& DIFFERENT_MULTIPLE(SEAICE_taveFreq,myTime,deltaTClock) |
|
./pkg/seaice/seaice_output.F |
239 |
SEAICE_OUTPUT |
CALL CAL_TIME2DUMP( ZERO, SEAICE_taveFreq, deltaTClock, |
|
./pkg/seaice/seaice_output.F |
74 |
SEAICE_OUTPUT |
IF ( DIFFERENT_MULTIPLE(SEAICE_dumpFreq,myTime,deltaTClock) |
|
./pkg/seaice/seaice_preconditioner.F |
128 |
SEAICE_PRECONDITIONER |
& .AND. DIFFERENT_MULTIPLE( SEAICE_monFreq, myTime, deltaTClock ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
110 |
SHAP_FILT_APPLY_TS |
& DIFFERENT_MULTIPLE(Shap_diagFreq,myTime,deltaTClock) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
159 |
SHAP_FILT_APPLY_TS |
& DIFFERENT_MULTIPLE(Shap_diagFreq,myTime,deltaTClock) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
119 |
SHAP_FILT_APPLY_UV |
& DIFFERENT_MULTIPLE(Shap_diagFreq,myTime,deltaTClock) |
|
./pkg/shelfice/shelfice_cost_accumulate.F |
53 |
SHELFICE_COST_ACCUMULATE |
& + shelficeHeatFlux(i,j,bi,bj)*deltaTClock |
|
./pkg/shelfice/shelfice_cost_accumulate.F |
55 |
SHELFICE_COST_ACCUMULATE |
& + shelficeFreshWaterFlux(i,j,bi,bj)*deltaTClock |
|
./pkg/shelfice/shelfice_output.F |
120 |
SHELFICE_OUTPUT |
& + shelficeFreshWaterFlux(i,j,bi,bj) *deltaTClock |
|
./pkg/shelfice/shelfice_output.F |
123 |
SHELFICE_OUTPUT |
& + shelficeHeatFlux(i,j,bi,bj) *deltaTClock |
|
./pkg/shelfice/shelfice_output.F |
126 |
SHELFICE_OUTPUT |
SHELFICE_timeAve(bi,bj) = SHELFICE_timeAve(bi,bj)+deltaTClock |
|
./pkg/shelfice/shelfice_output.F |
135 |
SHELFICE_OUTPUT |
& DIFFERENT_MULTIPLE(SHELFICE_taveFreq,myTime,deltaTClock) |
|
./pkg/shelfice/shelfice_output.F |
138 |
SHELFICE_OUTPUT |
CALL CAL_TIME2DUMP( zeroRL, SHELFICE_taveFreq, deltaTClock, |
|
./pkg/shelfice/shelfice_output.F |
58 |
SHELFICE_OUTPUT |
& DIFFERENT_MULTIPLE(SHELFICE_dumpFreq,myTime,deltaTClock) |
|
./pkg/streamice/streamice_dump_ad.F |
102 |
ADSTREAMICE_DUMP |
& DIFFERENT_MULTIPLE(streamice_adjDump,mytime,deltaTClock) |
|
./pkg/streamice/streamice_fields_load.F |
74 |
STREAMICE_FIELDS_LOAD |
first = (myRelTime .lt. 0.5*deltaTClock) |
|
./pkg/thsice/thsice_cost_test.F |
84 |
THSICE_COST_TEST |
& / deltaTClock ) |
|
./pkg/thsice/thsice_output.F |
264 |
THSICE_OUTPUT |
& DIFFERENT_MULTIPLE( thSIce_diagFreq, myTime, deltaTClock ) |
|
./pkg/thsice/thsice_output.F |
87 |
THSICE_OUTPUT |
& DIFFERENT_MULTIPLE(thSIce_taveFreq,myTime,deltaTClock) |
|
./pkg/timeave/timeave_statv_write.F |
62 |
TIMEAVE_STATV_WRITE |
dumpFiles = DIFFERENT_MULTIPLE(taveFreq,myTime,deltaTClock) |
|
./pkg/timeave/timeave_statv_write.F |
65 |
TIMEAVE_STATV_WRITE |
CALL CAL_TIME2DUMP( zeroRL, taveFreq, deltaTClock, |
|
./model/src/ini_parms.F |
1001 |
INI_PARMS |
IF ( startTime .NE. baseTime+deltaTClock*DFLOAT(nIter0) ) THEN |
|
./model/src/ini_parms.F |
1019 |
INI_PARMS |
IF ( nTimeSteps .NE. NINT((endTime-startTime)/deltaTClock) |
|
./model/src/ini_parms.F |
1042 |
INI_PARMS |
IF (monitorFreq.EQ.0.) monitorFreq=deltaTClock |
|
./model/src/ini_parms.F |
254 |
INI_PARMS |
& deltaT, deltaTClock, deltaTMom, |
|
./model/src/ini_parms.F |
887 |
INI_PARMS |
IF ( deltaT .EQ. 0. ) deltaT = deltaTClock |
|
./model/src/ini_parms.F |
903 |
INI_PARMS |
IF ( deltaTClock .EQ. 0. ) deltaTClock = deltaT |
|
./model/src/ini_parms.F |
931 |
INI_PARMS |
IF ( externForcingPeriod.LT.deltaTClock ) THEN |
|
./model/src/ini_parms.F |
949 |
INI_PARMS |
cAdjFreq = deltaTClock |
|
./model/src/ini_parms.F |
971 |
INI_PARMS |
startTime = baseTime + deltaTClock*DFLOAT(nIter0) |
|
./model/src/ini_parms.F |
974 |
INI_PARMS |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./model/src/ini_parms.F |
977 |
INI_PARMS |
baseTime = startTime - deltaTClock*DFLOAT(nIter0) |
|
./model/src/ini_parms.F |
986 |
INI_PARMS |
& nTimeSteps = NINT((endTime-startTime)/deltaTClock) |
|
./model/src/ini_parms.F |
992 |
INI_PARMS |
& nEndIter = NINT((endTime-baseTime)/deltaTClock) |
|
./model/src/ini_parms.F |
995 |
INI_PARMS |
& endTime = startTime + deltaTClock*DFLOAT(nTimeSteps) |
|
./model/src/ini_parms.F |
998 |
INI_PARMS |
& endTime = baseTime + deltaTClock*DFLOAT(nEndIter) |
|
./pkg/timeave/timeave_statvars.F |
100 |
TIMEAVE_STATVARS |
dumpFiles = DIFFERENT_MULTIPLE(taveFreq,myTime,deltaTClock) |
|
./pkg/timeave/timeave_statvars.F |
103 |
TIMEAVE_STATVARS |
CALL CAL_TIME2DUMP( zeroRL, taveFreq, deltaTClock, |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
69 |
ADDUMMY_IN_STEPPING |
& DIFFERENT_MULTIPLE(ADJdumpFreq,mytime,deltaTClock) |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
93 |
ADDUMMY_IN_HFAC |
& mytime-deltaTClock) |
|
./model/src/initialise_varia.F |
110 |
INITIALISE_VARIA |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
70 |
FIZHI_INIT_FIXED |
call FIZHI_ALARMS(nymdb,nhmsb,deltaTClock) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
70 |
FIZHI_INIT_FIXED |
call FIZHI_ALARMS(nymdb,nhmsb,deltaTClock) |
|
./model/src/post_cg3d.F |
111 |
POST_CG3D |
IF ( DIFFERENT_MULTIPLE( diagFreq, myTime, deltaTClock) ) THEN |
|
./model/src/set_parms.F |
269 |
SET_PARMS |
tmpVar = startTime + deltaTClock*DFLOAT(nTimeSteps) |
|
./model/src/set_parms.F |
271 |
SET_PARMS |
IF ( ABS(endTime-tmpVar).GT.deltaTClock*1. _d -6 ) THEN |
|
./model/src/solve_for_pressure.F |
263 |
SOLVE_FOR_PRESSURE |
IF ( DIFFERENT_MULTIPLE(diagFreq, myTime, deltaTClock) ) THEN |
|
./model/src/solve_for_pressure.F |
323 |
SOLVE_FOR_PRESSURE |
IF ( DIFFERENT_MULTIPLE(monitorFreq,myTime,deltaTClock) |
|
./model/src/solve_for_pressure.F |
379 |
SOLVE_FOR_PRESSURE |
IF ( DIFFERENT_MULTIPLE(diagFreq, myTime, deltaTClock) ) THEN |
|
./model/src/solve_for_pressure.F |
402 |
SOLVE_FOR_PRESSURE |
IF ( DIFFERENT_MULTIPLE( diagFreq, myTime, deltaTClock) ) THEN |
|
./model/src/solve_for_pressure.F |
426 |
SOLVE_FOR_PRESSURE |
IF ( DIFFERENT_MULTIPLE(monitorFreq,myTime,deltaTClock) |
|
./model/src/solve_for_pressure.F |
443 |
SOLVE_FOR_PRESSURE |
IF ( DIFFERENT_MULTIPLE( diagFreq, myTime, deltaTClock) ) THEN |
|
./model/src/temp_integrate.F |
522 |
TEMP_INTEGRATE |
I Nr, 3, deltaTClock, bi, bj, myThid ) |
|
./model/src/the_main_loop.F |
267 |
THE_MAIN_LOOP |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./model/src/the_main_loop.F |
584 |
THE_MAIN_LOOP |
nIter0 = NINT( (startTime-baseTime)/deltaTClock ) |
|
./model/src/the_main_loop.F |
587 |
THE_MAIN_LOOP |
myTime = startTime + deltaTClock*(iloop-1) |
|
./model/src/the_main_loop.F |
614 |
THE_MAIN_LOOP |
myTime = startTime + deltaTClock*(iloop-1) |
|
./model/src/thermodynamics.F |
117 |
THERMODYNAMICS |
IF ( .NOT.staggerTimeStep ) wrTime = myTime + deltaTClock |
|
./model/src/thermodynamics.F |
119 |
THERMODYNAMICS |
& DIFFERENT_MULTIPLE( monitorFreq, wrTime, deltaTClock ) |
|
./model/src/write_state.F |
83 |
WRITE_STATE |
& DIFFERENT_MULTIPLE(dumpFreq,myTime,deltaTClock) |
|
./pkg/aim_v23/aim_diagnostics.F |
160 |
AIM_DIAGNOSTICS |
& myTime+deltaTClock, deltaTClock ) |
|
./pkg/aim_v23/aim_diagnostics.F |
170 |
AIM_DIAGNOSTICS |
& myTime+deltaTClock, myIter+1, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
244 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W_S('D',suff,0,0,'T',myTime+deltaTClock,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
317 |
AIM_DIAGNOSTICS |
DDTT = deltaTClock |
|
./pkg/aim_v23/aim_diagnostics.F |
80 |
AIM_DIAGNOSTICS |
& myTime+deltaTClock, deltaTClock ) |
|
./pkg/aim_v23/aim_diagnostics.F |
90 |
AIM_DIAGNOSTICS |
& myTime+deltaTClock, myIter+1, myThid ) |
|
./pkg/aim_v23/aim_do_co2.F |
148 |
AIM_DO_CO2 |
modelEnd = (myTime+deltaTClock).EQ.endTime |
|
./pkg/aim_v23/aim_do_co2.F |
153 |
AIM_DO_CO2 |
& DIFFERENT_MULTIPLE(pChkptFreq,myTime+deltaTClock,deltaTClock) |
|
./pkg/aim_v23/aim_do_co2.F |
155 |
AIM_DO_CO2 |
& DIFFERENT_MULTIPLE( chkptFreq,myTime+deltaTClock,deltaTClock) |
|
./pkg/aim_v23/aim_do_co2.F |
163 |
AIM_DO_CO2 |
& myTime+deltaTClock, myIter+1, myThid ) |
|
./pkg/aim_v23/aim_tendency_apply.F |
168 |
AIM_TENDENCY_APPLY_U |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_tendency_apply.F |
356 |
AIM_TENDENCY_APPLY_V |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
88 |
AIM_WRITE_TAVE |
& DIFFERENT_MULTIPLE(aim_taveFreq,myTime,deltaTClock) |
|
./pkg/atm2d/atm2d_write_pickup.F |
58 |
ATM2D_WRITE_PICKUP |
& DIFFERENT_MULTIPLE(pChkPtFreq,myTime,deltaTClock) |
|
./pkg/atm2d/atm2d_write_pickup.F |
60 |
ATM2D_WRITE_PICKUP |
& DIFFERENT_MULTIPLE( chkPtFreq,myTime,deltaTClock) |
|
./pkg/atm2d/atm2d_write_pickup.F |
64 |
ATM2D_WRITE_PICKUP |
CALL CAL_TIME2DUMP( zeroRL, pChkPtFreq, deltaTClock, |
|
./pkg/atm2d/atm2d_write_pickup.F |
67 |
ATM2D_WRITE_PICKUP |
CALL CAL_TIME2DUMP( zeroRL, chkPtFreq, deltaTClock, |
|
./pkg/atm2d/forward_step_atm2d.F |
243 |
FORWARD_STEP_ATM2D |
iloop_ocn = nint((iloop-1)*dtcouplo/deltaTClock) + no |
|
./pkg/atm2d/forward_step_atm2d.F |
248 |
FORWARD_STEP_ATM2D |
myTime = startTime + deltaTClock *float (iloop_ocn) |
|
./pkg/atm2d/tave_end_diags.F |
171 |
TAVE_END_DIAGS |
simYr = int(myIter*deltaTClock/secYr) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
208 |
CPL_READPARMS |
tmpLoc = NINT( cpl_atmSendFrq / deltaTClock ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
209 |
CPL_READPARMS |
tmpLoc = ABS( tmpLoc - ( cpl_atmSendFrq / deltaTClock ) ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
218 |
CPL_READPARMS |
cplSendFrq_iter = NINT( cpl_atmSendFrq / deltaTClock ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
94 |
CPL_READPARMS |
cpl_atmSendFrq= deltaTClock |
|
./pkg/autodiff/addamp_adj.F |
46 |
ADDAMP_ADJ |
facDamp=(1. _d 0-deltaTClock/timeDamp) |
|
./pkg/autodiff/addummy_in_dynamics.F |
75 |
ADDUMMY_IN_DYNAMICS |
& DIFFERENT_MULTIPLE(adjDumpFreq,myTime,deltaTClock) |
|
./pkg/autodiff/addummy_in_stepping.F |
94 |
ADDUMMY_IN_STEPPING |
& DIFFERENT_MULTIPLE(adjDumpFreq,myTime,deltaTClock) |
|
./pkg/autodiff/g_dummy_in_dynamics.F |
65 |
G_DUMMY_IN_DYNAMICS |
& DIFFERENT_MULTIPLE(adjDumpFreq,myTime,deltaTClock) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
69 |
G_DUMMY_IN_STEPPING |
& DIFFERENT_MULTIPLE(adjDumpFreq,myTime,deltaTClock) |
|
./pkg/bling/bling_fields_load.F |
62 |
BLING_FIELDS_LOAD |
I deltaTClock, myTime, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
51 |
BULKF_OUTPUT |
IF ( DIFFERENT_MULTIPLE(blk_taveFreq,myTime,deltaTClock) |
|
./pkg/cfc/cfc11_forcing.F |
98 |
CFC11_FORCING |
IF ( DIFFERENT_MULTIPLE( CFC_monFreq, myTime, deltaTClock ) |
|
./pkg/cfc/cfc12_forcing.F |
99 |
CFC12_FORCING |
IF ( DIFFERENT_MULTIPLE( CFC_monFreq, myTime, deltaTClock ) |
|
./pkg/cfc/cfc_readparms.F |
100 |
CFC_READPARMS |
& - deltaTClock*PTRACERS_Iter0 |
|
./pkg/cost/cost_accumulate_mean.F |
51 |
COST_ACCUMULATE_MEAN |
& /lastinterval*deltaTClock |
|
./pkg/cost/cost_accumulate_mean.F |
54 |
COST_ACCUMULATE_MEAN |
& /lastinterval*deltaTClock |
|
./pkg/cost/cost_accumulate_mean.F |
57 |
COST_ACCUMULATE_MEAN |
& /lastinterval*deltaTClock |
|
./pkg/cost/cost_accumulate_mean.F |
64 |
COST_ACCUMULATE_MEAN |
& /lastinterval*deltaTClock |
|
./pkg/cost/cost_accumulate_mean.F |
70 |
COST_ACCUMULATE_MEAN |
& /lastinterval*deltaTClock |
|
./pkg/ctrl/ctrl_get_gen_rec.F |
191 |
CTRL_GET_GEN_REC |
first = (myRelTime .lt. 0.5*deltaTClock) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
147 |
CTRL_MAP_GENTIM2D |
& *rhoConstFresh*recip_rhoConst*deltaTClock |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
102 |
DIAGNOSTICS_MNC_SET |
tmpLev = myTime + deltaTClock*( lm - averageCycle(listId) ) |
|
./pkg/diagnostics/diagnostics_out.F |
129 |
DIAGNOSTICS_OUT |
timeRec(1) = myTime-deltaTClock*0.5 _d 0 |
|
./pkg/diagnostics/diagnostics_out.F |
141 |
DIAGNOSTICS_OUT |
timeRec(1) = (timeRec(1)-baseTime)/deltaTClock |
|
./pkg/diagnostics/diagnostics_out.F |
146 |
DIAGNOSTICS_OUT |
timeRec(1) = baseTime + deltaTClock*FLOAT(i) |
|
./pkg/diagnostics/diagnostics_readparms.F |
309 |
DIAGNOSTICS_READPARMS |
averageFreq(n) = nTimeSteps*deltaTClock |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
131 |
DIAGNOSTICS_SWITCH_ONOFF |
xInterval = myTime + deltaTClock*0.5 _d 0 - averagePhase(n) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
178 |
DIAGNOSTICS_SWITCH_ONOFF |
& myTime, deltaTClock ) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
188 |
DIAGNOSTICS_SWITCH_ONOFF |
CALL CAL_TIME2DUMP( phiSec, freqSec, deltaTClock, |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
89 |
DIAGNOSTICS_SWITCH_ONOFF |
& myTime, deltaTClock ) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
98 |
DIAGNOSTICS_SWITCH_ONOFF |
CALL CAL_TIME2DUMP( phiSec, freqSec, deltaTClock, |
|
./pkg/diagnostics/diagnostics_write.F |
113 |
DIAGNOSTICS_WRITE |
wrTime = myTime - deltaTClock |
|
./pkg/diagnostics/diagnostics_write.F |
119 |
DIAGNOSTICS_WRITE |
& wrTime, deltaTClock ) |
|
./pkg/diagnostics/diagnostics_write.F |
128 |
DIAGNOSTICS_WRITE |
CALL CAL_TIME2DUMP( phiSec, freqSec, deltaTClock, |
|
./pkg/diagnostics/diagnostics_write.F |
169 |
DIAGNOSTICS_WRITE |
IF ( freqSec.LT.0. ) wrTime = myTime - deltaTClock |
|
./pkg/diagnostics/diagnostics_write.F |
171 |
DIAGNOSTICS_WRITE |
& wrTime, deltaTClock ) |
|
./pkg/diagnostics/diagnostics_write.F |
180 |
DIAGNOSTICS_WRITE |
CALL CAL_TIME2DUMP( phiSec, freqSec, deltaTClock, |
|
./pkg/diagnostics/diagnostics_write.F |
194 |
DIAGNOSTICS_WRITE |
IF ( freqSec.LT.0. ) wrTime = myTime - deltaTClock |
|
./pkg/diagnostics/diagnostics_write.F |
196 |
DIAGNOSTICS_WRITE |
& wrTime, deltaTClock ) |
|
./pkg/diagnostics/diagnostics_write.F |
205 |
DIAGNOSTICS_WRITE |
CALL CAL_TIME2DUMP( phiSec, freqSec, deltaTClock, |
|
./pkg/diagnostics/diagnostics_write.F |
71 |
DIAGNOSTICS_WRITE |
wrTime = myTime - deltaTClock |
|
./pkg/diagnostics/diagnostics_write.F |
77 |
DIAGNOSTICS_WRITE |
& wrTime, deltaTClock ) |
|
./pkg/diagnostics/diagnostics_write.F |
86 |
DIAGNOSTICS_WRITE |
CALL CAL_TIME2DUMP( phiSec, freqSec, deltaTClock, |
|
./pkg/dic/dic_atmos.F |
162 |
DIC_ATMOS |
& DIFFERENT_MULTIPLE(externForcingCycle,myTime,deltaTClock) |
|
./pkg/dic/dic_biotic_diags.F |
45 |
DIC_BIOTIC_DIAGS |
IF (DIFFERENT_MULTIPLE(PTRACERS_taveFreq,myTime,deltaTClock)) THEN |
|
./pkg/dic/dic_biotic_forcing.F |
391 |
DIC_BIOTIC_FORCING |
& BIOac(i,j,k)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
393 |
DIC_BIOTIC_FORCING |
& CAR(i,j,k)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
395 |
DIC_BIOTIC_FORCING |
& OmegaC(i,j,k,bi,bj)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
397 |
DIC_BIOTIC_FORCING |
& pflux(i,j,k)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
399 |
DIC_BIOTIC_FORCING |
& exportflux(i,j,k)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
401 |
DIC_BIOTIC_FORCING |
& cflux(i,j,k)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
408 |
DIC_BIOTIC_FORCING |
& SURC(i,j)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
411 |
DIC_BIOTIC_FORCING |
& SURO(i,j)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
414 |
DIC_BIOTIC_FORCING |
& pCO2(i,j,bi,bj)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
416 |
DIC_BIOTIC_FORCING |
& pH(i,j,bi,bj)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
418 |
DIC_BIOTIC_FORCING |
& fluxCO2(i,j,bi,bj)*deltaTClock |
|
./pkg/dic/dic_biotic_forcing.F |
421 |
DIC_BIOTIC_FORCING |
DIC_timeAve(bi,bj) = DIC_timeAve(bi,bj)+deltaTClock |
|
./pkg/dic/dic_fields_load.F |
50 |
DIC_FIELDS_LOAD |
I deltaTClock, myTime, myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
72 |
DIC_SURFFORCING_INIT |
I deltaTClock, startTime, myThid ) |
|
./pkg/ecco/cost_averagesfields.F |
163 |
COST_AVERAGESFIELDS |
myiter = niter0 + INT((mytime-starttime)/deltaTClock+0.5) |
|
./pkg/ecco/cost_averagesfields.F |
222 |
COST_AVERAGESFIELDS |
& *rhoConstFresh*recip_rhoConst*deltaTClock |