SPWGET

The SPWGET routine gets wave-space constants.

USAGE:    CALL SPWGET(IROMB,MAXWV,EPS,EPSTOP,ENN1,ELONN1,EON,EONTOP)

   Input arguments:
      IROMB    - INTEGER SPECTRAL DOMAIN SHAPE
                 (0 FOR TRIANGULAR, 1 FOR RHOMBOIDAL)
      MAXWV    - INTEGER SPECTRAL TRUNCATION

   Output arguments:
      EPS      - REAL ((MAXWV+1)*((IROMB+1)*MAXWV+2)/2)
      EPSTOP   - REAL (MAXWV+1)
      ENN1     - REAL ((MAXWV+1)*((IROMB+1)*MAXWV+2)/2)
      ELONN1   - REAL ((MAXWV+1)*((IROMB+1)*MAXWV+2)/2)
      EON      - REAL ((MAXWV+1)*((IROMB+1)*MAXWV+2)/2)
      EONTOP   - REAL (MAXWV+1)
 
 


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

   Date posted: 2/23/2007