Symbol Description Uses
PSG_1 4



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