 
      CALL SEQUENCE...
       spgdev  SPIN SPOUT OUTPUT
 
 
      DESCRIPTION...
       spgdev - SETS SPECTRAL MEANS TO ZERO
 
 
      AUTHOR  - S.Lambert, SEPT 1979.
      LAST REVISION: $Header: /home/cvs/RMNLIB/utils/rdiag/lspgm/spgdev.ptn,v 4.9 2014/09/25 20:20:53 dugas Exp $
 
 
      PURPOSE - SETS THE SURFACE MEAN OF EACH FIELD IN A SPECTRAL FILE 
                TO ZERO LEAVING THE DEVIATION FROM THIS MEAN.
 
 
      INPUT FILE...
       SPIN  = GLOBAL SPECTRAL FIELDS
 
      OUTPUT FILE...
       SPOUT = DEVIATION OF SPECTRAL FIELDS
 
 
      EXIT CONDITIONS...
        0 NO PROBLEMS
        1 PROBLEMS READING SPIN
