| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_zenithangle.F |
172 |
EXF_ZENITHANGLE |
& cos( 2. _d 0 *PI* TDAY + xC(i,j,bi,bj) * deg2rad ) |
|
./pkg/exf/exf_zenithangle.F |
274 |
EXF_ZENITHANGLE |
& cos( 2. _d 0 *PI* TDAY + xC(i,j,bi,bj) * deg2rad ) |
|
./pkg/exf/exf_zenithangle.F |
51 |
EXF_ZENITHANGLE |
_RL TDAY, TYEAR, ALBSEA1, ALPHA, CZEN, CZEN2 |
|
./pkg/exf/exf_zenithangle.F |
93 |
EXF_ZENITHANGLE |
TDAY= myDateSeconds / ( 86400 . _d 0 ) |
|
./pkg/exf/exf_zenithangle_table.F |
44 |
EXF_ZENITHANGLE_TABLE |
_RL LLLAT, TYEAR, TDAY, ALPHA, CZEN, ALBSEA1 |
|
./pkg/exf/exf_zenithangle_table.F |
93 |
EXF_ZENITHANGLE_TABLE |
TDAY=iTday/100. _d 0 |
|
./pkg/exf/exf_zenithangle_table.F |
97 |
EXF_ZENITHANGLE_TABLE |
& cos( 2. _d 0 *PI* TDAY + 0. _d 0 * deg2rad ) |