| File |
Line number |
Procedure |
Code |
|
./pkg/aim/phy_radiat.F |
59 |
SOL_OZ |
DO J=1,NLAT |
|
./pkg/aim/phy_inphys.F |
46 |
INPHYS |
_RL FSG(NLEV), HSG(0:NLEV), RLAT(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 |
141 |
ZMEDDY |
DO 130 J=1,NLAT |
|
./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/sphere/sphere.F |
118 |
SHC2GRID |
SUBROUTINE SHC2GRID( LMAX, SHC, NLON, NLAT, GRID, P ) |
|
./pkg/sphere/sphere.F |
146 |
SHC2GRID |
INTEGER NLAT ! INPUT number of latitude lines. |
|
./pkg/sphere/sphere.F |
148 |
SHC2GRID |
REAL GRID(NLON,NLAT) ! OUTPUT grid values |
|
./pkg/sphere/sphere.F |
168 |
SHC2GRID |
DLAT = 180.0/FLOAT(NLAT) |
|
./pkg/sphere/sphere.F |
172 |
SHC2GRID |
DO LATS = 1,(NLAT+1)/2 |
|
./pkg/sphere/sphere.F |
173 |
SHC2GRID |
LATN = NLAT-(LATS-1) |
|
./pkg/sphere/sphere.F |
194 |
SHC4GRID |
SUBROUTINE SHC4GRID( LMAX, SHC, NLON, NLAT, GRID, P ) |
|
./pkg/sphere/sphere.F |
200 |
SHC4GRID |
INTEGER NLAT ! INPUT number of latitude lines. |
|
./pkg/sphere/sphere.F |
202 |
SHC4GRID |
REAL GRID(NLON,NLAT) ! INPUT grid values |
|
./pkg/sphere/sphere.F |
231 |
SHC4GRID |
DLAT = 180.0/FLOAT(NLAT) |
|
./pkg/sphere/sphere.F |
233 |
SHC4GRID |
DO LATS = 1,(NLAT+1)/2 |
|
./pkg/sphere/sphere.F |
234 |
SHC4GRID |
LATN = NLAT-(LATS-1) |