sptgptv.f File Reference

Transform spectral vector to station points. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	sptgptv (IROMB, MAXWV, KMAX, NMAX, KWSKIP, KGSKIP, NRSKIP, NGSKIP, RLAT, RLON, WAVED, WAVEZ, UP, VP)
	This subprogram performs a spherical transform from spectral coefficients of divergences and curls to specified sets of station point vectors on the globe. More...

Detailed Description

Transform spectral vector to station points.

Program History Log

Date	Programmer	Comments
96-02-29	IREDELL	Initial
1998-12-15	IREDELL	Openmp directives inserted
1999-08-18	IREDELL	Openmp directive typo fixed
2003-06-30	IREDELL	use spfftpt()

Author

IREDELL

Date

96-02-29

Definition in file sptgptv.f.

Function/Subroutine Documentation

sptgptv()

subroutine sptgptv	(		IROMB,
			MAXWV,
			KMAX,
			NMAX,
			KWSKIP,
			KGSKIP,
			NRSKIP,
			NGSKIP,
		real, dimension(*)	RLAT,
		real, dimension(*)	RLON,
		real, dimension(*)	WAVED,
		real, dimension(*)	WAVEZ,
		real, dimension(*)	UP,
		real, dimension(*)	VP
	)

This subprogram performs a spherical transform from spectral coefficients of divergences and curls to specified sets of station point vectors on the globe.

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.

Parameters

IROMB	spectral domain shape (0 for triangular, 1 for rhomboidal)
MAXWV	spectral truncation
KMAX	number of fields to transform.
NMAX	number of station points to return
KWSKIP	skip number between wave fields (defaults to (MAXWV+1)*((IROMB+1)*MAXWV+2) IF KWSKIP=0)
KGSKIP	skip number between station point sets (defaults to NMAX IF KGSKIP=0)
NRSKIP	skip number between station lats and lons (defaults to 1 if NRSKIP=0)
NGSKIP	skip number between station points (defaults to 1 if NGSKIP=0)
RLAT	station latitudes in degrees
RLON	station longitudes in degrees
WAVED	wave divergence fields
WAVEZ	wave vorticity fields
UP	station point u-wind sets
VP	station point v-wind sets

Author

IREDELL

Date

96-02-29

Definition at line 51 of file sptgptv.f.

References spdz2uv(), spfftpt(), splegend(), spsynth(), and spwget().

Referenced by sptgptd(), and sptrungv().