Symbol Description Uses
sigmaR Vertical gradient of potential density 80


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 170 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/gmredi/gmredi_calc_psi_b.F 111 GMREDI_CALC_PSI_B 
         dSigmaDrW(i,j)=op5*( sigmaR(i-1,j,k)+sigmaR(i,j,k) )
./pkg/gmredi/gmredi_calc_psi_b.F 119 GMREDI_CALC_PSI_B 
         dSigmaDrS(i,j)=op5*( sigmaR(i,j-1,k)+sigmaR(i,j,k) )
./pkg/gmredi/gmredi_calc_psi_b.F 14 GMREDI_CALC_PSI_B 
     I             sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_psi_b.F 49 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 192 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 1066 GMREDI_CALC_TENSOR_DUMMY 
     I             sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_tensor.F 1087 GMREDI_CALC_TENSOR_DUMMY 
      _RL sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/gmredi/gmredi_calc_tensor.F 17 GMREDI_CALC_TENSOR 
     I             sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_tensor.F 281 GMREDI_CALC_TENSOR 
     I       sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_tensor.F 329 GMREDI_CALC_TENSOR 
          dSigmaDr(i,j) = MIN( sigmaR(i,j,k), 0. _d 0 )
./pkg/gmredi/gmredi_calc_tensor.F 405 GMREDI_CALC_TENSOR 
         dSigmaDr(i,j)=sigmaR(i,j,k)
./pkg/gmredi/gmredi_calc_tensor.F 585 GMREDI_CALC_TENSOR 
     I             sigmaX, sigmaY, sigmaR,
./pkg/gmredi/gmredi_calc_tensor.F 595 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 61 GMREDI_CALC_TENSOR 
      _RL sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./pkg/gmredi/gmredi_calc_tensor.F 667 GMREDI_CALC_TENSOR 
         dSigmaDr(i,j)=op25*( sigmaR(i-1,j, k )+sigmaR(i,j, k )
./pkg/gmredi/gmredi_calc_tensor.F 668 GMREDI_CALC_TENSOR 
     &                      +(sigmaR(i-1,j,kp1)+sigmaR(i,j,kp1))*maskp1
./pkg/gmredi/gmredi_calc_tensor.F 867 GMREDI_CALC_TENSOR 
         dSigmaDr(i,j)=op25*( sigmaR(i,j-1, k )+sigmaR(i,j, k )
./pkg/gmredi/gmredi_calc_tensor.F 868 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 374 GMREDI_K3D 
         N2(i,j,k) = -gravity*recip_rhoConst*sigmaR(i,j,k)
./pkg/gmredi/gmredi_k3d.F 38 GMREDI_K3D 
      _RL sigmaR(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr)
./pkg/gmredi/gmredi_k3d.F 642 GMREDI_K3D 
           sigz  = MIN( op5*(sigmaR(i,j,k)+sigmaR(i-1,j,k)), maxDRhoDz )
./pkg/gmredi/gmredi_k3d.F 650 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 45 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 47 PP81_CALC 
      _RL     sigmaR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./model/src/do_oceanic_phys.F 127 DO_OCEANIC_PHYS 
      _RL sigmaR  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr)
./model/src/do_oceanic_phys.F 543 DO_OCEANIC_PHYS 
           sigmaR(i,j,k) = 0. _d 0
./model/src/do_oceanic_phys.F 777 DO_OCEANIC_PHYS 
     O             sigmaX, sigmaY, sigmaR,
./model/src/do_oceanic_phys.F 783 DO_OCEANIC_PHYS 
              sigmaRfield(i,j,k,bi,bj)=sigmaR(i,j,k)
./model/src/do_oceanic_phys.F 794 DO_OCEANIC_PHYS 
            CALL ZERO_ADJ_LOC( Nr, sigmaR, myThid)
./model/src/do_oceanic_phys.F 806 DO_OCEANIC_PHYS 
     I        sigmaR,
./model/src/do_oceanic_phys.F 831 DO_OCEANIC_PHYS 
     I              rhoInSitu(1-OLx,1-OLy,1,bi,bj), sigmaR,
./model/src/do_oceanic_phys.F 838 DO_OCEANIC_PHYS 
     I              rhoInSitu(1-OLx,1-OLy,1,bi,bj), sigmaR,
./model/src/do_oceanic_phys.F 862 DO_OCEANIC_PHYS 
          CALL DIAGNOSTICS_FILL (sigmaR, 'DRHODR  ', 0, Nr,
./model/src/do_oceanic_phys.F 914 DO_OCEANIC_PHYS 
     I                     bi, bj, sigmaR, myTime, myIter, myThid )
./model/src/do_oceanic_phys.F 925 DO_OCEANIC_PHYS 
     I                     bi, bj, sigmaR, myTime, myIter, myThid )
./model/src/do_oceanic_phys.F 936 DO_OCEANIC_PHYS 
     I                     bi, bj, sigmaR, myTime, myIter, myThid )
./model/src/do_oceanic_phys.F 952 DO_OCEANIC_PHYS 
     I                     bi, bj, sigmaR, myTime, myIter, myThid )
./model/src/do_oceanic_phys.F 990 DO_OCEANIC_PHYS 
     I             sigmaX, sigmaY, sigmaR,
./model/src/do_oceanic_phys.F 996 DO_OCEANIC_PHYS 
     I             sigmaX, sigmaY, sigmaR,
./pkg/salt_plume/salt_plume_calc_depth.F 10 SALT_PLUME_CALC_DEPTH 
     I                       rhoSurf, sigmaR,
./pkg/salt_plume/salt_plume_calc_depth.F 153 SALT_PLUME_CALC_DEPTH 
           GG  =-1.0*sigmaR(i,j,k)
./pkg/salt_plume/salt_plume_calc_depth.F 154 SALT_PLUME_CALC_DEPTH 
           GGm1=-1.0*sigmaR(i,j,k-1)
./pkg/salt_plume/salt_plume_calc_depth.F 44 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