Symbol Description Uses
SlopeY isopycnal slope in y direction 74


File Line number Procedure Code
./pkg/gmredi/gmredi_calc_psi_b.F 101 GMREDI_CALC_PSI_B 
         SlopeY(i,j)       = 0. _d 0
./pkg/gmredi/gmredi_calc_psi_b.F 119 GMREDI_CALC_PSI_B 
         SlopeY(i,j)=op5*( sigmaY(i,j,km1)+sigmaY(i,j,k) )
./pkg/gmredi/gmredi_calc_psi_b.F 129 GMREDI_CALC_PSI_B 
     U             SlopeX, SlopeY,
./pkg/gmredi/gmredi_calc_psi_b.F 170 GMREDI_CALC_PSI_B 
         GM_PsiY(i,j,k,bi,bj) = SlopeY(i,j)*taperY(i,j)
./pkg/gmredi/gmredi_calc_psi_b.F 67 GMREDI_CALC_PSI_B 
      _RL SlopeY(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/gmredi/gmredi_calc_tensor.F 1007 GMREDI_CALC_TENSOR 
     &     )*SlopeY(i,j)*taperFct(i,j)
./pkg/gmredi/gmredi_calc_tensor.F 1036 GMREDI_CALC_TENSOR 
     &                 )*SlopeY(i,j)*taperFct(i,j)
./pkg/gmredi/gmredi_calc_tensor.F 301 GMREDI_CALC_TENSOR 
         SlopeY(i,j)       = 0. _d 0
./pkg/gmredi/gmredi_calc_tensor.F 423 GMREDI_CALC_TENSOR 
     O             SlopeX, SlopeY,
./pkg/gmredi/gmredi_calc_tensor.F 436 GMREDI_CALC_TENSOR 
         SlopeY(i,j)=SlopeY(i,j)*maskC(i,j,k,bi,bj)
./pkg/gmredi/gmredi_calc_tensor.F 453 GMREDI_CALC_TENSOR 
          Kwy(i,j,k,bi,bj)= SlopeY(i,j)*taperFct(i,j)
./pkg/gmredi/gmredi_calc_tensor.F 702 GMREDI_CALC_TENSOR 
     O             SlopeX, SlopeY,
./pkg/gmredi/gmredi_calc_tensor.F 77 GMREDI_CALC_TENSOR 
      _RL SlopeY(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/gmredi/gmredi_calc_tensor.F 917 GMREDI_CALC_TENSOR 
     O             SlopeX, SlopeY,
./pkg/gmredi/gmredi_k3d.F 1113 GMREDI_K3D 
        CALL DIAGNOSTICS_FILL(SlopeY, 'GM_Sy   ',0,Nr,2,bi,bj,myThid)
./pkg/gmredi/gmredi_k3d.F 142 GMREDI_K3D 
      _RL SlopeY(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr)
./pkg/gmredi/gmredi_k3d.F 329 GMREDI_K3D 
         SlopeY(i,j,k)=zeroRL
./pkg/gmredi/gmredi_k3d.F 639 GMREDI_K3D 
        SlopeY(i,j,1) = zeroRL
./pkg/gmredi/gmredi_k3d.F 649 GMREDI_K3D 
           SlopeY(i,j,k) = zeroRL
./pkg/gmredi/gmredi_k3d.F 666 GMREDI_K3D 
           SlopeY(i,j,k)=-maskS(i,j,k-1,bi,bj)*maskS(i,j,k,bi,bj)*slope
./pkg/gmredi/gmredi_k3d.F 682 GMREDI_K3D 
           tfluxY(i,j,k) = -fCoriV(i,j)*SlopeY(i,j,k)
./pkg/gmredi/gmredi_k3d.F 701 GMREDI_K3D 
         tfluxY(i,j,k)=-fCoriV(i,j)*(SlopeY(i,j,k)-SlopeY(i,j,k+1))
./pkg/gmredi/gmredi_k3d.F 757 GMREDI_K3D 
     &                  *SlopeY(i,j,kk)/hsurf
./pkg/gmredi/gmredi_k3d.F 760 GMREDI_K3D 
     &                  *( SlopeY(i,j,kk)-SlopeY(i,j,kk+1) )/hsurf
./pkg/gmredi/gmredi_slope_limit.F 13 GMREDI_SLOPE_LIMIT 
     O             SlopeX, SlopeY,
./pkg/gmredi/gmredi_slope_limit.F 201 GMREDI_SLOPE_LIMIT 
           SlopeY(i,j) = 0. _d 0
./pkg/gmredi/gmredi_slope_limit.F 205 GMREDI_SLOPE_LIMIT 
           SlopeY(i,j)=-dSigmaDy(i,j)*dRdSigmaLtd(i,j)
./pkg/gmredi/gmredi_slope_limit.F 218 GMREDI_SLOPE_LIMIT 
     &                 +SlopeY(i,j)*SlopeY(i,j)
./pkg/gmredi/gmredi_slope_limit.F 241 GMREDI_SLOPE_LIMIT 
            SlopeY  (i,j) = 0. _d 0
./pkg/gmredi/gmredi_slope_limit.F 253 GMREDI_SLOPE_LIMIT 
            SlopeY  (i,j) = dSigmaDy(i,j)/locVar(i,j)
./pkg/gmredi/gmredi_slope_limit.F 258 GMREDI_SLOPE_LIMIT 
            SlopeY  (i,j) = 0. _d 0
./pkg/gmredi/gmredi_slope_limit.F 363 GMREDI_SLOPE_LIMIT 
            SlopeY(i,j) = SlopeY(i,j)*Smod*taperFctLoc
./pkg/gmredi/gmredi_slope_limit.F 375 GMREDI_SLOPE_LIMIT 
            SlopeY(i,j) = SlopeY(i,j)*Smod
./pkg/gmredi/gmredi_slope_limit.F 417 GMREDI_SLOPE_LIMIT 
             SlopeY(i,j)=-dSigmaDy(i,j)
./pkg/gmredi/gmredi_slope_limit.F 476 GMREDI_SLOPE_LIMIT 
            SlopeY(i,j) = SIGN( GM_bigSlope, dSigmaDy(i,j) )
./pkg/gmredi/gmredi_slope_limit.F 478 GMREDI_SLOPE_LIMIT 
            SlopeY(i,j) = 0. _d 0
./pkg/gmredi/gmredi_slope_limit.F 483 GMREDI_SLOPE_LIMIT 
           SlopeY(i,j)=-dSigmaDy(i,j)*dRdSigmaLtd(i,j)
./pkg/gmredi/gmredi_slope_limit.F 498 GMREDI_SLOPE_LIMIT 
     &                   +SlopeY(i,j)*SlopeY(i,j)
./pkg/gmredi/gmredi_slope_limit.F 601 GMREDI_SLOPE_LIMIT 
     &              +SlopeY(i,j)*SlopeY(i,j)
./pkg/gmredi/gmredi_slope_limit.F 606 GMREDI_SLOPE_LIMIT 
           SlopeY(i,j)=SlopeY(i,j)*slopeMax/slopeTmp
./pkg/gmredi/gmredi_slope_limit.F 609 GMREDI_SLOPE_LIMIT 
     &                   +SlopeY(i,j)*SlopeY(i,j)
./pkg/gmredi/gmredi_slope_limit.F 82 GMREDI_SLOPE_LIMIT 
      _RL SlopeY     (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/gmredi/gmredi_slope_psi.F 12 GMREDI_SLOPE_PSI 
     U             SlopeX, SlopeY,
./pkg/gmredi/gmredi_slope_psi.F 151 GMREDI_SLOPE_PSI 
     &     ABS(SlopeY(i,j))*GM_rMaxSlope)
./pkg/gmredi/gmredi_slope_psi.F 169 GMREDI_SLOPE_PSI 
          SlopeY(i,j) = -SlopeY(i,j)/dSigmaDrS(i,j)
./pkg/gmredi/gmredi_slope_psi.F 240 GMREDI_SLOPE_PSI 
          SlopeY(i,j) = -SlopeY(i,j)/dSigmaDrS(i,j)
./pkg/gmredi/gmredi_slope_psi.F 250 GMREDI_SLOPE_PSI 
          IF ( ABS(SlopeY(i,j)) .GE. slopeCutoff ) THEN
./pkg/gmredi/gmredi_slope_psi.F 251 GMREDI_SLOPE_PSI 
             SlopeY(i,j) = SIGN(slopeCutoff,SlopeY(i,j))
./pkg/gmredi/gmredi_slope_psi.F 278 GMREDI_SLOPE_PSI 
          Smod = ABS(SlopeY(i,j))
./pkg/gmredi/gmredi_slope_psi.F 299 GMREDI_SLOPE_PSI 
          IF ( ABS(SlopeY(i,j)) .GT. GM_maxSlope .AND.
./pkg/gmredi/gmredi_slope_psi.F 300 GMREDI_SLOPE_PSI 
     &           ABS(SlopeY(i,j)) .LT. slopeCutoff )
./pkg/gmredi/gmredi_slope_psi.F 302 GMREDI_SLOPE_PSI 
     &           ( SlopeY(i,j)*SlopeY(i,j) + GM_Small_Number )
./pkg/gmredi/gmredi_slope_psi.F 317 GMREDI_SLOPE_PSI 
          Smod = ABS(SlopeY(i,j))
./pkg/gmredi/gmredi_slope_psi.F 348 GMREDI_SLOPE_PSI 
          Smod = ABS(SlopeY(i,j))
./pkg/gmredi/gmredi_slope_psi.F 395 GMREDI_SLOPE_PSI 
       slopeTmpSpec=ABS(SlopeY(i,j))
./pkg/gmredi/gmredi_slope_psi.F 397 GMREDI_SLOPE_PSI 
        SlopeY(i,j)=5.*SlopeY(i,j)*slopeMaxSpec/slopeTmpSpec
./pkg/gmredi/gmredi_slope_psi.F 399 GMREDI_SLOPE_PSI 
        SlopeY(i,j)=5.*SlopeY(i,j)
./pkg/gmredi/gmredi_slope_psi.F 48 GMREDI_SLOPE_PSI 
      _RL SlopeY(1-OLx:sNx+OLx,1-OLy:sNy+OLy)