File |
Line number |
Procedure |
Code |
./pkg/thsice/THSICE_PARAMS.h |
106 |
NO PROCEDURE |
_RL qsnow |
./pkg/thsice/THSICE_PARAMS.h |
83 |
NO PROCEDURE |
& bMeltCoef, Lfresh, qsnow, |
./pkg/thsice/thsice_advdiff.F |
495 |
THSICE_ADVDIFF |
oceQnet(i,j,bi,bj) = -( rhos*snowHeight(i,j,bi,bj)*qsnow |
./pkg/thsice/thsice_calc_thickn.F |
1066 |
THSICE_CALC_THICKN |
rs = rhos * qsnow |
./pkg/thsice/thsice_calc_thickn.F |
504 |
THSICE_CALC_THICKN |
rq = rhos * qsnow |
./pkg/thsice/thsice_calc_thickn.F |
640 |
THSICE_CALC_THICKN |
rq = rhos * qsnow |
./pkg/thsice/thsice_calc_thickn.F |
674 |
THSICE_CALC_THICKN |
esurp(i,j) = esurp(i,j) - rhos*qsnow*hSnow1(i,j) |
./pkg/thsice/thsice_calc_thickn.F |
843 |
THSICE_CALC_THICKN |
esurp(i,j) = esurp(i,j) - rhos*qsnow*hSnow1(i,j) |
./pkg/thsice/thsice_calc_thickn.F |
914 |
THSICE_CALC_THICKN |
rqh = rhoi*qicen(i,j,1)*hnew(i,j,1) + rhos*qsnow*dhs |
./pkg/thsice/thsice_check_conserv.F |
67 |
THSICE_CHECK_CONSERV |
dEnerg= -rhos*snowHeight(i,j,bi,bj)*qsnow |
./pkg/thsice/thsice_check_conserv.F |
76 |
THSICE_CHECK_CONSERV |
& + compact*( rhos*hSnow*qsnow |
./pkg/thsice/thsice_readparms.F |
118 |
THSICE_READPARMS |
qsnow = Lfresh |
./pkg/thsice/thsice_readparms.F |
302 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'qsnow =', qsnow |
./pkg/thsice/thsice_readparms.F |
55 |
THSICE_READPARMS |
& bMeltCoef, Lfresh, qsnow, |