File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_growth.F |
112 |
SEAICE_GROWTH |
_RL QI, QS, recip_QI |
./pkg/seaice/seaice_growth.F |
350 |
SEAICE_GROWTH |
QI = SEAICE_rhoIce*SEAICE_lhFusion |
./pkg/seaice/seaice_growth.F |
351 |
SEAICE_GROWTH |
recip_QI = ONE / QI |
./pkg/seaice/seaice_growth.F |
363 |
SEAICE_GROWTH |
convertQ2HI=SEAICE_deltaTtherm/QI |