| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_calc_thickn.F |
1003 |
THSICE_CALC_THICKN |
& + (Fbot(i,j)+(esurp(i,j)+etop(i,j)+ebot(i,j))/dt) |
|
./pkg/thsice/thsice_calc_thickn.F |
1035 |
THSICE_CALC_THICKN |
& flx2oc(I,J),Fbot(i,j),(etope(i,j)+ebote(i,j))/dt |
|
./pkg/thsice/thsice_calc_thickn.F |
1104 |
THSICE_CALC_THICKN |
fzMlOc(i,j) = fzMlOc(i,j) - Fbot(i,j)*iceMask(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
176 |
THSICE_CALC_THICKN |
_RL Fbot (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_calc_thickn.F |
276 |
THSICE_CALC_THICKN |
Fbot (i,j) = 0. _d 0 |
|
./pkg/thsice/thsice_calc_thickn.F |
363 |
THSICE_CALC_THICKN |
Fbot(i,j) = fzMlOc(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
366 |
THSICE_CALC_THICKN |
Fbot(i,j) = enFrcFrz(i,j)*fzMlOc(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
370 |
THSICE_CALC_THICKN |
Fbot(i,j) = 0. _d 0 |
|
./pkg/thsice/thsice_calc_thickn.F |
373 |
THSICE_CALC_THICKN |
Fbot(i,j) = (1. _d 0 - fracEnFreez)*fzMlOc(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
388 |
THSICE_CALC_THICKN |
Fbot(i,j) = cpchr*(tFrz(i,j)-tOce(i,j))*ustar |
|
./pkg/thsice/thsice_calc_thickn.F |
390 |
THSICE_CALC_THICKN |
Fbot(i,j) = max(Fbot(i,j),fzMlOc(i,j)) |
|
./pkg/thsice/thsice_calc_thickn.F |
391 |
THSICE_CALC_THICKN |
Fbot(i,j) = min(Fbot(i,j),0. _d 0) |
|
./pkg/thsice/thsice_calc_thickn.F |
401 |
THSICE_CALC_THICKN |
& frwAtm(i,j),fzMlOc(i,j),Fbot(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
463 |
THSICE_CALC_THICKN |
ebot(i,j) = (flxCnB(i,j)-Fbot(i,j)) * dt |