Symbol Description Uses
StartingFlux 8



File Line number Procedure Code
./pkg/opps/opps_calc.F 170 OPPS_CALC
       StartingFlux=radius*radius*Wd(k)*Dd(k)
./pkg/opps/opps_calc.F 171 OPPS_CALC
       oldflux=StartingFlux
./pkg/opps/opps_calc.F 198 OPPS_CALC
         PlumeEntrainment(k2+1) = newflux/StartingFlux
./pkg/opps/opps_calc.F 732 NLOPPS
      REAL radius,StartingFlux
./pkg/opps/opps_calc.F 861 NLOPPS
          StartingFlux=radius*radius*Wd(k)*Dd(k)
./pkg/opps/opps_calc.F 862 NLOPPS
          oldflux=StartingFlux
./pkg/opps/opps_calc.F 883 NLOPPS
                 PlumeEntrainment(k2+1) = newflux/StartingFlux
./pkg/opps/opps_calc.F 98 OPPS_CALC
      _RL radius,StartingFlux