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 561 NLOPPS 
      REAL radius,StartingFlux
./pkg/opps/opps_calc.F 682 NLOPPS 
          StartingFlux=radius*radius*Wd(k)*Dd(k)
./pkg/opps/opps_calc.F 683 NLOPPS 
          oldflux=StartingFlux
./pkg/opps/opps_calc.F 704 NLOPPS 
                 PlumeEntrainment(k2+1) = newflux/StartingFlux