| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_calc_thickn.F |
131 |
THSICE_CALC_THICKN |
_RL frw2oc (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
16 |
THSICE_CALC_THICKN |
O frw2oc, fsalt, |
|
./pkg/thsice/thsice_calc_thickn.F |
910 |
THSICE_CALC_THICKN |
frw2oc(i,j) = fresh |
|
./pkg/thsice/thsice_extend.F |
15 |
THSICE_EXTEND |
O flx2oc, frw2oc, fsalt, |
|
./pkg/thsice/thsice_extend.F |
208 |
THSICE_EXTEND |
frw2oc(i,j)= -rhoi*iceFormed/deltaTice |
|
./pkg/thsice/thsice_extend.F |
217 |
THSICE_EXTEND |
& iceFrac,flx2oc(i,j),fsalt(i,j),frw2oc(i,j) |
|
./pkg/thsice/thsice_extend.F |
223 |
THSICE_EXTEND |
I flx2oc(i,j), frw2oc(i,j), fsalt(i,j), |
|
./pkg/thsice/thsice_extend.F |
88 |
THSICE_EXTEND |
_RL frw2oc (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_step_fwd.F |
235 |
THSICE_STEP_FWD |
O frw2oc, fsalt, |
|
./pkg/thsice/thsice_step_fwd.F |
265 |
THSICE_STEP_FWD |
pass_evap(i,j) = pass_evap(i,j) - icFrac*frw2oc(i,j)/rhofw |
|
./pkg/thsice/thsice_step_fwd.F |
273 |
THSICE_STEP_FWD |
EmPmR(i,j,bi,bj)= -icFrac*frw2oc(i,j) |
|
./pkg/thsice/thsice_step_fwd.F |
308 |
THSICE_STEP_FWD |
O flx2oc, frw2oc, fsalt, |
|
./pkg/thsice/thsice_step_fwd.F |
321 |
THSICE_STEP_FWD |
pass_evap(i,j) = pass_evap(i,j) - frw2oc(i,j)/rhofw |
|
./pkg/thsice/thsice_step_fwd.F |
325 |
THSICE_STEP_FWD |
EmPmR(i,j,bi,bj)= EmPmR(i,j,bi,bj)- frw2oc(i,j) |
|
./pkg/thsice/thsice_step_fwd.F |
90 |
THSICE_STEP_FWD |
_RL frw2oc (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |