| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
135 |
SEAICE_GROWTH |
QI = 302.0 _d +06 |
|
./pkg/seaice/seaice_growth.F |
136 |
SEAICE_GROWTH |
recip_QI = 1.0 _d 0 / QI |
|
./pkg/seaice/seaice_growth.F |
575 |
SEAICE_GROWTH |
QNETI(I,J) = (growthHEFF + growthNeg)*QI/SEAICE_deltaTtherm |
|
./pkg/seaice/seaice_growth.F |
57 |
SEAICE_GROWTH |
_RL QI, recip_QI, QS |
|
./pkg/seaice/seaice_growth_if.F |
1018 |
SEAICE_GROWTH_IF |
& HEFF(I,J,bi,bj)/QI + |
|
./pkg/seaice/seaice_growth_if.F |
1040 |
SEAICE_GROWTH_IF |
& HEFF(I,J,bi,bj)/QI + |
|
./pkg/seaice/seaice_growth_if.F |
200 |
SEAICE_GROWTH_IF |
QI = 1/rhoi/Li |
|
./pkg/seaice/seaice_growth_if.F |
491 |
SEAICE_GROWTH_IF |
IceGrowthRateUnderExistingIce(I,J)=F_io_net(I,J)*QI |
|
./pkg/seaice/seaice_growth_if.F |
541 |
SEAICE_GROWTH_IF |
IceGrowthRateFromSurface(I,J) = F_ia_net(I,J)*QI |
|
./pkg/seaice/seaice_growth_if.F |
586 |
SEAICE_GROWTH_IF |
IceGrowthRateOpenWater(I,J)= QI* |
|
./pkg/seaice/seaice_growth_if.F |
624 |
SEAICE_GROWTH_IF |
IceGrowthRateMixedLayer(I,J) = F_mi(I,J)*QI |
|
./pkg/seaice/seaice_growth_if.F |
84 |
SEAICE_GROWTH_IF |
_RL RHOI, RHOFW,CPW,LI,QI,QS,GAMMAT,GAMMA,RHOSW,RHOSN |
|
./pkg/seaice/seaice_growth_if.F |
875 |
SEAICE_GROWTH_IF |
& ActualNewTotalVolumeChange(I,J)/QI |