| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_calc_thickn.F |
1032 |
THSICE_CALC_THICKN |
& (mwater0(i,j)-(rhos*hSnow1(i,j)+rhoi*hIce(i,j)))/dt, |
|
./pkg/thsice/thsice_calc_thickn.F |
191 |
THSICE_CALC_THICKN |
_RL mwater0 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_calc_thickn.F |
282 |
THSICE_CALC_THICKN |
mwater0(i,j) = 0. _d 0 |
|
./pkg/thsice/thsice_calc_thickn.F |
395 |
THSICE_CALC_THICKN |
mwater0(i,j) = rhos*hSnow1(i,j) + rhoi*hIce(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
701 |
THSICE_CALC_THICKN |
frw2oc(i,j) = (mwater0(i,j) |