| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
1047 |
SEAICE_GROWTH |
r_QbyOCN(i,j) = a_QbyOCN(i,j) |
|
./pkg/seaice/seaice_growth.F |
1102 |
SEAICE_GROWTH |
CALL ZERO_ADJ_1D( sNx*sNy, r_QbyOCN, myThid) |
|
./pkg/seaice/seaice_growth.F |
1287 |
SEAICE_GROWTH |
tmpscal1=MAX(r_QbyOCN(i,j)*areaFracFactor(I,J,IT), |
|
./pkg/seaice/seaice_growth.F |
1305 |
SEAICE_GROWTH |
r_QbyOCN(I,J)=r_QbyOCN(I,J)-d_HEFFbyOCNonICE(I,J) |
|
./pkg/seaice/seaice_growth.F |
1311 |
SEAICE_GROWTH |
d_HEFFbyOCNonICE(I,J)=MAX(r_QbyOCN(i,j), -HEFF(I,J,bi,bj)) |
|
./pkg/seaice/seaice_growth.F |
1312 |
SEAICE_GROWTH |
r_QbyOCN(I,J)=r_QbyOCN(I,J)-d_HEFFbyOCNonICE(I,J) |
|
./pkg/seaice/seaice_growth.F |
1393 |
SEAICE_GROWTH |
& + AREAITDpreTH(I,J,IT) * r_QbyOCN(I,J)) |
|
./pkg/seaice/seaice_growth.F |
1420 |
SEAICE_GROWTH |
& AREApreTH(I,J) * r_QbyOCN(I,J)) |
|
./pkg/seaice/seaice_growth.F |
1517 |
SEAICE_GROWTH |
tmpscal1=MAX(r_QbyOCN(i,j)*ICE2SNOW*areaFracFactor(I,J,IT), |
|
./pkg/seaice/seaice_growth.F |
1526 |
SEAICE_GROWTH |
r_QbyOCN(I,J)=r_QbyOCN(I,J) - tmpscal2*SNOW2ICE |
|
./pkg/seaice/seaice_growth.F |
1533 |
SEAICE_GROWTH |
tmpscal1=MAX(r_QbyOCN(i,j)*ICE2SNOW, -HSNOW(I,J,bi,bj)) |
|
./pkg/seaice/seaice_growth.F |
1540 |
SEAICE_GROWTH |
r_QbyOCN(I,J)=r_QbyOCN(I,J) |
|
./pkg/seaice/seaice_growth.F |
1577 |
SEAICE_GROWTH |
tmpscal1=r_QbyATM_open(I,J)+r_QbyOCN(i,j) * |
|
./pkg/seaice/seaice_growth.F |
235 |
SEAICE_GROWTH |
_RL r_QbyOCN (1:sNx,1:sNy) |
|
./pkg/seaice/seaice_growth.F |
417 |
SEAICE_GROWTH |
r_QbyOCN (I,J) = 0.0 _d 0 |