File |
Line number |
Procedure |
Code |
./pkg/exf/exf_zenithangle_table.F |
126 |
EXF_ZENITHANGLE_TABLE |
LLLAT=yC(i,j,bi,bj)+91. _d 0 |
./pkg/exf/exf_zenithangle_table.F |
128 |
EXF_ZENITHANGLE_TABLE |
LLLAT=max(LLLAT, 1. _d 0) |
./pkg/exf/exf_zenithangle_table.F |
129 |
EXF_ZENITHANGLE_TABLE |
LLLAT=min(LLLAT, 181. _d 0) |
./pkg/exf/exf_zenithangle_table.F |
131 |
EXF_ZENITHANGLE_TABLE |
zen_albedo_pointer(i,j,bi,bj)=LLLAT |
./pkg/exf/exf_zenithangle_table.F |
38 |
EXF_ZENITHANGLE_TABLE |
_RL LLLAT, TYEAR, TDAY, ALPHA, CZEN, ALBSEA1 |
./pkg/exf/exf_zenithangle_table.F |
52 |
EXF_ZENITHANGLE_TABLE |
LLLAT=(iLat-91. _d 0) |
./pkg/exf/exf_zenithangle_table.F |
69 |
EXF_ZENITHANGLE_TABLE |
SJ = SIN(LLLAT * deg2rad) |
./pkg/exf/exf_zenithangle_table.F |
70 |
EXF_ZENITHANGLE_TABLE |
CJ = COS(LLLAT * deg2rad) |