Symbol Description Uses
PPviscTmp 4


File Line number Procedure Code
./pkg/pp81/pp81_calc.F 62 PP81_CALC 
      _RL     denom, PPviscTmp
./pkg/pp81/pp81_calc.F 79 PP81_CALC 
          PPviscTmp = PPviscMax
./pkg/pp81/pp81_calc.F 82 PP81_CALC 
          PPviscTmp = PPnu0/(denom**PPnRi)
./pkg/pp81/pp81_calc.F 85 PP81_CALC 
         PPviscAr(I,J,K,bi,bj) = MAX(PPviscTmp,viscArNr(k))