| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_clockstuff.F |
1002 |
ASTRO |
SJ = SIN(ALAT(I)*DG2RD) |
|
./pkg/fizhi/fizhi_clockstuff.F |
861 |
ASTRO |
SUBROUTINE ASTRO ( NYMD,NHMS,ALAT,ALON,IRUN,COSZ,RA ) |
|
./pkg/fizhi/update_earth_exports.F |
705 |
GETLGR |
SUBROUTINE GETLGR(sec,IMON,IDAY,ALAT,ITYP,NCHPS,nchpdim, |
|
./pkg/fizhi/update_earth_exports.F |
718 |
GETLGR |
_RL ALAT(nchpdim,nSx,nSy) |
|
./pkg/fizhi/update_earth_exports.F |
800 |
GETLGR |
IF(ALAT(I,bi,bj).GT.0.) THEN |
|
./pkg/chronos/chronos.F |
698 |
ASTRO |
SUBROUTINE ASTRO ( NYMD,NHMS,ALAT,ALON,IRUN,COSZ,RA ) |
|
./pkg/chronos/chronos.F |
835 |
ASTRO |
SJ = SIN(ALAT(I)*DG2RD) |