| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
138 |
SEAICE_GROWTH |
QS = 1.1 _d +08 |
|
./pkg/seaice/seaice_growth.F |
451 |
SEAICE_GROWTH |
snowEnergy=HSNOW(I,J,bi,bj)*QS |
|
./pkg/seaice/seaice_growth.F |
454 |
SEAICE_GROWTH |
HSNOW(I,J,bi,bj)=HSNOW(I,J,bi,bj)-GHEFF(I,J)/QS |
|
./pkg/seaice/seaice_growth.F |
458 |
SEAICE_GROWTH |
& frWtrIce(I,J,bi,bj) - GHEFF(I,J)/(QS*ICE2SNOW) |
|
./pkg/seaice/seaice_growth.F |
57 |
SEAICE_GROWTH |
_RL QI, recip_QI, QS |
|
./pkg/seaice/seaice_growth_if.F |
1019 |
SEAICE_GROWTH_IF |
& HSNOW(I,J,bi,bj)/QS |
|
./pkg/seaice/seaice_growth_if.F |
1041 |
SEAICE_GROWTH_IF |
& HSNOW(I,J,bi,bj)/QS |
|
./pkg/seaice/seaice_growth_if.F |
201 |
SEAICE_GROWTH_IF |
QS = 1/RHOSN/Li |
|
./pkg/seaice/seaice_growth_if.F |
497 |
SEAICE_GROWTH_IF |
PotSnowMeltRateFromSurf(I,J)= - F_ia_net(I,J)*QS |
|
./pkg/seaice/seaice_growth_if.F |
523 |
SEAICE_GROWTH_IF |
& -HSNOW_ACTUAL(I,J)/QS/SEAICE_deltaTtherm |
|
./pkg/seaice/seaice_growth_if.F |
84 |
SEAICE_GROWTH_IF |
_RL RHOI, RHOFW,CPW,LI,QI,QS,GAMMAT,GAMMA,RHOSW,RHOSN |