Symbol Description Uses
QG1 21



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 18 NO PROCEDURE
      _RL QG1(NGP,NLEV,MAX_NO_THREADS)
./pkg/aim/aim_do_atmos_physics.F 154 AIM_DO_PHYSICS
         QG1(I2,Katm,myThid)   = salt(I,J,K,bi,bj)
./pkg/aim/aim_do_atmos_physics.F 156 AIM_DO_PHYSICS
         QG1(I2,Katm,myThid)   = MAX(salt(I,J,K,bi,bj), 0. _d 0)
./pkg/aim/phy_driver.F 108 PDRIVER
     &              SIG(K),QG1(1,K,myThid),
./pkg/aim/phy_driver.F 120 PDRIVER
        QG1(J,K,myThid)=QG1(J,K,myThid)*Phymask(J,K)
./pkg/aim/phy_driver.F 132 PDRIVER
     &             QG1(1,1,myThid),QSAT(1,1,myThid),
./pkg/aim/phy_driver.F 147 PDRIVER
      CALL LSCOND (PSG(1,myThid),QG1(1,1,myThid),QSAT(1,1,myThid),
./pkg/aim/phy_driver.F 163 PDRIVER
      CALL RADSW (PSG(1,myThid),QG1(1,1,myThid),RH(1,1,myThid),
./pkg/aim/phy_driver.F 194 PDRIVER
     &             TG1(1,1,myThid),QG1(1,1,myThid),
./pkg/aim/phy_driver.F 250 PDRIVER
     &             QG1(1,1,myThid), QSAT(1,1,myThid),
./pkg/aim_v23/com_physvar.h 18 NO PROCEDURE
      _RL QG1    (NGP,NLEV)
./pkg/aim_v23/phy_driver.F 104 PHY_DRIVER
     O                 TG1, QG1, SE, VsurfSq, PSG, dpFac, kGround,
./pkg/aim_v23/phy_driver.F 130 PHY_DRIVER
       CALL SHTORH (1,NGP,TG1(1,K),PSG_1,SIG(K),QG1(1,K),
./pkg/aim_v23/phy_driver.F 141 PHY_DRIVER
      CALL CONVMF (PSG,dpFac,SE,QG1,QSAT,
./pkg/aim_v23/phy_driver.F 157 PHY_DRIVER
      CALL LSCOND (PSG,dpFac,QG1,QSAT,
./pkg/aim_v23/phy_driver.F 202 PHY_DRIVER
       CALL RADSW (PSG,dpFac,QG1,RH(1,1,myThid),ALB1(1,0,myThid),
./pkg/aim_v23/phy_driver.F 238 PHY_DRIVER
     I             PSG, TG1, QG1, RH(1,1,myThid), SE, VsurfSq,
./pkg/aim_v23/phy_driver.F 334 PHY_DRIVER
       CALL RADSW (PSG,dpFac,QG1,RH(1,1,myThid),ALB1(1,0,myThid),
./pkg/aim_v23/phy_driver.F 371 PHY_DRIVER
      CALL VDIFSC (dpFac, SE, RH(1,1,myThid), QG1, QSAT,