| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_calc_thickn.F |
1002 |
THSICE_CALC_THICKN |
& esurp(i,j)/dt,etop(i,j)/dt,ebot(i,j)/dt |
|
./pkg/thsice/thsice_calc_thickn.F |
179 |
THSICE_CALC_THICKN |
_RL esurp (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./pkg/thsice/thsice_calc_thickn.F |
281 |
THSICE_CALC_THICKN |
esurp (i,j) = 0. _d 0 |
|
./pkg/thsice/thsice_calc_thickn.F |
323 |
THSICE_CALC_THICKN |
esurp(i,j) = 0. _d 0 |
|
./pkg/thsice/thsice_calc_thickn.F |
449 |
THSICE_CALC_THICKN |
esurp(i,j) = sHeat(i,j) * dt |
|
./pkg/thsice/thsice_calc_thickn.F |
671 |
THSICE_CALC_THICKN |
esurp(i,j) = esurp(i,j) - rhos*qsnow*hSnow(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
682 |
THSICE_CALC_THICKN |
& 'ThSI_CALC_TH: -1 : esurp=',esurp(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
790 |
THSICE_CALC_THICKN |
esurp(i,j) = esurp(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
837 |
THSICE_CALC_THICKN |
esurp(i,j) = esurp(i,j) - rhos*qsnow*hSnow(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
849 |
THSICE_CALC_THICKN |
& esurp(i,j), frw2oc(i,j) |
|
./pkg/thsice/thsice_calc_thickn.F |
998 |
THSICE_CALC_THICKN |
& + (Fbot(i,j)+(esurp(i,j)+etop(i,j)+ebot(i,j))/dt) |
|
./pkg/thsice/thsice_extend.F |
164 |
THSICE_EXTEND |
esurp = fzMlOc(i,j) |
|
./pkg/thsice/thsice_extend.F |
182 |
THSICE_EXTEND |
newIce = esurp*deltaTice/qicAv |
|
./pkg/thsice/thsice_extend.F |
95 |
THSICE_EXTEND |
_RL esurp |