| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_calc.F |
118 |
OPPS_CALC |
_RL PlumeEntrainment(Nr) |
|
./pkg/opps/opps_calc.F |
161 |
OPPS_CALC |
PlumeEntrainment(k) = 0.0 |
|
./pkg/opps/opps_calc.F |
200 |
OPPS_CALC |
PlumeEntrainment(k2+1) = newflux/StartingFlux |
|
./pkg/opps/opps_calc.F |
307 |
OPPS_CALC |
Md(k2)=Md(k)*PlumeEntrainment(k2) |
|
./pkg/opps/opps_calc.F |
602 |
NLOPPS |
REAL PlumeEntrainment(km) |
|
./pkg/opps/opps_calc.F |
693 |
NLOPPS |
PlumeEntrainment(k) = 0.0 |
|
./pkg/opps/opps_calc.F |
719 |
NLOPPS |
PlumeEntrainment(k2+1) = newflux/StartingFlux |
|
./pkg/opps/opps_calc.F |
803 |
NLOPPS |
Md(k2)=Md(k)*PlumeEntrainment(k2) |