| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_calc.F |
112 |
OPPS_CALC |
_RL PlumeEntrainment(Nr) |
|
./pkg/opps/opps_calc.F |
157 |
OPPS_CALC |
PlumeEntrainment(k) = 0.0 |
|
./pkg/opps/opps_calc.F |
198 |
OPPS_CALC |
PlumeEntrainment(k2+1) = newflux/StartingFlux |
|
./pkg/opps/opps_calc.F |
308 |
OPPS_CALC |
Md(k2)=Md(k)*PlumeEntrainment(k2) |
|
./pkg/opps/opps_calc.F |
759 |
NLOPPS |
REAL PlumeEntrainment(km) |
|
./pkg/opps/opps_calc.F |
855 |
NLOPPS |
PlumeEntrainment(k) = 0.0 |
|
./pkg/opps/opps_calc.F |
883 |
NLOPPS |
PlumeEntrainment(k2+1) = newflux/StartingFlux |
|
./pkg/opps/opps_calc.F |
973 |
NLOPPS |
Md(k2)=Md(k)*PlumeEntrainment(k2) |