Symbol Description Uses
FORCEY 34



File Line number Procedure Code
./pkg/seaice/SEAICE.h 103 NO PROCEDURE
      _RL FORCEY     (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/seaice/SEAICE.h 87 NO PROCEDURE
     &     FORCEX,FORCEY,
./pkg/seaice/dynsolver.F 153 DYNSOLVER
          FORCEY(I,J,bi,bj)=DAIRN(I,J,bi,bj)*
./pkg/seaice/dynsolver.F 198 DYNSOLVER
          FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)
./pkg/seaice/dynsolver.F 205 DYNSOLVER
          FORCEY0(I,J,bi,bj)=FORCEY(I,J,bi,bj)
./pkg/seaice/dynsolver.F 215 DYNSOLVER
          FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)
./pkg/seaice/dynsolver.F 219 DYNSOLVER
          FORCEY0(I,J,bi,bj)=FORCEY(I,J,bi,bj)
./pkg/seaice/lsr.F 1024 LSR
     &        +FORCEY(I,J,bi,bj)
./pkg/seaice/lsr.F 245 LSR
          FORCEY(I,J,bi,bj)=FORCEY0(I,J,bi,bj)+DWATN(I,J,bi,bj)
./pkg/seaice/lsr.F 256 LSR
          FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)
./pkg/seaice/lsr.F 263 LSR
          FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)
./pkg/seaice/lsr.F 266 LSR
          FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)*UVM(I,J,bi,bj)
./pkg/seaice/lsr.F 459 LSR
     &         +FORCEY(I,J,bi,bj)
./pkg/seaice/seaice_calc_rhs.F 82 SEAICE_CALC_RHS
          vIceRHS(I,J,bi,bj) = FORCEY(I,J,bi,bj) + (
./pkg/seaice/seaice_evp.F 502 SEAICE_EVP
            FORCEY(I,J,bi,bj)=FORCEY0(I,J,bi,bj)+
./pkg/seaice/seaice_evp.F 520 SEAICE_EVP
            FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj) - 0.5 _d 0*(
./pkg/seaice/seaice_evp.F 549 SEAICE_EVP
     &           + FORCEY(I,J,bi,bj)
./pkg/seaice/seaice_init_varia.F 279 SEAICE_INIT_VARIA
          FORCEY(i,j,bi,bj) = 0. _d 0
./pkg/seaice/seaice_jfnk.F 162 SEAICE_JFNK
          FORCEY(I,J,bi,bj) = FORCEY0(I,J,bi,bj)
./pkg/seaice/seaice_lsr.F 334 SEAICE_LSR
          FORCEY(I,J,bi,bj)=FORCEY0(I,J,bi,bj)+
./pkg/seaice/seaice_lsr.F 355 SEAICE_LSR
          FORCEY(I,J,bi,bj) = FORCEY(I,J,bi,bj) - HALF*
./pkg/seaice/seaice_lsr.F 368 SEAICE_LSR
          FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)
./pkg/seaice/seaice_lsr.F 372 SEAICE_LSR
          FORCEY(I,J,bi,bj)=FORCEY(I,J,bi,bj)* seaiceMaskV(I,J,bi,bj)
./pkg/seaice/seaice_lsr.F 393 SEAICE_LSR
          rhsV(I,J,bi,bj) = FORCEY(I,J,bi,bj) 
./pkg/seaice/seaice_lsr.F 476 SEAICE_LSR
            vIce_fd(i,j,bi,bj) = FORCEY(i,j,bi,bj)