| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_zenithangle.F |
105 |
EXF_ZENITHANGLE |
TYEAR = myTime / secondsInYear |
|
./pkg/exf/exf_zenithangle.F |
107 |
EXF_ZENITHANGLE |
TYEAR = MOD( TYEAR, oneRL ) |
|
./pkg/exf/exf_zenithangle.F |
133 |
EXF_ZENITHANGLE |
iTyear1= 1 + 365.*TYEAR |
|
./pkg/exf/exf_zenithangle.F |
134 |
EXF_ZENITHANGLE |
wTyear1= iTyear1 - 365.*TYEAR |
|
./pkg/exf/exf_zenithangle.F |
169 |
EXF_ZENITHANGLE |
ALPHA= 2. _d 0*PI*TYEAR |
|
./pkg/exf/exf_zenithangle.F |
283 |
EXF_ZENITHANGLE |
ALPHA= 2. _d 0*PI*TYEAR |
|
./pkg/exf/exf_zenithangle.F |
53 |
EXF_ZENITHANGLE |
_RL TDAY, TYEAR, ALBSEA1, ALPHA, CZEN, CZEN2 |
|
./pkg/exf/exf_zenithangle.F |
88 |
EXF_ZENITHANGLE |
TYEAR=myDateSeconds/secondsInYear |
|
./pkg/exf/exf_zenithangle_table.F |
38 |
EXF_ZENITHANGLE_TABLE |
_RL LLLAT, TYEAR, TDAY, ALPHA, CZEN, ALBSEA1 |
|
./pkg/exf/exf_zenithangle_table.F |
53 |
EXF_ZENITHANGLE_TABLE |
TYEAR=(iTyear-1. _d 0)/365. _d 0 |
|
./pkg/exf/exf_zenithangle_table.F |
58 |
EXF_ZENITHANGLE_TABLE |
ALPHA= 2. _d 0*PI*TYEAR |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
226 |
AIM_SURF_BC |
ALPHA= 2. _d 0*PI*(TYEAR+10. _d 0/365. _d 0) |
|
./pkg/aim_v23/aim_surf_bc.F |
209 |
AIM_SURF_BC |
ALPHA= 2. _d 0*PI*(TYEAR+10. _d 0/365. _d 0) |
|
./pkg/aim_v23/phy_radiat.F |
17 |
SOL_OZ |
SUBROUTINE SOL_OZ (SOLC, TYEAR, SLAT, CLAT, |
|
./pkg/aim_v23/phy_radiat.F |
54 |
SOL_OZ |
_RL SOLC, TYEAR |
|
./pkg/aim_v23/phy_radiat.F |
73 |
SOL_OZ |
ALPHA = 4. _d 0*ASIN(1. _d 0)*(TYEAR+10. _d 0/365. _d 0) |