| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
102 |
SEAICE_GROWTH |
_RL r_QbyATM_open (1:sNx,1:sNy) |
|
./pkg/seaice/seaice_growth.F |
1384 |
SEAICE_GROWTH |
QNET(I,J,bi,bj) = r_QbyATM_cover(I,J) + r_QbyATM_open(I,J) |
|
./pkg/seaice/seaice_growth.F |
1399 |
SEAICE_GROWTH |
DIAGarray(I,J) = r_QbyATM_open(I,J) * convertHI2Q |
|
./pkg/seaice/seaice_growth.F |
260 |
SEAICE_GROWTH |
r_QbyATM_open (I,J) = 0.0 _d 0 |
|
./pkg/seaice/seaice_growth.F |
671 |
SEAICE_GROWTH |
r_QbyATM_open(I,J)=a_QbyATM_open(I,J) |
|
./pkg/seaice/seaice_growth.F |
942 |
SEAICE_GROWTH |
if ( (r_QbyATM_open(I,J).GT.0. _d 0).AND. |
|
./pkg/seaice/seaice_growth.F |
944 |
SEAICE_GROWTH |
tmpscal1=r_QbyATM_open(I,J)+r_QbyOCN(i,j) |
|
./pkg/seaice/seaice_growth.F |
959 |
SEAICE_GROWTH |
r_QbyATM_open(I,J)=r_QbyATM_open(I,J)-tmpscal3 |