| File |
Line number |
Procedure |
Code |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
251 |
AIM_SURF_BC |
hlim = ACOS(TMPL) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
252 |
AIM_SURF_BC |
CZEN = 2.0 _d 0*(TMPA*hlim + TMPB*SIN(hlim)) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
253 |
AIM_SURF_BC |
CZEN2= 2.0 _d 0*TMPA*TMPA*hlim |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
254 |
AIM_SURF_BC |
& + 4.0 _d 0*TMPA*TMPB*SIN(hlim) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
255 |
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 |
90 |
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 |
|
./pkg/exf/exf_zenithangle.F |
187 |
EXF_ZENITHANGLE |
hlim = ACOS(TMPL) |
|
./pkg/exf/exf_zenithangle.F |
188 |
EXF_ZENITHANGLE |
CZEN = 2.0 _d 0*(TMPA*hlim + TMPB*SIN(hlim)) |
|
./pkg/exf/exf_zenithangle.F |
189 |
EXF_ZENITHANGLE |
CZEN2= 2.0 _d 0*TMPA*TMPA*hlim |
|
./pkg/exf/exf_zenithangle.F |
190 |
EXF_ZENITHANGLE |
& + 4.0 _d 0*TMPA*TMPB*SIN(hlim) |
|
./pkg/exf/exf_zenithangle.F |
191 |
EXF_ZENITHANGLE |
& + TMPB*TMPB*( hlim + 0.5 _d 0*SIN(2.0 _d 0*hlim) ) |
|
./pkg/exf/exf_zenithangle.F |
52 |
EXF_ZENITHANGLE |
_RL DECLI, ZS, ZC, SJ, CJ, TMPA, TMPB, TMPL, hlim |