File |
Line number |
Procedure |
Code |
./pkg/exf/exf_zenithangle.F |
187 |
EXF_ZENITHANGLE |
ZC = COS(DECLI) |
./pkg/exf/exf_zenithangle.F |
195 |
EXF_ZENITHANGLE |
TMPB = CJ*ZC |
./pkg/exf/exf_zenithangle.F |
296 |
EXF_ZENITHANGLE |
ZC = COS(DECLI) |
./pkg/exf/exf_zenithangle.F |
304 |
EXF_ZENITHANGLE |
TMPB = CJ*ZC |
./pkg/exf/exf_zenithangle.F |
54 |
EXF_ZENITHANGLE |
_RL DECLI, ZS, ZC, SJ, CJ, TMPA, TMPB, TMPL, hlim |
./pkg/exf/exf_zenithangle_table.F |
39 |
EXF_ZENITHANGLE_TABLE |
_RL DECLI, ZS, ZC, SJ, CJ, TMPA, TMPB |
./pkg/exf/exf_zenithangle_table.F |
67 |
EXF_ZENITHANGLE_TABLE |
ZC = COS(DECLI) |
./pkg/exf/exf_zenithangle_table.F |
72 |
EXF_ZENITHANGLE_TABLE |
TMPB = CJ*ZC |
./pkg/fizhi/fizhi_clockstuff.F |
1005 |
ASTRO |
COSZ(I) = SJ*ZS + CJ*ZC*HC |
./pkg/fizhi/fizhi_clockstuff.F |
991 |
ASTRO |
ZC = SQRT(ONE-ZS*ZS) |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
229 |
AIM_SURF_BC |
ZC = ASIN( ZS ) |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
230 |
AIM_SURF_BC |
ZC = COS(ZC) |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
233 |
AIM_SURF_BC |
ZC = COS(RZEN) |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
254 |
AIM_SURF_BC |
TMPB = CJ*ZC |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
96 |
AIM_SURF_BC |
_RL RZEN, ZS, ZC, SJ, CJ, TMPA, TMPB, TMPL, hlim |
./pkg/aim_v23/aim_surf_bc.F |
212 |
AIM_SURF_BC |
ZC = ASIN( ZS ) |
./pkg/aim_v23/aim_surf_bc.F |
213 |
AIM_SURF_BC |
ZC = COS(ZC) |
./pkg/aim_v23/aim_surf_bc.F |
216 |
AIM_SURF_BC |
ZC = COS(RZEN) |
./pkg/aim_v23/aim_surf_bc.F |
237 |
AIM_SURF_BC |
TMPB = CJ*ZC |
./pkg/aim_v23/aim_surf_bc.F |
90 |
AIM_SURF_BC |
_RL RZEN, ZS, ZC, SJ, CJ, TMPA, TMPB, TMPL, hlim |
./pkg/chronos/chronos.F |
824 |
ASTRO |
ZC = SQRT(ONE-ZS*ZS) |
./pkg/chronos/chronos.F |
838 |
ASTRO |
COSZ(I) = SJ*ZS + CJ*ZC*HC |