Symbol Description Uses
N2loc 6



File Line number Procedure Code
./pkg/gmredi/gmredi_calc_tensor.F 100 GMREDI_CALC_TENSOR
      _RL N2loc, SNloc
./pkg/gmredi/gmredi_calc_tensor.F 346 GMREDI_CALC_TENSOR
             N2loc = -gravity*recip_rhoConst*dSigmaR
./pkg/gmredi/gmredi_calc_tensor.F 348 GMREDI_CALC_TENSOR
             IF ( N2loc.GT.0. _d 0 ) THEN
./pkg/gmredi/gmredi_calc_tensor.F 349 GMREDI_CALC_TENSOR
               SNloc = Sloc*SQRT(N2loc)
./pkg/gmredi/gmredi_calc_tensor.F 441 GMREDI_CALC_TENSOR
         N2loc = -gravity*recip_rhoConst*dSigmaDr(i,j)
./pkg/gmredi/gmredi_calc_tensor.F 442 GMREDI_CALC_TENSOR
         SNloc = SQRT(Ssq(i,j)*N2loc )