File |
Line number |
Procedure |
Code |
./pkg/sphere/sphere.F |
158 |
SHC2GRID |
REAL DLAT, ANGLE, XLAT1, XLAT2 |
./pkg/sphere/sphere.F |
171 |
SHC2GRID |
ANGLE = 180.0/FLOAT(NLON) |
./pkg/sphere/sphere.F |
173 |
SHC2GRID |
CALL SHCROTATE(LMAX,SHC,ANGLE) |
./pkg/sphere/sphere.F |
190 |
SHC2GRID |
CALL SHCROTATE(LMAX,SHC,-ANGLE) |
./pkg/sphere/sphere.F |
212 |
SHC4GRID |
REAL DLAT, ANGLE, XLAT1, XLAT2 |
./pkg/sphere/sphere.F |
234 |
SHC4GRID |
ANGLE = 180.0/FLOAT(NLON) |
./pkg/sphere/sphere.F |
247 |
SHC4GRID |
CALL SHCROTATE(LMAX,SHC,-ANGLE) |
./pkg/sphere/sphere.F |
254 |
SHCROTATE |
SUBROUTINE SHCROTATE(LMAX,SHC,ANGLE) |
./pkg/sphere/sphere.F |
260 |
SHCROTATE |
REAL ANGLE ! in degree. |
./pkg/sphere/sphere.F |
271 |
SHCROTATE |
CALL FRSBASE(ANGLE,H,1,1+LMAX+LMAX) |