Symbol Description Uses
THNOW 6



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 988 ASTRO
      THNOW = THM*(ONE-FAC) + THP*FAC
./pkg/fizhi/fizhi_clockstuff.F 990 ASTRO
      ZS = SIN(THNOW) * SIN(OB)
./pkg/fizhi/fizhi_clockstuff.F 992 ASTRO
      RA = (1.-ECC*ECC) / ( ONE-ECC*COS(THNOW-PER) )
./pkg/chronos/chronos.F 821 ASTRO
      THNOW = THM*(ONE-FAC) + THP*FAC
./pkg/chronos/chronos.F 823 ASTRO
      ZS = SIN(THNOW) * SIN(OB)
./pkg/chronos/chronos.F 825 ASTRO
      RA = (1.-ECC*ECC) / ( ONE-ECC*COS(THNOW-PER) )