Symbol Description Uses
StartingFlux 8


File Line number Procedure Code
./pkg/opps/opps_calc.F 104 OPPS_CALC 
      _RL radius,StartingFlux
./pkg/opps/opps_calc.F 172 OPPS_CALC 
       StartingFlux=radius*radius*Wd(k)*Dd(k)
./pkg/opps/opps_calc.F 173 OPPS_CALC 
       oldflux=StartingFlux
./pkg/opps/opps_calc.F 200 OPPS_CALC 
         PlumeEntrainment(k2+1) = newflux/StartingFlux
./pkg/opps/opps_calc.F 576 NLOPPS 
      REAL radius,StartingFlux
./pkg/opps/opps_calc.F 697 NLOPPS 
          StartingFlux=radius*radius*Wd(k)*Dd(k)
./pkg/opps/opps_calc.F 698 NLOPPS 
          oldflux=StartingFlux
./pkg/opps/opps_calc.F 719 NLOPPS 
                 PlumeEntrainment(k2+1) = newflux/StartingFlux