Symbol Description Uses
sigmaR Vertical gradient of potential density 84



File Line number Procedure Code
./pkg/ggl90/ggl90_calc.F 11 GGL90_CALC
     I                 bi, bj, sigmaR, myTime, myIter, myThid )
./pkg/ggl90/ggl90_calc.F 209 GGL90_CALC
     &   bi, bj, hFacI, recip_hFacI, sigmaR, myTime, myIter, myThid )
./pkg/ggl90/ggl90_calc.F 219 GGL90_CALC
     &                  * sigmaR(i,j,k)
./pkg/ggl90/ggl90_calc.F 50 GGL90_CALC
      _RL     sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/ggl90/ggl90_idemix.F 10 GGL90_IDEMIX
     I     bi, bj, hFacI, recip_hFacI, sigmaR, myTime, myIter, myThid )
./pkg/ggl90/ggl90_idemix.F 116 GGL90_IDEMIX
     &                  * sigmaR(i,j,k)
./pkg/ggl90/ggl90_idemix.F 51 GGL90_IDEMIX
      _RL     sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/gmredi/gmredi_calc_psi_b.F 113 GMREDI_CALC_PSI_B
         dSigmaDrW(i,j)=op5*( sigmaR(i-1,j,k)+sigmaR(i,j,k) )
./pkg/gmredi/gmredi_calc_psi_b.F 121 GMREDI_CALC_PSI_B
         dSigmaDrS(i,j)=op5*( sigmaR(i,j-1,k)+sigmaR(i,j,k) )
./pkg/gmredi/gmredi_calc_psi_b.F 17 GMREDI_CALC_PSI_B
     I             sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_psi_b.F 52 GMREDI_CALC_PSI_B
      _RL sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/gmredi/gmredi_calc_psi_bvp.F 114 GMREDI_CALC_PSI_BVP
          dSigmaDrW = op5*( sigmaR(i-1,j,k)+sigmaR(i,j,k) )
./pkg/gmredi/gmredi_calc_psi_bvp.F 11 GMREDI_CALC_PSI_BVP
     I             sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_psi_bvp.F 193 GMREDI_CALC_PSI_BVP
          dSigmaDrS = op5*( sigmaR(i,j-1,k)+sigmaR(i,j,k) )
./pkg/gmredi/gmredi_calc_psi_bvp.F 43 GMREDI_CALC_PSI_BVP
      _RL sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/gmredi/gmredi_calc_tensor.F 1116 GMREDI_CALC_TENSOR_DUMMY
     I             sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_tensor.F 1137 GMREDI_CALC_TENSOR_DUMMY
      _RL sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/gmredi/gmredi_calc_tensor.F 20 GMREDI_CALC_TENSOR
     I             sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_tensor.F 284 GMREDI_CALC_TENSOR
     I       sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_tensor.F 331 GMREDI_CALC_TENSOR
          dSigmaDr(i,j) = MIN( sigmaR(i,j,k), 0. _d 0 )
./pkg/gmredi/gmredi_calc_tensor.F 407 GMREDI_CALC_TENSOR
         dSigmaDr(i,j)=sigmaR(i,j,k)
./pkg/gmredi/gmredi_calc_tensor.F 601 GMREDI_CALC_TENSOR
     I             sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_tensor.F 611 GMREDI_CALC_TENSOR
     I              sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_tensor.F 627 GMREDI_CALC_TENSOR
     I              sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_tensor.F 64 GMREDI_CALC_TENSOR
      _RL sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/gmredi/gmredi_calc_tensor.F 683 GMREDI_CALC_TENSOR
         dSigmaDr(i,j)=op25*( sigmaR(i-1,j, k )+sigmaR(i,j, k )
./pkg/gmredi/gmredi_calc_tensor.F 684 GMREDI_CALC_TENSOR
     &                      +(sigmaR(i-1,j,kp1)+sigmaR(i,j,kp1))*maskp1
./pkg/gmredi/gmredi_calc_tensor.F 900 GMREDI_CALC_TENSOR
         dSigmaDr(i,j)=op25*( sigmaR(i,j-1, k )+sigmaR(i,j, k )
./pkg/gmredi/gmredi_calc_tensor.F 901 GMREDI_CALC_TENSOR
     &                      +(sigmaR(i,j-1,kp1)+sigmaR(i,j,kp1))*maskp1
./pkg/gmredi/gmredi_k3d.F 10 GMREDI_K3D
     I     sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_k3d.F 39 GMREDI_K3D
      _RL sigmaR(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr)
./pkg/gmredi/gmredi_k3d.F 423 GMREDI_K3D
         N2(i,j,k) = -gravity*recip_rhoConst*sigmaR(i,j,k)
./pkg/gmredi/gmredi_k3d.F 653 GMREDI_K3D
           sigz  = MIN( op5*(sigmaR(i,j,k)+sigmaR(i-1,j,k)), maxDRhoDz )
./pkg/gmredi/gmredi_k3d.F 661 GMREDI_K3D
           sigz  = MIN( op5*(sigmaR(i,j,k)+sigmaR(i,j-1,k)), maxDRhoDz )
./pkg/gmredi/submeso_calc_psi.F 11 SUBMESO_CALC_PSI
     I             sigmaX, sigmaY, sigmaR,
./pkg/gmredi/submeso_calc_psi.F 122 SUBMESO_CALC_PSI
     &                  + dzLoc*MAX( -sigmaR(i,j,k), 0. _d 0 )
./pkg/gmredi/submeso_calc_psi.F 39 SUBMESO_CALC_PSI
      _RL sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/kl10/kl10_calc.F 11 KL10_CALC
     I                bi, bj, sigmaR, myTime, myIter, myThid )
./pkg/kl10/kl10_calc.F 52 KL10_CALC
      _RL     sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./model/src/calc_ivdc.F 10 CALC_IVDC
     I       sigmaR,
./model/src/calc_ivdc.F 36 CALC_IVDC
      _RL sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./model/src/calc_ivdc.F 50 CALC_IVDC
         IF ( -sigmaR(i,j,k)*gravitySign.GT.0. ) THEN
./model/src/calc_oce_mxlayer.F 11 CALC_OCE_MXLAYER
     I                       rhoSurf, sigmaR,
./model/src/calc_oce_mxlayer.F 168 CALC_OCE_MXLAYER
             IF ( -sigmaR(i,j,k+1).GT.sigmAv*hMixCriteria ) THEN
./model/src/calc_oce_mxlayer.F 171 CALC_OCE_MXLAYER
                 tmpFac = hMixCriteria*sigmaR(i,j,k)/sigmaR(i,j,k+1)
./model/src/calc_oce_mxlayer.F 41 CALC_OCE_MXLAYER
      _RL     sigmaR (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/my82/my82_calc.F 11 MY82_CALC
     I                bi, bj, sigmaR, myTime, myIter, myThid )
./pkg/my82/my82_calc.F 48 MY82_CALC
      _RL     sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/pp81/pp81_calc.F 11 PP81_CALC
     I                bi, bj, sigmaR, myTime, myIter, myThid )
./pkg/pp81/pp81_calc.F 50 PP81_CALC
      _RL     sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./model/src/do_oceanic_phys.F 1020 DO_OCEANIC_PHYS
     I                     bi, bj, sigmaR, myTime, myIter, myThid )
./model/src/do_oceanic_phys.F 1031 DO_OCEANIC_PHYS
     I                     bi, bj, sigmaR, myTime, myIter, myThid )
./model/src/do_oceanic_phys.F 1042 DO_OCEANIC_PHYS
     I                     bi, bj, sigmaR, myTime, myIter, myThid )
./model/src/do_oceanic_phys.F 1058 DO_OCEANIC_PHYS
     I                     bi, bj, sigmaR, myTime, myIter, myThid )
./model/src/do_oceanic_phys.F 1096 DO_OCEANIC_PHYS
     I             sigmaX, sigmaY, sigmaR,
./model/src/do_oceanic_phys.F 1102 DO_OCEANIC_PHYS
     I             sigmaX, sigmaY, sigmaR,
./model/src/do_oceanic_phys.F 211 DO_OCEANIC_PHYS
      _RL sigmaR  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./model/src/do_oceanic_phys.F 645 DO_OCEANIC_PHYS
           sigmaR(i,j,k) = 0. _d 0
./model/src/do_oceanic_phys.F 883 DO_OCEANIC_PHYS
     O             sigmaX, sigmaY, sigmaR,
./model/src/do_oceanic_phys.F 889 DO_OCEANIC_PHYS
              sigmaRfield(i,j,k,bi,bj)=sigmaR(i,j,k)
./model/src/do_oceanic_phys.F 900 DO_OCEANIC_PHYS
            CALL ZERO_ADJ_LOC( Nr, sigmaR, myThid)
./model/src/do_oceanic_phys.F 912 DO_OCEANIC_PHYS
     I        sigmaR,
./model/src/do_oceanic_phys.F 937 DO_OCEANIC_PHYS
     I              rhoInSitu(1-OLx,1-OLy,1,bi,bj), sigmaR,
./model/src/do_oceanic_phys.F 944 DO_OCEANIC_PHYS
     I              rhoInSitu(1-OLx,1-OLy,1,bi,bj), sigmaR,
./model/src/do_oceanic_phys.F 968 DO_OCEANIC_PHYS
          CALL DIAGNOSTICS_FILL (sigmaR, 'DRHODR  ', 0, Nr,
./pkg/salt_plume/salt_plume_calc_depth.F 13 SALT_PLUME_CALC_DEPTH
     I                       rhoSurf, sigmaR,
./pkg/salt_plume/salt_plume_calc_depth.F 156 SALT_PLUME_CALC_DEPTH
           GG  =-1.0*sigmaR(i,j,k)
./pkg/salt_plume/salt_plume_calc_depth.F 157 SALT_PLUME_CALC_DEPTH
           GGm1=-1.0*sigmaR(i,j,k-1)
./pkg/salt_plume/salt_plume_calc_depth.F 47 SALT_PLUME_CALC_DEPTH
      _RL     sigmaR (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./model/src/grad_sigma.F 102 GRAD_SIGMA
         sigmaR(i,j,k)= maskC(i,j,k,bi,bj)*maskC(i,j,k-1,bi,bj)
./model/src/grad_sigma.F 12 GRAD_SIGMA
     O             sigmaX, sigmaY, sigmaR,
./model/src/grad_sigma.F 46 GRAD_SIGMA
      _RL sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./model/src/grad_sigma.F 96 GRAD_SIGMA
         sigmaR(i,j,k)= 0. _d 0