Symbol Description Uses
PSG_1 4



File Line number Procedure Code
./pkg/aim_v23/phy_driver.F 121 PHY_DRIVER
      _RL PSG_1(NGP), RPS_1
./pkg/aim_v23/phy_driver.F 148 PHY_DRIVER
       PSG_1(J)=1. _d 0
./pkg/aim_v23/phy_driver.F 166 PHY_DRIVER
       CALL SHTORH (1,NGP,TG1(1,K),PSG_1,SIG(K),QG1(1,K),
./pkg/aim_v23/phy_driver.F 247 PHY_DRIVER
          CLTOP(J,myThid)=SIGH(ICLTOP(J)-1)*PSG_1(J)