pkg/sphere/sphere.h

0bed5b371d Patr*0001 c     ==================================================================
                0002 c     HEADER SPHERE
                0003 c     ==================================================================
                0004 c
                0005 c     o Parameters for spherical harmonic analysis of sea surface height
                0006 c       field.
                0007 c       Assumes regular grid with 2 degree meridional spacing!
                0008 c     o TODO: interpolate model grid to regular grid
                0009 c
                0010 c     started: Ralf Giering Jul-1996
                0011 c
                0012 c     changed: Christian Eckert eckert@mit.edu  29-Feb-2000
                0013 c
                0014 c     changed: Ralf Giering Ralf.Giering@FastOpt.de 12-Jun-2001
                0015 c
                0016 c     ==================================================================
                0017 c     HEADER SPHERE
                0018 c     ==================================================================
                0019
                0020
                0021 c     Dimensions in spherical harmonic space.
                0022 c     =======================================
                0023 c
                0024 c     lshcmax   -  maximal degree l of spherical harmonics to be
                0025 c                  projected on in a spherical harmonic analysis.
                0026 c     ncshc     -  number of spherical harmonics coefficients correspond-
                0027 c                  ing to lshmax.
                0028 c     lonshc    -  zonal      number of grid points of regular grid
                0029 c     latshc    -  meridional number of grid points of regular grid
                0030 c     dthetashc -  zonal      grid spacing
                0031 c     dphishc   -  meridional grid spacing
                0032
                0033       integer    lshcmax
                0034       parameter( lshcmax   = 70 )
                0035
                0036       integer    ncshc
                0037       parameter( ncshc   = (lshcmax+1)*(lshcmax+1) )
                0038
                0039       _RL        dthetashc
                0040       parameter( dthetashc = 2. )
                0041
                0042       _RL        dphishc
                0043       parameter( dphishc   = 2. )
                0044
                0045       integer    lonshc
                0046       parameter( lonshc    = Nx )
                0047
                0048       integer    latshc
538ab314d4 Patr*0049       parameter( latshc    = 180.0/dphishc )
0bed5b371d Patr*0050
                0051 c     ==================================================================
                0052 c     END OF HEADER SPHERE
                0053 c     ==================================================================
                0054
                0055