| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
273 |
SEAICE_GROWTH |
_RL latentHeatFluxMax (1:sNx,1:sNy) |
|
./pkg/seaice/seaice_growth.F |
458 |
SEAICE_GROWTH |
latentHeatFluxMax(I,J) = 0.0 _d 0 |
|
./pkg/seaice/seaice_growth.F |
713 |
SEAICE_GROWTH |
latentHeatFluxMax(I,J) = lhSublim * recip_deltaTtherm * |
|
./pkg/seaice/seaice_growth.F |
717 |
SEAICE_GROWTH |
latentHeatFluxMax(I,J) = ZERO |
|
./pkg/seaice/seaice_growth.F |
809 |
SEAICE_GROWTH |
latentHeatFluxMaxMult(I,J,IT) = latentHeatFluxMax(I,J)*pFac |
|
./pkg/seaice/seaice_growth.F |
914 |
SEAICE_GROWTH |
CALL DIAGNOSTICS_FILL(latentHeatFluxMax, |