Symbol Description Uses
Rnondim 10


File Line number Procedure Code
./pkg/gmredi/gmredi_slope_psi.F 318 GMREDI_SLOPE_PSI 
            Rnondim=depthZ/(LrhoW(i,j)*Smod)
./pkg/gmredi/gmredi_slope_psi.F 320 GMREDI_SLOPE_PSI 
            Rnondim=0.
./pkg/gmredi/gmredi_slope_psi.F 322 GMREDI_SLOPE_PSI 
          f2=op5*( 1. _d 0 + SIN( fpi*(Rnondim-op5)))
./pkg/gmredi/gmredi_slope_psi.F 334 GMREDI_SLOPE_PSI 
            Rnondim=depthZ/(LrhoS(i,j)*Smod)
./pkg/gmredi/gmredi_slope_psi.F 336 GMREDI_SLOPE_PSI 
            Rnondim=0.
./pkg/gmredi/gmredi_slope_psi.F 338 GMREDI_SLOPE_PSI 
          f2=op5*( 1. _d 0 + SIN( fpi*(Rnondim-op5)))
./pkg/gmredi/gmredi_slope_psi.F 61 GMREDI_SLOPE_PSI 
      _RL f1,Smod,f2,Rnondim
./pkg/gmredi/gmredi_slope_limit.F 346 GMREDI_SLOPE_LIMIT 
           Rnondim=depthZ/(Lrho(i,j)*Smod)
./pkg/gmredi/gmredi_slope_limit.F 347 GMREDI_SLOPE_LIMIT 
           f2=op5*( 1. _d 0 + sin( fpi*(Rnondim-op5)))
./pkg/gmredi/gmredi_slope_limit.F 66 GMREDI_SLOPE_LIMIT 
      _RL f1,Smod,f2,Rnondim