Symbol Description Uses
ZENIT 15



File Line number Procedure Code
./pkg/aim_v23/com_radvar.h 18 NO PROCEDURE
      _RL FSOL(NGP), OZONE(NGP), OZUPP(NGP), ZENIT(NGP), STRATZ(NGP)
./pkg/aim_v23/phy_radiat.F 109 RADSW
     I                  FSOL, OZONE, OZUPP, ZENIT, STRATZ,
./pkg/aim_v23/phy_radiat.F 157 RADSW
      _RL FSOL(NGP), OZONE(NGP), OZUPP(NGP), ZENIT(NGP), STRATZ(NGP)
./pkg/aim_v23/phy_radiat.F 259 RADSW
        DELTAP=ZENIT(J)*DSIG(1)*dpFac(J,1)
./pkg/aim_v23/phy_radiat.F 268 RADSW
         DELTAP=ZENIT(J)*DSIG(K)*dpFac(J,K)
./pkg/aim_v23/phy_radiat.F 286 RADSW
        DELTAP=ZENIT(J)*DSIG(K)*dpFac(J,K)
./pkg/aim_v23/phy_radiat.F 292 RADSW
         DELTAP=ZENIT(J)*DSIG(K)*dpFac(J,K)
./pkg/aim_v23/phy_radiat.F 46 SOL_OZ
      _RL FSOL(NGP), OZONE(NGP), OZUPP(NGP), ZENIT(NGP), STRATZ(NGP)
./pkg/aim_v23/phy_radiat.F 7 SOL_OZ
     O                   FSOL, OZONE, OZUPP, ZENIT, STRATZ,
./pkg/aim_v23/phy_radiat.F 90 SOL_OZ
        ZENIT(J) = 1. + AZEN*
./pkg/aim_v23/phy_radiat.F 94 SOL_OZ
        OZUPP(J)=FSOL(J)*OZUPP(J)*ZENIT(J)
./pkg/aim_v23/phy_radiat.F 95 SOL_OZ
        OZONE(J)=FSOL(J)*OZONE(J)*ZENIT(J)
./pkg/aim_v23/phy_driver.F 186 PHY_DRIVER
     O             FSOL, OZONE, OZUPP, ZENIT, STRATZ,
./pkg/aim_v23/phy_driver.F 203 PHY_DRIVER
     I             FSOL, OZONE, OZUPP, ZENIT, STRATZ,
./pkg/aim_v23/phy_driver.F 335 PHY_DRIVER
     I             FSOL, OZONE, OZUPP, ZENIT, STRATZ,