1 |
heimbach |
1.1 |
|
2 |
|
|
c ================================================================== |
3 |
|
|
c HEADER SPHERE |
4 |
|
|
c ================================================================== |
5 |
|
|
c |
6 |
|
|
c o Parameters for spherical harmonic analysis of sea surface height |
7 |
|
|
c field. |
8 |
|
|
c Assumes regular grid with 2 degree meridional spacing! |
9 |
|
|
c o TODO: interpolate model grid to regular grid |
10 |
|
|
c |
11 |
|
|
c started: Ralf Giering Jul-1996 |
12 |
|
|
c |
13 |
|
|
c changed: Christian Eckert eckert@mit.edu 29-Feb-2000 |
14 |
|
|
c |
15 |
|
|
c changed: Ralf Giering Ralf.Giering@FastOpt.de 12-Jun-2001 |
16 |
|
|
c |
17 |
|
|
c ================================================================== |
18 |
|
|
c HEADER SPHERE |
19 |
|
|
c ================================================================== |
20 |
|
|
|
21 |
|
|
|
22 |
|
|
c Dimensions in spherical harmonic space. |
23 |
|
|
c ======================================= |
24 |
|
|
c |
25 |
|
|
c lshcmax - maximal degree l of spherical harmonics to be |
26 |
|
|
c projected on in a spherical harmonic analysis. |
27 |
|
|
c ncshc - number of spherical harmonics coefficients correspond- |
28 |
|
|
c ing to lshmax. |
29 |
|
|
c lonshc - zonal number of grid points of regular grid |
30 |
|
|
c latshc - meridional number of grid points of regular grid |
31 |
|
|
c dthetashc - zonal grid spacing |
32 |
|
|
c dphishc - meridional grid spacing |
33 |
|
|
|
34 |
|
|
integer lshcmax |
35 |
|
|
parameter( lshcmax = 70 ) |
36 |
|
|
|
37 |
|
|
integer ncshc |
38 |
|
|
parameter( ncshc = (lshcmax+1)*(lshcmax+1) ) |
39 |
|
|
|
40 |
|
|
_RL dthetashc |
41 |
|
|
parameter( dthetashc = 2. ) |
42 |
|
|
|
43 |
|
|
_RL dphishc |
44 |
|
|
parameter( dphishc = 2. ) |
45 |
|
|
|
46 |
|
|
integer lonshc |
47 |
|
|
parameter( lonshc = Nx ) |
48 |
|
|
|
49 |
|
|
integer latshc |
50 |
|
|
parameter( latshc = 160.0/dphishc ) |
51 |
|
|
|
52 |
|
|
c ================================================================== |
53 |
|
|
c END OF HEADER SPHERE |
54 |
|
|
c ================================================================== |
55 |
|
|
|
56 |
|
|
|