Symbol Description Uses
SJ 12



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 1011 ASTRO
      SJ = SIN(ALAT(I)*DG2RD)
./pkg/fizhi/fizhi_clockstuff.F 1012 ASTRO
      CJ = SQRT(ONE-SJ*SJ)
./pkg/fizhi/fizhi_clockstuff.F 1014 ASTRO
          COSZ(I) = SJ*ZS + CJ*ZC*HC