| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
1065 |
SEAICE_GROWTH |
r_QbyOCN(i,j) = a_QbyOCN(i,j) |
|
./pkg/seaice/seaice_growth.F |
1124 |
SEAICE_GROWTH |
CALL ZERO_ADJ_1D( sNx*sNy, r_QbyOCN, myThid) |
|
./pkg/seaice/seaice_growth.F |
1309 |
SEAICE_GROWTH |
tmpscal1=MAX(r_QbyOCN(i,j)*areaFracFactor(I,J,IT), |
|
./pkg/seaice/seaice_growth.F |
1327 |
SEAICE_GROWTH |
r_QbyOCN(I,J)=r_QbyOCN(I,J)-d_HEFFbyOCNonICE(I,J) |
|
./pkg/seaice/seaice_growth.F |
1333 |
SEAICE_GROWTH |
d_HEFFbyOCNonICE(I,J)=MAX(r_QbyOCN(i,j), -HEFF(I,J,bi,bj)) |
|
./pkg/seaice/seaice_growth.F |
1334 |
SEAICE_GROWTH |
r_QbyOCN(I,J)=r_QbyOCN(I,J)-d_HEFFbyOCNonICE(I,J) |
|
./pkg/seaice/seaice_growth.F |
1415 |
SEAICE_GROWTH |
& + AREAITDpreTH(I,J,IT) * r_QbyOCN(I,J)) |
|
./pkg/seaice/seaice_growth.F |
1442 |
SEAICE_GROWTH |
& AREApreTH(I,J) * r_QbyOCN(I,J)) |
|
./pkg/seaice/seaice_growth.F |
1539 |
SEAICE_GROWTH |
tmpscal1=MAX(r_QbyOCN(i,j)*ICE2SNOW*areaFracFactor(I,J,IT), |
|
./pkg/seaice/seaice_growth.F |
1548 |
SEAICE_GROWTH |
r_QbyOCN(I,J)=r_QbyOCN(I,J) - tmpscal2*SNOW2ICE |
|
./pkg/seaice/seaice_growth.F |
1555 |
SEAICE_GROWTH |
tmpscal1=MAX(r_QbyOCN(i,j)*ICE2SNOW, -HSNOW(I,J,bi,bj)) |
|
./pkg/seaice/seaice_growth.F |
1562 |
SEAICE_GROWTH |
r_QbyOCN(I,J)=r_QbyOCN(I,J) |
|
./pkg/seaice/seaice_growth.F |
1599 |
SEAICE_GROWTH |
tmpscal1=r_QbyATM_open(I,J)+r_QbyOCN(i,j) * |
|
./pkg/seaice/seaice_growth.F |
240 |
SEAICE_GROWTH |
_RL r_QbyOCN (1:sNx,1:sNy) |
|
./pkg/seaice/seaice_growth.F |
435 |
SEAICE_GROWTH |
r_QbyOCN (I,J) = 0.0 _d 0 |