| File |
Line number |
Procedure |
Code |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
220 |
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 |
45 |
SOL_OZ |
_RL SOLC, TYEAR |
|
./pkg/aim_v23/phy_radiat.F |
66 |
SOL_OZ |
ALPHA = 4. _d 0*ASIN(1. _d 0)*(TYEAR+10. _d 0/365. _d 0) |
|
./pkg/aim_v23/phy_radiat.F |
6 |
SOL_OZ |
SUBROUTINE SOL_OZ (SOLC, TYEAR, SLAT, CLAT, |
|
./pkg/exf/exf_zenithangle.F |
116 |
EXF_ZENITHANGLE |
iTyear1= 1 + 365.*TYEAR |
|
./pkg/exf/exf_zenithangle.F |
117 |
EXF_ZENITHANGLE |
wTyear1= iTyear1 - 365.*TYEAR |
|
./pkg/exf/exf_zenithangle.F |
144 |
EXF_ZENITHANGLE |
ALPHA= 2. _d 0*PI*TYEAR |
|
./pkg/exf/exf_zenithangle.F |
252 |
EXF_ZENITHANGLE |
ALPHA= 2. _d 0*PI*TYEAR |
|
./pkg/exf/exf_zenithangle.F |
253 |
EXF_ZENITHANGLE |
ALPHA= 2. _d 0*PI*TYEAR |
|
./pkg/exf/exf_zenithangle.F |
51 |
EXF_ZENITHANGLE |
_RL TDAY, TYEAR, ALBSEA1, ALPHA, CZEN, CZEN2 |
|
./pkg/exf/exf_zenithangle.F |
84 |
EXF_ZENITHANGLE |
TYEAR=myDateSeconds/secondsInYear |
|
./pkg/exf/exf_zenithangle_table.F |
44 |
EXF_ZENITHANGLE_TABLE |
_RL LLLAT, TYEAR, TDAY, ALPHA, CZEN, ALBSEA1 |
|
./pkg/exf/exf_zenithangle_table.F |
60 |
EXF_ZENITHANGLE_TABLE |
TYEAR=(iTyear-1. _d 0)/365. _d 0 |
|
./pkg/exf/exf_zenithangle_table.F |
65 |
EXF_ZENITHANGLE_TABLE |
ALPHA= 2. _d 0*PI*TYEAR |