SPTGPTVD

The SPTGPTVD routine performs a Spherical Transform
             from Spectral coefficients of divergences and curls
             to specified sets of station point vectors and their
             gradients on the globe.
               DP=(D(UP)/DLON+D(VP*CLAT)/DLAT)/(R*CLAT)
               ZP=(D(VP)/DLON-D(UP*CLAT)/DLAT)/(R*CLAT)
               UXP=D(UP*CLAT)/DLON/(R*CLAT)
               VXP=D(VP*CLAT)/DLON/(R*CLAT)
               UYP=D(UP*CLAT)/DLAT/R
               VYP=D(VP*CLAT)/DLAT/R

             The wave-space can be either Triangular or Rhomboidal.
             The wave and point fields may have general indexing,
             but each wave field is in sequential 'IBM order',
             i.e. with zonal wavenumber as the slower index.
             The Transforms are all multiprocessed over stations.
             Transform several fields at a time to improve vectorization.
             Subprogram can be called from a multiprocessing environment.

USAGE:    CALL SPTGPTVD(IROMB,MAXWV,KMAX,NMAX,
                        KWSKIP,KGSKIP,NRSKIP,NGSKIP,
                        RLAT,RLON,WAVED,WAVEZ,
                        DP,ZP,UP,VP,UXP,VXP,UYP,VYP)

   Input arguments:
      IROMB    - INTEGER SPECTRAL DOMAIN SHAPE
                 (0 FOR TRIANGULAR, 1 FOR RHOMBOIDAL)
      MAXWV    - INTEGER SPECTRAL TRUNCATION
      KMAX     - INTEGER NUMBER OF FIELDS TO TRANSFORM.
      NMAX     - INTEGER NUMBER OF STATION POINTS TO RETURN
      KWSKIP   - INTEGER SKIP NUMBER BETWEEN WAVE FIELDS
                 (DEFAULTS TO (MAXWV+1)*((IROMB+1)*MAXWV+2) IF KWSKIP=0)
      KGSKIP   - INTEGER SKIP NUMBER BETWEEN STATION POINT SETS
                 (DEFAULTS TO NMAX IF KGSKIP=0)
      NRSKIP   - INTEGER SKIP NUMBER BETWEEN STATION LATS AND LONS
                 (DEFAULTS TO 1 IF NRSKIP=0)
      NGSKIP   - INTEGER SKIP NUMBER BETWEEN STATION POINTS
                 (DEFAULTS TO 1 IF NGSKIP=0)
      RLAT     - REAL (*) STATION LATITUDES IN DEGREES
      RLON     - REAL (*) STATION LONGITUDES IN DEGREES
      WAVED    - REAL (*) WAVE DIVERGENCE FIELDS
      WAVEZ    - REAL (*) WAVE VORTICITY FIELDS

   Output arguments:
      DP       - REAL (*) STATION POINT DIVERGENCE SETS
      ZP       - REAL (*) STATION POINT VORTICITY SETS
      UP       - REAL (*) STATION POINT U-WIND SETS
      VP       - REAL (*) STATION POINT V-WIND SETS
      UXP      - REAL (*) STATION POINT U-WIND X-GRADIENT SETS
      VXP      - REAL (*) STATION POINT V-WIND X-GRADIENT SETS
      UYP      - REAL (*) STATION POINT U-WIND Y-GRADIENT SETS
      VYP      - REAL (*) STATION POINT V-WIND Y-GRADIENT SETS
 
 
 


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

   Date posted: 2/23/2007