Symbol Description Uses
dSigmaH 8



File Line number Procedure Code
./pkg/gmredi/gmredi_calc_tensor.F 334 GMREDI_CALC_TENSOR
           dSigmaH = dSigmaDx(i,j)*dSigmaDx(i,j)
./pkg/gmredi/gmredi_calc_tensor.F 336 GMREDI_CALC_TENSOR
           IF ( dSigmaH .GT. 0. _d 0 ) THEN
./pkg/gmredi/gmredi_calc_tensor.F 337 GMREDI_CALC_TENSOR
             dSigmaH = SQRT( dSigmaH )
./pkg/gmredi/gmredi_calc_tensor.F 339 GMREDI_CALC_TENSOR
             IF ( -dSigmaR.GT.dSigmaH*recipMaxSlope ) THEN
./pkg/gmredi/gmredi_calc_tensor.F 340 GMREDI_CALC_TENSOR
              Sloc = dSigmaH / ( -dSigmaR )
./pkg/gmredi/gmredi_calc_tensor.F 344 GMREDI_CALC_TENSOR
             M2loc = gravity*recip_rhoConst*dSigmaH
./pkg/gmredi/gmredi_calc_tensor.F 95 GMREDI_CALC_TENSOR
      _RL dSigmaH, dSigmaR