| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
1082 |
SEAICE_GROWTH |
& ( HEFF(I,J,bi,bj) - HEFFpreTH(I,J) ) |
|
./pkg/seaice/seaice_growth.F |
1277 |
SEAICE_GROWTH |
tmparr1(I,J) = (HEFF(I,J,bi,bj)-HEFFpreTH(I,J)) |
|
./pkg/seaice/seaice_growth.F |
1357 |
SEAICE_GROWTH |
IF ( (HEFFpreTH(i,j).LT.HEFF(i,j,bi,bj)).AND. |
|
./pkg/seaice/seaice_growth.F |
1359 |
SEAICE_GROWTH |
tmpscal2=tmpscal1*HEFFpreTH(i,j)/ |
|
./pkg/seaice/seaice_growth.F |
153 |
SEAICE_GROWTH |
_RL HEFFpreTH (1:sNx,1:sNy) |
|
./pkg/seaice/seaice_growth.F |
316 |
SEAICE_GROWTH |
HEFFpreTH(I,J)=HEFFNM1(I,J,bi,bj) |
|
./pkg/seaice/seaice_growth.F |
417 |
SEAICE_GROWTH |
HEFFpreTH(I,J)=HEFF(I,J,bi,bj) |
|
./pkg/seaice/seaice_growth.F |
451 |
SEAICE_GROWTH |
HEFFpreTH(I,J) = 0. _d 0 |
|
./pkg/seaice/seaice_growth.F |
472 |
SEAICE_GROWTH |
tmpscal2 = HEFFpreTH(I,J)/tmpscal1 |