Symbol Description Uses
QSWI 7



File Line number Procedure Code
./pkg/seaice/SEAICE.h 71 NO PROCEDURE
      COMMON/QFLUX/QNETO,QNETI,QSWO,QSWI
./pkg/seaice/SEAICE.h 85 NO PROCEDURE
      _RL QSWI       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)
./pkg/seaice/budget.F 224 BUDGET
            QSWI(I,J,bi,bj)=ZERO
./pkg/seaice/budget.F 227 BUDGET
            QSWI(I,J,bi,bj)=-(ONE-ALB(I,J))*SWDOWN(I,J,bi,bj)
./pkg/seaice/budget.F 29 BUDGET
      _RL QSWI       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,  nSx,nSy)
./pkg/seaice/budget.F 31 BUDGET
      COMMON/QFLUX/QNETO,QNETI,QSWO,QSWI
./pkg/seaice/growth.F 255 GROWTH
          QSW(I,J,bi,bj)=QSWI(I,J,bi,bj)*AR(I,J,bi,bj)