File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_growth.F |
113 |
SEAICE_GROWTH |
_RL lhSublim |
./pkg/seaice/seaice_growth.F |
356 |
SEAICE_GROWTH |
lhSublim = SEAICE_lhEvap + SEAICE_lhFusion |
./pkg/seaice/seaice_growth.F |
699 |
SEAICE_GROWTH |
latentHeatFluxMaxMult(I,J,IT) = lhSublim*recip_deltaTtherm * |
./pkg/seaice/seaice_growth.F |
713 |
SEAICE_GROWTH |
latentHeatFluxMax(I,J) = lhSublim * recip_deltaTtherm * |
./pkg/seaice/seaice_growth.F |
907 |
SEAICE_GROWTH |
DIAGarrayA(I,J) = a_FWbySublim(I,J) * lhSublim |
./pkg/seaice/seaice_solve4temp.F |
108 |
SEAICE_SOLVE4TEMP |
_RL lhSublim |
./pkg/seaice/seaice_solve4temp.F |
192 |
SEAICE_SOLVE4TEMP |
lhSublim = SEAICE_lhEvap + SEAICE_lhFusion |
./pkg/seaice/seaice_solve4temp.F |
193 |
SEAICE_SOLVE4TEMP |
D1I=SEAICE_dalton*lhSublim*SEAICE_rhoAir |
./pkg/seaice/seaice_solve4temp.F |
535 |
SEAICE_SOLVE4TEMP |
FWsublim(I,J) = F_lh(I,J)/lhSublim |