File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_calc_thickn.F |
13 |
THSICE_CALC_THICKN |
O fresh, fsalt, Fbot, |
./pkg/thsice/thsice_calc_thickn.F |
506 |
THSICE_CALC_THICKN |
fsalt = (msalt0 - rhoi*hi*saltice)/dt |
./pkg/thsice/thsice_calc_thickn.F |
509 |
THSICE_CALC_THICKN |
& (mwater0-(rhos*hs+rhoi*hi))/dt,evap,fresh,fsalt |
./pkg/thsice/thsice_calc_thickn.F |
527 |
THSICE_CALC_THICKN |
fsalt=fsalt+extend/rqh*salte |
./pkg/thsice/thsice_calc_thickn.F |
534 |
THSICE_CALC_THICKN |
fsalt=fsalt+salte |
./pkg/thsice/thsice_calc_thickn.F |
65 |
THSICE_CALC_THICKN |
_RL fsalt |
./pkg/thsice/thsice_check_conserv.F |
11 |
THSICE_CHECK_CONSERV |
I qleft, ffresh, fsalt, flxAtm, frwAtm, |
./pkg/thsice/thsice_check_conserv.F |
39 |
THSICE_CHECK_CONSERV |
_RL qleft, fsalt, ffresh |
./pkg/thsice/thsice_check_conserv.F |
77 |
THSICE_CHECK_CONSERV |
& -ffresh-frwAtm,-fsalt |
./pkg/thsice/thsice_check_conserv.F |
80 |
THSICE_CHECK_CONSERV |
dSalt = dSalt - thSIce_deltaT*flxFrac*fsalt |
./pkg/thsice/thsice_extend.F |
111 |
THSICE_EXTEND |
fsalt=-(rhoi*iceThick*saltice)*newIceFrac/deltaTice |
./pkg/thsice/thsice_extend.F |
12 |
THSICE_EXTEND |
O qleft, fresh, fsalt, |
./pkg/thsice/thsice_extend.F |
55 |
THSICE_EXTEND |
_RL fsalt |
./pkg/thsice/thsice_step_fwd.F |
220 |
THSICE_STEP_FWD |
O frw2oc, fsalt, Fbot, |
./pkg/thsice/thsice_step_fwd.F |
245 |
THSICE_STEP_FWD |
& compact,flx2oc,fsalt,frw2oc |
./pkg/thsice/thsice_step_fwd.F |
250 |
THSICE_STEP_FWD |
I flx2oc, frw2oc, fsalt, flxAtm(i,j), frwAtm, |
./pkg/thsice/thsice_step_fwd.F |
272 |
THSICE_STEP_FWD |
saltFlux(i,j,bi,bj)=-icFrac*fsalt |
./pkg/thsice/thsice_step_fwd.F |
302 |
THSICE_STEP_FWD |
O flx2oc, frw2oc, fsalt, |
./pkg/thsice/thsice_step_fwd.F |
306 |
THSICE_STEP_FWD |
& ,compact,flx2oc,fsalt,frw2oc |
./pkg/thsice/thsice_step_fwd.F |
312 |
THSICE_STEP_FWD |
I flx2oc, frw2oc, fsalt, tmpflx(1), tmpflx(2), |
./pkg/thsice/thsice_step_fwd.F |
329 |
THSICE_STEP_FWD |
saltFlux(i,j,bi,bj)=saltFlux(i,j,bi,bj) - fsalt |
./pkg/thsice/thsice_step_fwd.F |
84 |
THSICE_STEP_FWD |
_RL fsalt |