| File |
Line number |
Procedure |
Code |
|
./pkg/sphere/sphere.F |
120 |
SHC2GRID |
SUBROUTINE SHC2GRID( LMAX, SHC, NLON, NLAT, GRID, P ) |
|
./pkg/sphere/sphere.F |
149 |
SHC2GRID |
INTEGER NLON ! INPUT number of longitude lines. |
|
./pkg/sphere/sphere.F |
150 |
SHC2GRID |
REAL GRID(NLON,NLAT) ! OUTPUT grid values |
|
./pkg/sphere/sphere.F |
167 |
SHC2GRID |
IF(NLON.GT.NLONLMT) CALL SHCERROR('NLON.GT.NLONLMT',1) |
|
./pkg/sphere/sphere.F |
168 |
SHC2GRID |
IF(NLON.LT.LMAX*2 ) CALL SHCERROR('NLON.LT.LMAX*2 ',1) |
|
./pkg/sphere/sphere.F |
171 |
SHC2GRID |
ANGLE = 180.0/FLOAT(NLON) |
|
./pkg/sphere/sphere.F |
183 |
SHC2GRID |
CALL FSC2DAT( NLON, HS ) |
|
./pkg/sphere/sphere.F |
184 |
SHC2GRID |
CALL FSC2DAT( NLON, HN ) |
|
./pkg/sphere/sphere.F |
196 |
SHC4GRID |
SUBROUTINE SHC4GRID( LMAX, SHC, NLON, NLAT, GRID, P ) |
|
./pkg/sphere/sphere.F |
203 |
SHC4GRID |
INTEGER NLON ! INPUT number of longitude lines. |
|
./pkg/sphere/sphere.F |
204 |
SHC4GRID |
REAL GRID(NLON,NLAT) ! INPUT grid values |
|
./pkg/sphere/sphere.F |
219 |
SHC4GRID |
IF(NLON.GT.NLONLMT) THEN |
|
./pkg/sphere/sphere.F |
220 |
SHC4GRID |
PRINT *, 'NLON = ', NLON |
|
./pkg/sphere/sphere.F |
226 |
SHC4GRID |
IF(NLON.LT.LMAX*2 ) THEN |
|
./pkg/sphere/sphere.F |
227 |
SHC4GRID |
PRINT *, 'NLON = ', NLON |
|
./pkg/sphere/sphere.F |
234 |
SHC4GRID |
ANGLE = 180.0/FLOAT(NLON) |
|
./pkg/sphere/sphere.F |
241 |
SHC4GRID |
CALL FSC4DAT(NLON,HS) |
|
./pkg/sphere/sphere.F |
242 |
SHC4GRID |
CALL FSC4DAT(NLON,HN) |
|
./pkg/aim_v23/AIM_SIZE.h |
16 |
NO PROCEDURE |
INTEGER NLON, NLAT, NLEV, NGP |
|
./pkg/aim_v23/AIM_SIZE.h |
17 |
NO PROCEDURE |
PARAMETER ( NLON=sNx, NLAT=sNy, NLEV=Nr, NGP=NLON*NLAT ) |
|
./pkg/aim_v23/phy_shtorh.F |
120 |
ZMEDDY |
SUBROUTINE ZMEDDY (NLON,NLAT,FF,ZM,EDDY) |
|
./pkg/aim_v23/phy_shtorh.F |
127 |
ZMEDDY |
INTEGER NLON, NLAT |
|
./pkg/aim_v23/phy_shtorh.F |
128 |
ZMEDDY |
_RL FF(NLON,NLAT), ZM(NLAT), EDDY(NLON,NLAT) |
|
./pkg/aim_v23/phy_shtorh.F |
139 |
ZMEDDY |
RNLON=1./NLON |
|
./pkg/aim_v23/phy_shtorh.F |
144 |
ZMEDDY |
DO 110 I=1,NLON |
|
./pkg/aim_v23/phy_shtorh.F |
149 |
ZMEDDY |
DO 120 I=1,NLON |