File |
Line number |
Procedure |
Code |
./pkg/thsice/THSICE_PARAMS.h |
120 |
NO PROCEDURE |
_RL saltIce |
./pkg/thsice/THSICE_PARAMS.h |
88 |
NO PROCEDURE |
& saltIce, S_winton, mu_Tf, |
./pkg/thsice/thsice_advdiff.F |
493 |
THSICE_ADVDIFF |
oceSflx(i,j,bi,bj) = rhoi*iceHeight(i,j,bi,bj)*saltIce |
./pkg/thsice/thsice_calc_thickn.F |
1027 |
THSICE_CALC_THICKN |
fsalt(i,j) = (msalt0(i,j) - rhoi*hIce(i,j)*saltIce)/dt |
./pkg/thsice/thsice_calc_thickn.F |
1069 |
THSICE_CALC_THICKN |
salte=(rhoi*hIce(i,j)*saltIce)/dt |
./pkg/thsice/thsice_calc_thickn.F |
396 |
THSICE_CALC_THICKN |
msalt0 (i,j) = rhoi*hIce(i,j)*saltIce |
./pkg/thsice/thsice_extend.F |
224 |
THSICE_EXTEND |
fsalt(i,j)= -(rhoi*saltIce)*iceFormed/deltaTice |
./pkg/thsice/thsice_readparms.F |
132 |
THSICE_READPARMS |
saltIce = 4. _d 0 |
./pkg/thsice/thsice_readparms.F |
316 |
THSICE_READPARMS |
WRITE(iUnit,fmtR) 'ThSI:', 'saltIce =', saltIce |
./pkg/thsice/thsice_readparms.F |
60 |
THSICE_READPARMS |
& saltIce, S_winton, mu_Tf, |
./pkg/thsice/thsice_salt_plume.F |
84 |
THSICE_SALT_PLUME |
locVar(i,j) = frzSeaWat(i,j)*( sOce(i,j) - saltIce ) |