| File |
Line number |
Procedure |
Code |
|
./pkg/pp81/pp81_readparms.F |
105 |
PP81_READPARMS |
IF ( RiLimit .EQ. UNSET_RL ) THEN |
|
./pkg/pp81/pp81_readparms.F |
106 |
PP81_READPARMS |
RiLimit=(((PPnu0+viscAr)/PPviscMax)**(1./REAL(PPnRi))-1.) |
|
./pkg/pp81/pp81_readparms.F |
61 |
PP81_READPARMS |
RiLimit = UNSET_RL |
|
./pkg/pp81/PP81.h |
46 |
NO PROCEDURE |
_RL PPnu0, PPalpha, RiLimit |
|
./pkg/pp81/PP81.h |
50 |
NO PROCEDURE |
& PPnu0, PPalpha, RiLimit, |
|
./pkg/pp81/pp81_calc.F |
77 |
PP81_CALC |
IF ( RiNumber(I,J) .LT. RiLimit ) THEN |
|
./pkg/pp81/pp81_calc.F |
78 |
PP81_CALC |
denom = 1.0 + PPalpha*RiLimit |