SPSYNTH

The SPSYNTH routine synthesizes Fourier coefficients from
            spectral coefficients for a latitude pair (Northern and
            Southern Hemispheres).  Vector components are divided by
            cosine of latitude.

USAGE:    CALL SPSYNTH(I,M,IM,IX,NC,NCTOP,KM,CLAT,PLN,PLNTOP,MP,
                       SPC,SPCTOP,F)

   Input argument list:
      I        - INTEGER SPECTRAL DOMAIN SHAPE
                 (0 FOR TRIANGULAR, 1 FOR RHOMBOIDAL)
      M        - INTEGER SPECTRAL TRUNCATION
      IM       - INTEGER EVEN NUMBER OF FOURIER COEFFICIENTS
      IX       - INTEGER DIMENSION OF FOURIER COEFFICIENTS (IX>=IM+2)
      NC       - INTEGER DIMENSION OF SPECTRAL COEFFICIENTS
                 (NC>=(M+1)*((I+1)*M+2))
      NCTOP    - INTEGER DIMENSION OF SPECTRAL COEFFICIENTS OVER TOP
                 (NCTOP>=2*(M+1))
      KM       - INTEGER NUMBER OF FIELDS
      CLAT     - REAL COSINE OF LATITUDE
      PLN      - REAL ((M+1)*((I+1)*M+2)/2) LEGENDRE POLYNOMIAL
      PLNTOP   - REAL (M+1) LEGENDRE POLYNOMIAL OVER TOP
      SPC      - REAL (NC,KM) SPECTRAL COEFFICIENTS
      SPCTOP   - REAL (NCTOP,KM) SPECTRAL COEFFICIENTS OVER TOP
      MP       - INTEGER (KM) IDENTIFIERS (0 FOR SCALAR, 1 FOR VECTOR)
 
   Output argument list:
      F        - REAL (IX,2,KM) FOURIER COEFFICIENTS FOR LATITUDE PAIR
 
 


  
SPLIB.tar
  
Library contains routines to be
   be used for a variety of spectral transform functions. (Fortran90) 

   Date posted: 2/23/2007