| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_calc_thickn.F |
121 |
THSICE_CALC_THICKN |
_RL flxCnB (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
13 |
THSICE_CALC_THICKN |
I snowP, prcAtm, sHeat, flxCnB, |
|
./pkg/thsice/thsice_calc_thickn.F |
438 |
THSICE_CALC_THICKN |
ebot = (flxCnB(i,j)-Fbot) * dt |
|
./pkg/thsice/thsice_solve4temp.F |
112 |
THSICE_SOLVE4TEMP |
_RL flxCnB (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
16 |
THSICE_SOLVE4TEMP |
O sHeat, flxCnB, flxAtm, evpAtm, |
|
./pkg/thsice/thsice_solve4temp.F |
450 |
THSICE_SOLVE4TEMP |
flxCnB(i,j) = 4. _d 0*kIce *(Tice(2)-Tf)/hi |
|
./pkg/thsice/thsice_solve4temp.F |
472 |
THSICE_SOLVE4TEMP |
& flx0,fct,flx0-fct,flxCnB(i,j) |
|
./pkg/thsice/thsice_solve4temp.F |
511 |
THSICE_SOLVE4TEMP |
& sHeat(i,j), flxCnB(i,j), qicen |