File |
Line number |
Procedure |
Code |
./model/src/ini_spherical_polar_grid.F |
105 |
INI_SPHERICAL_POLAR_GRID |
dlat = delYloc(j) |
./model/src/ini_spherical_polar_grid.F |
107 |
INI_SPHERICAL_POLAR_GRID |
dyF(i,j,bi,bj) = rSphere*dlat*deg2rad |
./model/src/ini_spherical_polar_grid.F |
120 |
INI_SPHERICAL_POLAR_GRID |
dlat = delYloc(j) |
./model/src/ini_spherical_polar_grid.F |
123 |
INI_SPHERICAL_POLAR_GRID |
dyG(i,j,bi,bj) = rSphere*dlat*deg2rad |
./model/src/ini_spherical_polar_grid.F |
189 |
INI_SPHERICAL_POLAR_GRID |
dlat = delYloc(j) |
./model/src/ini_spherical_polar_grid.F |
191 |
INI_SPHERICAL_POLAR_GRID |
& *ABS( SIN((lat+dlat)*deg2rad)-SIN(lat*deg2rad) ) |
./model/src/ini_spherical_polar_grid.F |
194 |
INI_SPHERICAL_POLAR_GRID |
dlat= yC(i,j,bi,bj) + delYloc(j)*0.5 _d 0 |
./model/src/ini_spherical_polar_grid.F |
196 |
INI_SPHERICAL_POLAR_GRID |
& *rSphere*(SIN(dlat*deg2rad)-SIN(lat*deg2rad)) |
./model/src/ini_spherical_polar_grid.F |
221 |
INI_SPHERICAL_POLAR_GRID |
dlat = 0.5 _d 0*( delYloc(j) + delYloc(j-1) ) |
./model/src/ini_spherical_polar_grid.F |
223 |
INI_SPHERICAL_POLAR_GRID |
dlat= delYloc(j) |
./model/src/ini_spherical_polar_grid.F |
226 |
INI_SPHERICAL_POLAR_GRID |
& *ABS( SIN(lat*deg2rad)-SIN((lat-dlat)*deg2rad) ) |
./model/src/ini_spherical_polar_grid.F |
227 |
INI_SPHERICAL_POLAR_GRID |
IF (ABS(lat).GT.90..OR.ABS(lat-dlat).GT.90.) rAs(i,j,bi,bj)=0. |
./model/src/ini_spherical_polar_grid.F |
237 |
INI_SPHERICAL_POLAR_GRID |
dlat = 0.5 _d 0*( delYloc(j) + delYloc(j-1) ) |
./model/src/ini_spherical_polar_grid.F |
239 |
INI_SPHERICAL_POLAR_GRID |
& *ABS( SIN(lat*deg2rad)-SIN((lat-dlat)*deg2rad) ) |
./model/src/ini_spherical_polar_grid.F |
240 |
INI_SPHERICAL_POLAR_GRID |
IF (ABS(lat).GT.90..OR.ABS(lat-dlat).GT.90.) rAz(i,j,bi,bj)=0. |
./model/src/ini_spherical_polar_grid.F |
56 |
INI_SPHERICAL_POLAR_GRID |
_RL lat, dlat, dlon |