| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_calc_thickn.F |
184 |
THSICE_CALC_THICKN |
_RL dhs |
|
./pkg/thsice/thsice_calc_thickn.F |
905 |
THSICE_CALC_THICKN |
dhs = (hSnow(i,j) - hIce(i,j)*floodFac) * rhoi / rhosw |
|
./pkg/thsice/thsice_calc_thickn.F |
906 |
THSICE_CALC_THICKN |
dhs = MAX( hSnow(i,j) - hsMax, dhs ) |
|
./pkg/thsice/thsice_calc_thickn.F |
907 |
THSICE_CALC_THICKN |
dhi = dhs * rhos / rhoi |
|
./pkg/thsice/thsice_calc_thickn.F |
908 |
THSICE_CALC_THICKN |
rqh = rhoi*qicen(i,j,1)*hnew(i,j,1) + rhos*qsnow*dhs |
|
./pkg/thsice/thsice_calc_thickn.F |
912 |
THSICE_CALC_THICKN |
hSnow(i,j) = hSnow(i,j) - dhs |