| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_zenithangle.F |
219 |
EXF_ZENITHANGLE |
hlim = ACOS(TMPL) |
|
./pkg/exf/exf_zenithangle.F |
220 |
EXF_ZENITHANGLE |
CZEN = 2.0 _d 0*(TMPA*hlim + TMPB*SIN(hlim)) |
|
./pkg/exf/exf_zenithangle.F |
221 |
EXF_ZENITHANGLE |
CZEN2= 2.0 _d 0*TMPA*TMPA*hlim |
|
./pkg/exf/exf_zenithangle.F |
222 |
EXF_ZENITHANGLE |
& + 4.0 _d 0*TMPA*TMPB*SIN(hlim) |
|
./pkg/exf/exf_zenithangle.F |
223 |
EXF_ZENITHANGLE |
& + TMPB*TMPB*( hlim + 0.5 _d 0*SIN(2.0 _d 0*hlim) ) |
|
./pkg/exf/exf_zenithangle.F |
54 |
EXF_ZENITHANGLE |
_RL DECLI, ZS, ZC, SJ, CJ, TMPA, TMPB, TMPL, hlim |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
263 |
AIM_SURF_BC |
hlim = ACOS(TMPL) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
264 |
AIM_SURF_BC |
CZEN = 2.0 _d 0*(TMPA*hlim + TMPB*SIN(hlim)) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
265 |
AIM_SURF_BC |
CZEN2= 2.0 _d 0*TMPA*TMPA*hlim |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
266 |
AIM_SURF_BC |
& + 4.0 _d 0*TMPA*TMPB*SIN(hlim) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
267 |
AIM_SURF_BC |
& + TMPB*TMPB*( hlim + 0.5 _d 0*SIN(2.0 _d 0*hlim) ) |
|
./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 |
246 |
AIM_SURF_BC |
hlim = ACOS(TMPL) |
|
./pkg/aim_v23/aim_surf_bc.F |
247 |
AIM_SURF_BC |
CZEN = 2.0 _d 0*(TMPA*hlim + TMPB*SIN(hlim)) |
|
./pkg/aim_v23/aim_surf_bc.F |
248 |
AIM_SURF_BC |
CZEN2= 2.0 _d 0*TMPA*TMPA*hlim |
|
./pkg/aim_v23/aim_surf_bc.F |
249 |
AIM_SURF_BC |
& + 4.0 _d 0*TMPA*TMPB*SIN(hlim) |
|
./pkg/aim_v23/aim_surf_bc.F |
250 |
AIM_SURF_BC |
& + TMPB*TMPB*( hlim + 0.5 _d 0*SIN(2.0 _d 0*hlim) ) |
|
./pkg/aim_v23/aim_surf_bc.F |
90 |
AIM_SURF_BC |
_RL RZEN, ZS, ZC, SJ, CJ, TMPA, TMPB, TMPL, hlim |