| File |
Line number |
Procedure |
Code |
|
./model/src/ini_spherical_polar_grid.F |
167 |
INI_SPHERICAL_POLAR_GRID |
dlat = delY( jGl(J,bj) ) |
|
./model/src/ini_spherical_polar_grid.F |
173 |
INI_SPHERICAL_POLAR_GRID |
dYF(I,J,bi,bj) = rSphere*dlat*deg2rad |
|
./model/src/ini_spherical_polar_grid.F |
186 |
INI_SPHERICAL_POLAR_GRID |
dlat = delY( jGl(J,bj) ) |
|
./model/src/ini_spherical_polar_grid.F |
189 |
INI_SPHERICAL_POLAR_GRID |
dYG(I,J,bi,bj) = rSphere*dlat*deg2rad |
|
./model/src/ini_spherical_polar_grid.F |
254 |
INI_SPHERICAL_POLAR_GRID |
dlat=delY( jGl(J,bj) ) |
|
./model/src/ini_spherical_polar_grid.F |
256 |
INI_SPHERICAL_POLAR_GRID |
& *abs( sin((lat+dlat)*deg2rad)-sin(lat*deg2rad) ) |
|
./model/src/ini_spherical_polar_grid.F |
286 |
INI_SPHERICAL_POLAR_GRID |
dlat=0.5*( delY( jGl(J,bj) ) + delY( jGl(J-1,bj) ) ) |
|
./model/src/ini_spherical_polar_grid.F |
288 |
INI_SPHERICAL_POLAR_GRID |
& *abs( sin(lat*deg2rad)-sin((lat-dlat)*deg2rad) ) |
|
./model/src/ini_spherical_polar_grid.F |
295 |
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 |
305 |
INI_SPHERICAL_POLAR_GRID |
dlat=0.5 _d 0*( delY( jGl(J,bj) ) + delY( jGl(J-1,bj) ) ) |
|
./model/src/ini_spherical_polar_grid.F |
307 |
INI_SPHERICAL_POLAR_GRID |
& *abs( sin(lat*deg2rad)-sin((lat-dlat)*deg2rad) ) |
|
./model/src/ini_spherical_polar_grid.F |
308 |
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 |
62 |
INI_SPHERICAL_POLAR_GRID |
_RL lat, dlat, dlon, xG0, yG0 |