File |
Line number |
Procedure |
Code |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
242 |
AIM_SURF_BC |
TMPB = CJ*ZC |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
243 |
AIM_SURF_BC |
TMPL = -TMPA/TMPB |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
248 |
AIM_SURF_BC |
CZEN2= PI*((2.0 _d 0)*TMPA*TMPA + TMPB*TMPB) |
./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 |
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 |
237 |
AIM_SURF_BC |
TMPB = CJ*ZC |
./pkg/aim_v23/aim_surf_bc.F |
238 |
AIM_SURF_BC |
TMPL = -TMPA/TMPB |
./pkg/aim_v23/aim_surf_bc.F |
243 |
AIM_SURF_BC |
CZEN2= PI*((2.0 _d 0)*TMPA*TMPA + TMPB*TMPB) |
./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 |
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 |
166 |
EXF_ZENITHANGLE |
TMPB = CJ*ZC |
./pkg/exf/exf_zenithangle.F |
171 |
EXF_ZENITHANGLE |
CZENdiurnal = TMPA + TMPB * |
./pkg/exf/exf_zenithangle.F |
179 |
EXF_ZENITHANGLE |
TMPL = -TMPA/TMPB |
./pkg/exf/exf_zenithangle.F |
184 |
EXF_ZENITHANGLE |
CZEN2= PI*((2.0 _d 0)*TMPA*TMPA + TMPB*TMPB) |
./pkg/exf/exf_zenithangle.F |
188 |
EXF_ZENITHANGLE |
CZEN = 2.0 _d 0*(TMPA*hlim + TMPB*SIN(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 |
272 |
EXF_ZENITHANGLE |
TMPB = CJ*ZC |
./pkg/exf/exf_zenithangle.F |
273 |
EXF_ZENITHANGLE |
CZEN = TMPA + TMPB * |
./pkg/exf/exf_zenithangle.F |
284 |
EXF_ZENITHANGLE |
& ( H0 * TMPA + sin(H0) * TMPB ) |
./pkg/exf/exf_zenithangle.F |
52 |
EXF_ZENITHANGLE |
_RL DECLI, ZS, ZC, SJ, CJ, TMPA, TMPB, TMPL, hlim |
./pkg/exf/exf_zenithangle_table.F |
45 |
EXF_ZENITHANGLE_TABLE |
_RL DECLI, ZS, ZC, SJ, CJ, TMPA, TMPB |
./pkg/exf/exf_zenithangle_table.F |
79 |
EXF_ZENITHANGLE_TABLE |
TMPB = CJ*ZC |
./pkg/exf/exf_zenithangle_table.F |
96 |
EXF_ZENITHANGLE_TABLE |
CZEN = TMPA + TMPB * |