File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_calc_thickn.F |
10 |
THSICE_CALC_THICKN |
I frzmlt, Tf, oceTs, oceV2s, snowPr, |
./pkg/thsice/thsice_calc_thickn.F |
156 |
THSICE_CALC_THICKN |
Fbot = cpchr*(Tf-oceTs)*ustar ! < 0 |
./pkg/thsice/thsice_calc_thickn.F |
53 |
THSICE_CALC_THICKN |
_RL oceTs, oceV2s, snowPr |
./pkg/thsice/thsice_step_fwd.F |
188 |
THSICE_STEP_FWD |
oceTs = tOceMxL(i,j,bi,bj) |
./pkg/thsice/thsice_step_fwd.F |
190 |
THSICE_STEP_FWD |
frzmltMxL = (TFrzOce-oceTs)*cphm/ocean_deltaT |
./pkg/thsice/thsice_step_fwd.F |
202 |
THSICE_STEP_FWD |
& oceTs, TFrzOce, frzmltMxL,Qnet(i,j,bi,bj) |
./pkg/thsice/thsice_step_fwd.F |
217 |
THSICE_STEP_FWD |
I frzmltMxL, TFrzOce, oceTs, oceV2s, snowPr, |
./pkg/thsice/thsice_step_fwd.F |
301 |
THSICE_STEP_FWD |
U oceTs, compact, hIce, hSnow, qicen, |
./pkg/thsice/thsice_step_fwd.F |
345 |
THSICE_STEP_FWD |
Tsrf(i,j,bi,bj) = oceTs |
./pkg/thsice/thsice_step_fwd.F |
88 |
THSICE_STEP_FWD |
_RL oceV2s, oceTs |