| File |
Line number |
Procedure |
Code |
|
./pkg/sphere/sphere.F |
156 |
SHC2GRID |
REAL DLAT, ANGLE, XLAT1, XLAT2 |
|
./pkg/sphere/sphere.F |
174 |
SHC2GRID |
XLAT2 =-90.0 + FLOAT(LATS)*DLAT |
|
./pkg/sphere/sphere.F |
175 |
SHC2GRID |
XLAT1 = XLAT2-DLAT |
|
./pkg/sphere/sphere.F |
180 |
SHC2GRID |
CALL SHC2ZONE( LMAX, SHC, XLAT1, XLAT2, HS, HN, P ) |
|
./pkg/sphere/sphere.F |
210 |
SHC4GRID |
REAL DLAT, ANGLE, XLAT1, XLAT2 |
|
./pkg/sphere/sphere.F |
241 |
SHC4GRID |
XLAT2 =-90.0 + FLOAT(LATS)*DLAT |
|
./pkg/sphere/sphere.F |
242 |
SHC4GRID |
XLAT1 = XLAT2-DLAT |
|
./pkg/sphere/sphere.F |
243 |
SHC4GRID |
CALL SHC4ZONE(LMAX,SHC,XLAT1,XLAT2,HS,HN,P) |
|
./pkg/sphere/sphere.F |
295 |
SHC2ZONE |
SUBROUTINE SHC2ZONE(LMAX,SHC,XLAT1,XLAT2,HS,HN,P) |
|
./pkg/sphere/sphere.F |
302 |
SHC2ZONE |
REAL XLAT2 ! INPUT latitude. |
|
./pkg/sphere/sphere.F |
319 |
SHC2ZONE |
XLAT = 0.5*(XLAT1+XLAT2) |
|
./pkg/sphere/sphere.F |
380 |
SHC4ZONE |
SUBROUTINE SHC4ZONE(LMAX,SHC,XLAT1,XLAT2,HS,HN,P) |
|
./pkg/sphere/sphere.F |
387 |
SHC4ZONE |
REAL XLAT2 ! latitude. |
|
./pkg/sphere/sphere.F |
414 |
SHC4ZONE |
XLAT = 0.5*(XLAT1+XLAT2) |
|
./pkg/sphere/sphere.F |
418 |
SHC4ZONE |
SIN2 = SIN(AMIN1( 0.0,XLAT2)*DEG2RAD) |