| File |
Line number |
Procedure |
Code |
|
./pkg/ptracers/ptracers_statvars.F |
104 |
PTRACERS_STATVARS |
& 1,deltaTclock,bi,bj,myThid) |
|
./pkg/ptracers/ptracers_statvars.F |
108 |
PTRACERS_STATVARS |
ptracer_full(k,bi,bj)=ptracer_full(k,bi,bj)+deltaTclock |
|
./pkg/ptracers/ptracers_statvars.F |
64 |
PTRACERS_STATVARS |
DDTT=0.5*deltaTclock |
|
./pkg/ptracers/ptracers_statvars.F |
66 |
PTRACERS_STATVARS |
DDTT=deltaTclock |
|
./pkg/ptracers/ptracers_monitor.F |
53 |
PTRACERS_MONITOR |
dT=deltaTclock |
|
./pkg/shelfice/shelfice_do_diags.F |
90 |
SHELFICE_DO_DIAGS |
& + shelficeFreshWaterFlux(i,j,bi,bj) *deltaTclock |
|
./pkg/shelfice/shelfice_do_diags.F |
93 |
SHELFICE_DO_DIAGS |
& + shelficeHeatFlux(i,j,bi,bj) *deltaTclock |
|
./pkg/shelfice/shelfice_do_diags.F |
96 |
SHELFICE_DO_DIAGS |
SHELFICE_TimeAve(bi,bj)=SHELFICE_TimeAve(bi,bj)+deltaTclock |
|
./pkg/pp81/pp81_do_diags.F |
133 |
PP81_DO_DIAGS |
DDTT=0.5*deltaTclock |
|
./pkg/pp81/pp81_do_diags.F |
135 |
PP81_DO_DIAGS |
DDTT=deltaTclock |
|
./pkg/pp81/pp81_do_diags.F |
199 |
PP81_DO_DIAGS |
DDTT=0.5*deltaTclock |
|
./pkg/gmredi/gmredi_calc_tensor.F |
605 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
607 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
609 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
613 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
619 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
621 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
625 |
GMREDI_CALC_TENSOR |
GM_TimeAve(k,bi,bj)=GM_TimeAve(k,bi,bj)+deltaTclock |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
109 |
DIAGNOSTICS_SWITCH_ONOFF |
xInterval = myTime + deltaTclock*0.5 _d 0 - averagePhase(n) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
156 |
DIAGNOSTICS_SWITCH_ONOFF |
& myTime, deltaTclock ) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
74 |
DIAGNOSTICS_SWITCH_ONOFF |
& myTime, deltaTclock ) |
|
./pkg/diagnostics/diagnostics_write.F |
104 |
DIAGNOSTICS_WRITE |
wrTime = myTime - deltaTclock |
|
./pkg/diagnostics/diagnostics_write.F |
110 |
DIAGNOSTICS_WRITE |
& wrTime, deltaTclock ) |
|
./pkg/diagnostics/diagnostics_write.F |
141 |
DIAGNOSTICS_WRITE |
IF ( freqSec.LT.0. ) wrTime = myTime - deltaTclock |
|
./pkg/diagnostics/diagnostics_write.F |
143 |
DIAGNOSTICS_WRITE |
& wrTime, deltaTclock ) |
|
./pkg/diagnostics/diagnostics_write.F |
166 |
DIAGNOSTICS_WRITE |
IF ( freqSec.LT.0. ) wrTime = myTime - deltaTclock |
|
./pkg/diagnostics/diagnostics_write.F |
168 |
DIAGNOSTICS_WRITE |
& wrTime, deltaTclock ) |
|
./pkg/diagnostics/diagnostics_write.F |
63 |
DIAGNOSTICS_WRITE |
wrTime = myTime - deltaTclock |
|
./pkg/diagnostics/diagnostics_write.F |
69 |
DIAGNOSTICS_WRITE |
& wrTime, deltaTclock ) |
|
./pkg/aim_v23/aim_diagnostics.F |
264 |
AIM_DIAGNOSTICS |
DDTT = deltaTclock |
|
./pkg/aim_v23/aim_tendency_apply.F |
105 |
AIM_TENDENCY_APPLY_U |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_tendency_apply.F |
161 |
AIM_TENDENCY_APPLY_V |
DDTT = deltaTclock |
|
./pkg/aim_v23/aim_tendency_apply.F |
218 |
AIM_TENDENCY_APPLY_V |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_tendency_apply.F |
48 |
AIM_TENDENCY_APPLY_U |
DDTT = deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
44 |
BULKF_AVE |
& +Qnet(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
49 |
BULKF_AVE |
& +EmPmR(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
51 |
BULKF_AVE |
& +fu(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
53 |
BULKF_AVE |
& +fv(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
55 |
BULKF_AVE |
& +flh(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
57 |
BULKF_AVE |
& +fsh(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
59 |
BULKF_AVE |
& +evap(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
61 |
BULKF_AVE |
& +flwup(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
63 |
BULKF_AVE |
& +flwupnet(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
65 |
BULKF_AVE |
& +fswnet(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
67 |
BULKF_AVE |
& +savssq(i,j,bi,bj)*deltaTclock |
|
./pkg/bulk_force/bulkf_ave.F |
70 |
BULKF_AVE |
BULKF_timeave(1,bi,bj)=BULKF_timeave(1,bi,bj)+deltaTclock |
|
./pkg/bulk_force/bulkf_fields_load.F |
170 |
BULKF_FIELDS_LOAD |
rdt = 1. _d 0 / deltaTclock |
|
./pkg/profiles/profiles_inloop.F |
61 |
PROFILES_INLOOP |
& (prof_time(num_file,prof_num,bi,bj).LT.(mytime+deltaTclock))) |
|
./pkg/profiles/profiles_init_fixed.F |
163 |
PROFILES_INIT_FIXED |
diffsecs=diffsecs+nIter0*deltaTclock |
|
./pkg/dic/dic_aver.F |
56 |
DIC_AVER |
& deltaTclock |
|
./pkg/dic/dic_aver.F |
60 |
DIC_AVER |
& PTRACER(i,j,k,bi,bj,3)*deltaTclock |
|
./pkg/dic/dic_aver.F |
62 |
DIC_AVER |
& PTRACER(i,j,k,bi,bj,5)*deltaTclock |
|
./pkg/dic/dic_aver.F |
69 |
DIC_AVER |
rdt=1. _d 0 / deltaTclock |
|
./pkg/dic/dic_aver.F |
80 |
DIC_AVER |
& deltaTclock |
|
./pkg/dic/dic_aver.F |
84 |
DIC_AVER |
& PTRACER(i,j,1,bi,bj,3)*deltaTclock |
|
./pkg/dic/dic_aver.F |
86 |
DIC_AVER |
& PTRACER(i,j,2,bi,bj,3)*deltaTclock |
|
./pkg/dic/dic_aver.F |
88 |
DIC_AVER |
& PTRACER(i,j,3,bi,bj,3)*deltaTclock |
|
./pkg/dic/dic_aver.F |
92 |
DIC_AVER |
& PTRACER(i,j,1,bi,bj,5)*deltaTclock |
|
./pkg/dic/dic_aver.F |
94 |
DIC_AVER |
& PTRACER(i,j,2,bi,bj,5)*deltaTclock |
|
./pkg/dic/dic_aver.F |
96 |
DIC_AVER |
& PTRACER(i,j,3,bi,bj,5)*deltaTclock |
|
./pkg/dic/dic_fields_load.F |
54 |
DIC_FIELDS_LOAD |
rdt=1. _d 0 / deltaTclock |
|
./pkg/dic/dic_surfforcing_init.F |
64 |
DIC_SURFFORCING_INIT |
rdt=1. _d 0 / deltaTclock |
|
./pkg/dic/dic_surfforcing_init.F |
68 |
DIC_SURFFORCING_INIT |
Imytm=int((nIter0*deltaTclock)*rdt+0.5) |
|
./pkg/dic/dic_surfforcing_init.F |
94 |
DIC_SURFFORCING_INIT |
otime=nIter0*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
257 |
DIC_BIOTIC_FORCING |
& BIOac(i,j,k)*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
259 |
DIC_BIOTIC_FORCING |
& CAR(i,j,k)*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
261 |
DIC_BIOTIC_FORCING |
& OmegaC(i,j,k,bi,bj)*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
263 |
DIC_BIOTIC_FORCING |
& pflux(i,j,k)*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
265 |
DIC_BIOTIC_FORCING |
& cflux(i,j,k)*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
268 |
DIC_BIOTIC_FORCING |
& SURC(i,j)*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
270 |
DIC_BIOTIC_FORCING |
& SURO(i,j)*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
272 |
DIC_BIOTIC_FORCING |
& pCO2(i,j,bi,bj)*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
274 |
DIC_BIOTIC_FORCING |
& pH(i,j,bi,bj)*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
276 |
DIC_BIOTIC_FORCING |
& fluxCO2(i,j,bi,bj)*deltaTclock |
|
./pkg/dic/dic_biotic_forcing.F |
282 |
DIC_BIOTIC_FORCING |
dic_timeave(bi,bj,k)=dic_timeave(bi,bj,k)+deltaTclock |
|
./pkg/offline/offline_readparms.F |
76 |
OFFLINE_READPARMS |
deltaToffline=deltaTclock |
|
./verification/natl_box/code/external_fields_load.F |
90 |
EXTERNAL_FIELDS_LOAD |
rdt=1. _d 0 / deltaTclock |
|
./model/src/ini_parms.F |
826 |
INI_PARMS |
IF ( externForcingPeriod.lt.deltaTclock ) THEN |
|
./model/src/ini_parms.F |
894 |
INI_PARMS |
& nTimeSteps = NINT((endTime-startTime)/deltaTclock) |
|
./model/src/ini_parms.F |
900 |
INI_PARMS |
& nEndIter = NINT((endTime-baseTime)/deltaTclock) |
|
./model/src/ini_parms.F |
950 |
INI_PARMS |
IF (monitorFreq.EQ.0.) monitorFreq=deltaTclock |
|
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
377 |
THE_MAIN_LOOP |
mytime = startTime + float(iloop-1)*deltaTclock |
|
./model/src/thermodynamics.F |
678 |
THERMODYNAMICS |
I Nr, 3, deltaTclock, bi, bj, myThid) |
|
./model/src/external_fields_load.F |
97 |
EXTERNAL_FIELDS_LOAD |
rdt = 1. _d 0 / deltaTclock |
|
./model/src/convective_adjustment.F |
177 |
CONVECTIVE_ADJUSTMENT |
I Nr, deltaTclock, bi, bj, myThid) |
|
./model/src/forward_step.F |
143 |
FORWARD_STEP |
myTime = startTime + float(iloop-1)*deltaTclock |
|
./model/src/do_oceanic_phys.F |
415 |
DO_OCEANIC_PHYS |
CALL OBCS_CALC( bi, bj, myTime+deltaTclock, myIter+1, |
|
./model/src/do_oceanic_phys.F |
567 |
DO_OCEANIC_PHYS |
I Nr, deltaTclock, bi, bj, myThid) |
|
./model/src/do_atmospheric_phys.F |
59 |
DO_ATMOSPHERIC_PHYS |
CALL FIZHI_UPDATE_TIME ( myIter, myThid, deltaTclock ) |
|
./pkg/ggl90/ggl90_do_diags.F |
140 |
GGL90_DO_DIAGS |
DDTT=0.5*deltaTclock |
|
./pkg/ggl90/ggl90_do_diags.F |
142 |
GGL90_DO_DIAGS |
DDTT=deltaTclock |
|
./pkg/ggl90/ggl90_do_diags.F |
215 |
GGL90_DO_DIAGS |
DDTT=0.5*deltaTclock |
|
./pkg/cost/cost_readparms.F |
90 |
COST_READPARMS |
IF ( MOD(lastinterval,deltaTclock) .GT. 0. ) |
|
./pkg/cost/cost_readparms.F |
92 |
COST_READPARMS |
& INT(lastinterval/deltaTclock-1)*deltaTclock,deltaTclock) |
|
./pkg/kpp/kpp_do_diags.F |
177 |
KPP_DO_DIAGS |
DDTT=deltaTclock |
|
./pkg/opps/opps_do_diags.F |
122 |
OPPS_DO_DIAGS |
DDTT=0.5*deltaTclock |
|
./pkg/opps/opps_do_diags.F |
124 |
OPPS_DO_DIAGS |
DDTT=deltaTclock |
|
./pkg/opps/opps_do_diags.F |
178 |
OPPS_DO_DIAGS |
DDTT=0.5*deltaTclock |
|
./pkg/cfc/cfc11_forcing.F |
63 |
CFC11_FORCING |
myYear=float(myIter-PTRACERS_Iter0)*deltaTclock |
|
./pkg/cfc/cfc_fields_load.F |
65 |
CFC_FIELDS_LOAD |
rdt=1. _d 0 / deltaTclock |
|
./pkg/cfc/cfc12_forcing.F |
63 |
CFC12_FORCING |
myYear=float(myIter-PTRACERS_Iter0)*deltaTclock |
|
./pkg/timeave/timeave_statvars.F |
179 |
TIMEAVE_STATVARS |
& deltaTclock, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
181 |
TIMEAVE_STATVARS |
& deltaTclock, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
183 |
TIMEAVE_STATVARS |
& phiHydLow,phiHydLow, 1, 0, deltaTclock, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
185 |
TIMEAVE_STATVARS |
TimeAve_full(k,bi,bj)=TimeAve_full(k,bi,bj)+deltaTclock |
|
./pkg/timeave/timeave_statvars.F |
88 |
TIMEAVE_STATVARS |
DDTT = deltaTclock*(1. _d 0 - tave_lastIter) |
|
./pkg/timeave/timeave_statvars.F |
90 |
TIMEAVE_STATVARS |
DDTT = deltaTclock |
|
./pkg/timeave/timeave_statvars.F |
99 |
TIMEAVE_STATVARS |
IF ( dumpFiles ) DDTT = deltaTclock*tave_lastIter |
|
./pkg/timeave/timeave_surf_flux.F |
118 |
TIMEAVE_SURF_FLUX |
& deltaTclock, bi, bj, myThid) |
|
./pkg/timeave/timeave_surf_flux.F |
55 |
TIMEAVE_SURF_FLUX |
DDTT = deltaTclock*foFacMom |
|
./pkg/timeave/timeave_surf_flux.F |
67 |
TIMEAVE_SURF_FLUX |
DDTT = deltaTclock*foFacMom |
|
./pkg/timeave/timeave_surf_flux.F |
95 |
TIMEAVE_SURF_FLUX |
& deltaTclock, bi, bj, myThid) |
|
./pkg/obcs/obcs_external_fields_load.F |
84 |
OBCS_EXTERNAL_FIELDS_LOAD |
rdt=1. _d 0 / deltaTclock |
|
./pkg/rbcs/rbcs_fields_load.F |
106 |
RBCS_FIELDS_LOAD |
rdt=1. _d 0 / deltaTclock |
|
./pkg/rbcs/rbcs_fields_load.F |
108 |
RBCS_FIELDS_LOAD |
Imytm=int((myTime-float(rbcsIniter)*deltaTclock)*rdt+0.5) |
|
./pkg/ocn_compon_interf/ocn_cpl_diags.F |
39 |
OCN_CPL_DIAGS |
DDTT = deltaTclock |
|
./pkg/sbo/sbo_diags.F |
100 |
SBO_DIAGS |
DDTT=deltaTclock |
|
./pkg/sbo/sbo_diags.F |
142 |
SBO_DIAGS |
DDTT=0.5*deltaTclock |
|
./pkg/sbo/sbo_diags.F |
98 |
SBO_DIAGS |
DDTT=0.5*deltaTclock |
|
./pkg/ecco/the_main_loop.F |
498 |
THE_MAIN_LOOP |
mytime = startTime + float(iloop-1)*deltaTclock |
|
./pkg/thsice/thsice_monitor.F |
65 |
THSICE_MONITOR |
& DIFFERENT_MULTIPLE(thSIce_monFreq,myTime,deltaTclock) |
|
./pkg/land/land_readparms.F |
120 |
LAND_READPARMS |
land_deltaT = deltaTclock |
|
./pkg/my82/my82_do_diags.F |
141 |
MY82_DO_DIAGS |
DDTT=0.5*deltaTclock |
|
./pkg/my82/my82_do_diags.F |
143 |
MY82_DO_DIAGS |
DDTT=deltaTclock |
|
./pkg/my82/my82_do_diags.F |
216 |
MY82_DO_DIAGS |
DDTT=0.5*deltaTclock |
|
./pkg/cal/cal_readparms.F |
145 |
CAL_READPARMS |
modstep = deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
246 |
SEAICE_DO_DIAGS |
& FUtave(i,j,1,bi,bj) +FU(i,j,bi,bj) *deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
248 |
SEAICE_DO_DIAGS |
& FVtave(i,j,1,bi,bj) +FV(i,j,bi,bj) *deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
250 |
SEAICE_DO_DIAGS |
& EmPmRtave(i,j,1,bi,bj)+EmPmR(i,j,bi,bj) *deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
252 |
SEAICE_DO_DIAGS |
& QNETtave(i,j,1,bi,bj) +QNET(i,j,bi,bj) *deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
254 |
SEAICE_DO_DIAGS |
& QSWtave(i,j,1,bi,bj) +QSW(i,j,bi,bj) *deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
256 |
SEAICE_DO_DIAGS |
& UICEtave(i,j,1,bi,bj) +UICE(i,j,1,bi,bj)*deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
258 |
SEAICE_DO_DIAGS |
& VICEtave(i,j,1,bi,bj) +VICE(i,j,1,bi,bj)*deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
260 |
SEAICE_DO_DIAGS |
& HEFFtave(i,j,1,bi,bj) +HEFF(i,j,1,bi,bj)*deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
262 |
SEAICE_DO_DIAGS |
& AREAtave(i,j,1,bi,bj) +AREA(i,j,1,bi,bj)*deltaTclock |
|
./pkg/seaice/seaice_do_diags.F |
266 |
SEAICE_DO_DIAGS |
SEAICE_TimeAve(k,bi,bj)=SEAICE_TimeAve(k,bi,bj)+deltaTclock |