| Symbol | Description | Uses |
| COSZ | 16 |
| File | Line number | Procedure | Code |
| ./pkg/fizhi/fizhi_clockstuff.F | 1014 | ASTRO |
COSZ(I) = SJ*ZS + CJ*ZC*HC |
| ./pkg/fizhi/fizhi_clockstuff.F | 1015 | ASTRO |
IF( COSZ(I).LT.ZERO ) COSZ(I) = ZERO |
| ./pkg/fizhi/fizhi_clockstuff.F | 874 | ASTRO |
SUBROUTINE ASTRO ( NYMD,NHMS,ALAT,ALON,IRUN,COSZ,RA ) |