| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_interp_uv.F |
101 |
EXF_INTERP_UV |
_RL csLon(-1:exf_max_nLon+2), snLon(-1:exf_max_nLon+2) |
|
./pkg/exf/exf_interp_uv.F |
279 |
EXF_INTERP_UV |
csLon(-1) = cos(x_in(-1)*deg2rad) |
|
./pkg/exf/exf_interp_uv.F |
284 |
EXF_INTERP_UV |
csLon(i+1) = csLon(i)*csdLon - snLon(i)*sndLon |
|
./pkg/exf/exf_interp_uv.F |
285 |
EXF_INTERP_UV |
snLon(i+1) = csLon(i)*sndLon + snLon(i)*csdLon |
|
./pkg/exf/exf_interp_uv.F |
298 |
EXF_INTERP_UV |
& + ( csLon(i)*arrUin(i,j) - pSign*snLon(i)*arrVin(i,j) ) |
|
./pkg/exf/exf_interp_uv.F |
300 |
EXF_INTERP_UV |
& + ( pSign*snLon(i)*arrUin(i,j) + csLon(i)*arrVin(i,j) ) |
|
./pkg/exf/exf_interp_uv.F |
306 |
EXF_INTERP_UV |
arrUin(i,j) = csLon(i)*poleU + pSign*snLon(i)*poleV |
|
./pkg/exf/exf_interp_uv.F |
307 |
EXF_INTERP_UV |
arrVin(i,j) = -pSign*snLon(i)*poleU + csLon(i)*poleV |
|
./pkg/exf/exf_interp_uv.F |
98 |
EXF_INTERP_UV |
_RL csLon(-1:nxIn+2), snLon(-1:nxIn+2) |