| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
511 |
SEAICE_GROWTH |
growthHEFF = -ONE*MIN(HEFF(I,J,bi,bj),growthNeg) |
|
./pkg/seaice/seaice_growth.F |
513 |
SEAICE_GROWTH |
DIAGarray(I,J) = growthHEFF |
|
./pkg/seaice/seaice_growth.F |
516 |
SEAICE_GROWTH |
HCORR(I,J) = MIN(ZERO,growthHEFF) |
|
./pkg/seaice/seaice_growth.F |
565 |
SEAICE_GROWTH |
growthHEFF = -ONE*MIN(HEFF(I,J,bi,bj),growthNeg) |
|
./pkg/seaice/seaice_growth.F |
567 |
SEAICE_GROWTH |
HEFF(I,J,bi,bj) = HEFF(I,J,bi,bj) + growthHEFF |
|
./pkg/seaice/seaice_growth.F |
569 |
SEAICE_GROWTH |
saltWtrIce(I,J,bi,bj) = saltWtrIce(I,J,bi,bj) + growthHEFF |
|
./pkg/seaice/seaice_growth.F |
575 |
SEAICE_GROWTH |
QNETI(I,J) = (growthHEFF + growthNeg)*QI/SEAICE_deltaTtherm |
|
./pkg/seaice/seaice_growth.F |
60 |
SEAICE_GROWTH |
_RL growthHEFF, growthNeg |