Symbol Description Uses
oldflux 10


File Line number Procedure Code
./pkg/opps/opps_calc.F 100 OPPS_CALC 
      _RL wsqr,oldflux,newflux,entrainrate
./pkg/opps/opps_calc.F 173 OPPS_CALC 
       oldflux=StartingFlux
./pkg/opps/opps_calc.F 195 OPPS_CALC 
         newflux=oldflux+e2*radius*Wd(k2)*Dd(k2)*
./pkg/opps/opps_calc.F 218 OPPS_CALC 
         entrainrate = (newflux - oldflux)/newflux
./pkg/opps/opps_calc.F 219 OPPS_CALC 
         oldflux = newflux
./pkg/opps/opps_calc.F 552 NLOPPS 
      real pdensity,wsqr,oldflux,newflux,entrainrate,adtemp
./pkg/opps/opps_calc.F 683 NLOPPS 
          oldflux=StartingFlux
./pkg/opps/opps_calc.F 701 NLOPPS 
                 newflux=oldflux+e2*radius*Wd(k2)*Dd(k2)*0.50*
./pkg/opps/opps_calc.F 717 NLOPPS 
                 entrainrate = (newflux - oldflux)/newflux
./pkg/opps/opps_calc.F 718 NLOPPS 
                 oldflux = newflux