Symbol Description Uses
Vsurfsq 12



File Line number Procedure Code
./pkg/aim/com_physvar.h 14 NO PROCEDURE
      COMMON /PHYGR1/ UG1, VG1, TG1, QG1, PHIG1, PSLG1, Vsurfsq
./pkg/aim/com_physvar.h 21 NO PROCEDURE
      _RL Vsurfsq(NGP,MAX_NO_THREADS) 
./pkg/aim/aim_do_atmos_physics.F 176 AIM_DO_PHYSICS
         Vsurfsq(I2,myThid) = 0.
./pkg/aim/aim_do_atmos_physics.F 178 AIM_DO_PHYSICS
     &   Vsurfsq(I2,myThid) = Vsurfsq(I2,myThid)
./pkg/aim/aim_do_atmos_physics.F 182 AIM_DO_PHYSICS
     &   Vsurfsq(I2,myThid) = Vsurfsq(I2,myThid)
./pkg/aim/aim_do_atmos_physics.F 188 AIM_DO_PHYSICS
         Vsurfsq(I2,myThid) = 0.5 * (
./pkg/aim/aim_do_atmos_physics.F 195 AIM_DO_PHYSICS
         Vsurfsq(I2,myThid) = 0.
./pkg/aim/phy_suflux.F 177 SUFLUX
        SPEED0(J)=SQRT(factwind2*Vsurfsq(J)+VG2)
./pkg/aim/phy_suflux.F 66 SUFLUX
      _RL Vsurfsq(NGP), DRAG(NGP)
./pkg/aim/phy_suflux.F 6 SUFLUX
      SUBROUTINE SUFLUX (PSA,UA,VA,TA,QA,RH,QSAT,Vsurfsq,PHI,