Symbol Description Uses
dSigmaH 8



File Line number Procedure Code
./pkg/gmredi/gmredi_calc_tensor.F 105 GMREDI_CALC_TENSOR
      _RL dSigmaH, dSigmaR
./pkg/gmredi/gmredi_calc_tensor.F 374 GMREDI_CALC_TENSOR
           dSigmaH = dSigmaDx(i,j)*dSigmaDx(i,j)
./pkg/gmredi/gmredi_calc_tensor.F 376 GMREDI_CALC_TENSOR
           IF ( dSigmaH .GT. 0. _d 0 ) THEN
./pkg/gmredi/gmredi_calc_tensor.F 377 GMREDI_CALC_TENSOR
             dSigmaH = SQRT( dSigmaH )
./pkg/gmredi/gmredi_calc_tensor.F 379 GMREDI_CALC_TENSOR
             IF ( -dSigmaR.GT.dSigmaH*recipMaxSlope ) THEN
./pkg/gmredi/gmredi_calc_tensor.F 380 GMREDI_CALC_TENSOR
              Sloc = dSigmaH / ( -dSigmaR )
./pkg/gmredi/gmredi_calc_tensor.F 384 GMREDI_CALC_TENSOR
             M2loc = gravity*recip_rhoConst*dSigmaH