File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_growth.F |
1015 |
SEAICE_GROWTH |
tmpscal0=HEFF(I,J,bi,bj) |
./pkg/seaice/seaice_growth.F |
1021 |
SEAICE_GROWTH |
tmpscal2 = MAX(-tmpscal0,tmpscal1) |
./pkg/seaice/seaice_growth.F |
1059 |
SEAICE_GROWTH |
& /(tmpscal0+.00001 _d 0) |
./pkg/seaice/seaice_growth.F |
1264 |
SEAICE_GROWTH |
tmpscal0 = -MAX(HEFF(I,J,bi,bj)-MAX_HEFF,0. _d 0) |
./pkg/seaice/seaice_growth.F |
1265 |
SEAICE_GROWTH |
d_HEFFbyNeg(I,J) = d_HEFFbyNeg(I,J) + tmpscal0 |
./pkg/seaice/seaice_growth.F |
1266 |
SEAICE_GROWTH |
HEFF(I,J,bi,bj) = HEFF(I,J,bi,bj) + tmpscal0 |
./pkg/seaice/seaice_growth.F |
167 |
SEAICE_GROWTH |
_RL tmpscal0 |