| File |
Line number |
Procedure |
Code |
|
./pkg/atm2d/ATM2D_VARS.h |
10 |
NO PROCEDURE |
_RS dtcouplo ! time of coupling period (s) |
|
./pkg/atm2d/ATM2D_VARS.h |
7 |
NO PROCEDURE |
COMMON/TMSTPS4OCN/dtatmo,dtocno,dtcouplo |
|
./pkg/atm2d/atm2ocn_main.F |
41 |
ATM2OCN_MAIN |
curTime = float(iloop-1)*dtcouplo + (float(aloop)-0.5)*dtatmo |
|
./pkg/atm2d/forward_step_atm2d.F |
243 |
FORWARD_STEP_ATM2D |
iloop_ocn = nint((iloop-1)*dtcouplo/deltaTClock) + no |
|
./pkg/atm2d/init_atm2d.F |
59 |
INIT_ATM2D |
dtcouplo= dtcouple * 3600. |
|
./pkg/atm2d/init_atm2d.F |
63 |
INIT_ATM2D |
thSice_deltaT = dtcouplo |
|
./pkg/atm2d/init_atm2d.F |
65 |
INIT_ATM2D |
ocean_deltaT = dtcouplo |
|
./pkg/atm2d/norm_ocn_fluxes.F |
37 |
NORM_OCN_FLUXES |
nper= dtcouplo/dtatmo |
|
./pkg/atm2d/norm_ocn_fluxes.F |
71 |
NORM_OCN_FLUXES |
& iceMask(i,j,1,1)*dtcouplo |
|
./pkg/atm2d/norm_ocn_fluxes.F |
73 |
NORM_OCN_FLUXES |
& iceHeight(i,j,1,1)*dtcouplo |
|
./pkg/atm2d/norm_ocn_fluxes.F |
75 |
NORM_OCN_FLUXES |
& sum_iceTime(i,j)= sum_iceTime(i,j) + dtcouplo |
|
./pkg/atm2d/norm_ocn_fluxes.F |
77 |
NORM_OCN_FLUXES |
& tOceMxL(i,j,1,1)*dtcouplo |
|
./pkg/atm2d/norm_ocn_fluxes.F |
79 |
NORM_OCN_FLUXES |
& sOceMxL(i,j,1,1)*dtcouplo |
|
./pkg/atm2d/yr_end_diags.F |
39 |
YR_END_DIAGS |
norm_factor = globalArea * secYr / dtcouplo |