| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/SEAICE.h |
132 |
NO PROCEDURE |
COMMON/QFLUX/QNETO,QNETI,QSWO,QSWI |
|
./pkg/seaice/SEAICE.h |
143 |
NO PROCEDURE |
_RL QNETO (1-OLx:sNx+OLx,1-OLy:sNy+OLy, nSx,nSy) |
|
./pkg/seaice/budget.F |
125 |
BUDGET |
QNETO(I,J,bi,bj)=FICE1(I,J,bi,bj) |
|
./pkg/seaice/budget.F |
29 |
BUDGET |
_RL QNETO (1-OLx:sNx+OLx,1-OLy:sNy+OLy, nSx,nSy) |
|
./pkg/seaice/budget.F |
34 |
BUDGET |
COMMON/QFLUX/QNETO,QNETI,QSWO,QSWI |
|
./pkg/seaice/growth.F |
263 |
GROWTH |
& +(ONE-AR(I,J,bi,bj))*QNETO(I,J,bi,bj) |
|
./pkg/seaice/growth.F |
329 |
GROWTH |
& +(ONE-AR(I,J,bi,bj))*QNETO(I,J,bi,bj), QNET(I,J,bi,bj) |