| File |
Line number |
Procedure |
Code |
|
./pkg/sbo/sbo_calc.F |
161 |
SBO_CALC |
_RL lat, lat_deg, lon, radius, darea, dradius, dvolume, depth |
|
./pkg/sbo/sbo_calc.F |
218 |
SBO_CALC |
lon = xC(i,j,bi,bj) * pi / 180.0 |
|
./pkg/sbo/sbo_calc.F |
262 |
SBO_CALC |
xcom = xcom + density * COS(lat) * COS(lon) |
|
./pkg/sbo/sbo_calc.F |
264 |
SBO_CALC |
ycom = ycom + density * COS(lat) * SIN(lon) |
|
./pkg/sbo/sbo_calc.F |
270 |
SBO_CALC |
xoamc = xoamc + ( v*SIN(lon)-u*SIN(lat)*COS(lon)) |
|
./pkg/sbo/sbo_calc.F |
272 |
SBO_CALC |
yoamc = yoamc + (-v*COS(lon)-u*SIN(lat)*SIN(lon)) |
|
./pkg/sbo/sbo_calc.F |
278 |
SBO_CALC |
xoamp = xoamp - SIN(lat) * COS(lat) * COS(lon) |
|
./pkg/sbo/sbo_calc.F |
280 |
SBO_CALC |
yoamp = yoamp - SIN(lat) * COS(lat) * SIN(lon) |
|
./model/src/ini_spherical_polar_grid.F |
264 |
INI_SPHERICAL_POLAR_GRID |
lon=yC(i,j,bi,bj)+delY( jGl(j,bj) )*0.5 _d 0 |
|
./model/src/ini_spherical_polar_grid.F |
266 |
INI_SPHERICAL_POLAR_GRID |
& *rSphere*(SIN(lon*deg2rad)-SIN(lat*deg2rad)) |
|
./model/src/ini_spherical_polar_grid.F |
295 |
INI_SPHERICAL_POLAR_GRID |
lon=yC(i,j,bi,bj)-delY( jGl(j,bj) ) |
|
./model/src/ini_spherical_polar_grid.F |
298 |
INI_SPHERICAL_POLAR_GRID |
& *rSphere*(SIN(lat*deg2rad)-SIN(lon*deg2rad)) |