Symbol Description Uses
denom 10



File Line number Procedure Code
./pkg/exf/exf_interp.F 17 NO PROCEDURE
        real*8 numer,denom
./pkg/exf/exf_interp.F 20 NO PROCEDURE
        denom = 1.D0
./pkg/exf/exf_interp.F 24 NO PROCEDURE
          denom = denom*(a(i) - a(k))
./pkg/exf/exf_interp.F 29 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,