Symbol Description Uses
denom 10



File Line number Procedure Code
./pkg/exf/exf_interpolate.F 37 NO PROCEDURE
        _RL numer,denom
./pkg/exf/exf_interpolate.F 40 NO PROCEDURE
        denom = 1. _d 0
./pkg/exf/exf_interpolate.F 47 NO PROCEDURE
          denom = denom*(a(i) - a(k))
./pkg/exf/exf_interpolate.F 52 NO PROCEDURE
        LAGRAN = numer/denom
./pkg/pp81/pp81_calc.F 62 PP81_CALC
      _RL     denom, PPviscTmp
./pkg/pp81/pp81_calc.F 78 PP81_CALC
          denom = 1.0 + PPalpha*RiLimit
./pkg/pp81/pp81_calc.F 81 PP81_CALC
          denom = 1.0 + PPalpha*RiNumber(I,J)
./pkg/pp81/pp81_calc.F 82 PP81_CALC
          PPviscTmp = PPnu0/(denom**PPnRi)
./pkg/pp81/pp81_calc.F 86 PP81_CALC
         PPdiffKr(I,J,K,bi,bj) = MAX(PPviscAr(I,J,K,bi,bj)/denom,