Symbol Description Uses
LrhoSup 10



File Line number Procedure Code
./pkg/gmredi/gmredi_calc_tensor.F 164 GMREDI_CALC_TENSOR
       LrhoSup = 100. _d 3
./pkg/gmredi/gmredi_calc_tensor.F 171 GMREDI_CALC_TENSOR
           ldd97_LrhoC(i,j) = LrhoSup
./pkg/gmredi/gmredi_calc_tensor.F 173 GMREDI_CALC_TENSOR
         ldd97_LrhoC(i,j) = MAX(LrhoInf,MIN(ldd97_LrhoC(i,j),LrhoSup))
./pkg/gmredi/gmredi_calc_tensor.F 179 GMREDI_CALC_TENSOR
        ldd97_LrhoW(1-OLx,j) = LrhoSup
./pkg/gmredi/gmredi_calc_tensor.F 186 GMREDI_CALC_TENSOR
           ldd97_LrhoW(i,j) = LrhoSup
./pkg/gmredi/gmredi_calc_tensor.F 188 GMREDI_CALC_TENSOR
         ldd97_LrhoW(i,j) = MAX(LrhoInf,MIN(ldd97_LrhoW(i,j),LrhoSup))
./pkg/gmredi/gmredi_calc_tensor.F 194 GMREDI_CALC_TENSOR
         ldd97_LrhoS(i,1-OLy) = LrhoSup
./pkg/gmredi/gmredi_calc_tensor.F 203 GMREDI_CALC_TENSOR
           ldd97_LrhoS(i,j) = LrhoSup
./pkg/gmredi/gmredi_calc_tensor.F 205 GMREDI_CALC_TENSOR
         ldd97_LrhoS(i,j) = MAX(LrhoInf,MIN(ldd97_LrhoS(i,j),LrhoSup))
./pkg/gmredi/gmredi_calc_tensor.F 86 GMREDI_CALC_TENSOR
      _RL Cspd, LrhoInf, LrhoSup, fCoriLoc