Symbol Description Uses
denom 10



File Line number Procedure Code
./pkg/pp81/pp81_calc.F 59 PP81_CALC
      _RL     denom, PPviscTmp
./pkg/pp81/pp81_calc.F 75 PP81_CALC
          denom = 1.0 + PPalpha*RiLimit
./pkg/pp81/pp81_calc.F 78 PP81_CALC
          denom = 1.0 + PPalpha*RiNumber(I,J)
./pkg/pp81/pp81_calc.F 79 PP81_CALC
          PPviscTmp = PPnu0/(denom**PPnRi)
./pkg/pp81/pp81_calc.F 83 PP81_CALC
         PPdiffKr(I,J,K,bi,bj) = MAX(PPviscAr(I,J,K,bi,bj)/denom,
./pkg/exf/exf_interp.F 25 NO PROCEDURE
        _RL numer,denom
./pkg/exf/exf_interp.F 28 NO PROCEDURE
        denom = 1. _d 0
./pkg/exf/exf_interp.F 35 NO PROCEDURE
          denom = denom*(a(i) - a(k))
./pkg/exf/exf_interp.F 40 NO PROCEDURE
        lagran = numer/denom