| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_calc.F |
171 |
OPPS_CALC |
oldflux=StartingFlux |
|
./pkg/opps/opps_calc.F |
193 |
OPPS_CALC |
newflux=oldflux+e2*radius*Wd(k2)*Dd(k2)* |
|
./pkg/opps/opps_calc.F |
216 |
OPPS_CALC |
entrainrate = (newflux - oldflux)/newflux |
|
./pkg/opps/opps_calc.F |
217 |
OPPS_CALC |
oldflux = newflux |
|
./pkg/opps/opps_calc.F |
721 |
NLOPPS |
real pdensity,wsqr,oldflux,newflux,entrainrate,adtemp |
|
./pkg/opps/opps_calc.F |
862 |
NLOPPS |
oldflux=StartingFlux |
|
./pkg/opps/opps_calc.F |
880 |
NLOPPS |
newflux=oldflux+e2*radius*Wd(k2)*Dd(k2)*0.50* |
|
./pkg/opps/opps_calc.F |
896 |
NLOPPS |
entrainrate = (newflux - oldflux)/newflux |
|
./pkg/opps/opps_calc.F |
897 |
NLOPPS |
oldflux = newflux |
|
./pkg/opps/opps_calc.F |
94 |
OPPS_CALC |
_RL wsqr,oldflux,newflux,entrainrate |