CALL SEQUENCE...
       spcalpa  IN OUT OUTPUT
 
 
      DESCRIPTION...
       spcalpa - MAKES FILE OF CMPLX(N*(N+1),0.)
  
 
      AUTHORS  - J.D.Henderson AND T.Shepherd, JUN 01/79.
      LAST REVISION: $Header: Autres-corrections-d-usages-de-MAXW-NWDS-modifs-dans-GGSIGN-SIGNAG @ 2018-06-05 17:00:06 -0400 (dugas) $
  
 
      PURPOSE  - PRODUCES A COMPLEX FILE (OUT) OF THE FACTOR C-ALPHA=N(N+1);
                (CMPLX(N*(N+1),0.)), WHERE N IS THE LEGENDRE POLYNOMIAL
                 COEFFICIENT.
 
      NOTE     - ONE RECORD IS PRODUCED FOR EACH RECORD IN THE INPUT
                 FILE (IN).
 
 
      INPUT FILE...
       IN = FILE OF COMPLEX COEFFICIENTS.
 
      OUTPUT FILE...
       OUT = COMPLEX FILE CONTAINING THE REQUIRED VALUES FOR EACH
             RECORD OF THE INPUT FILE (IN).
 
 
      EXIT CONDITIONS...
        0 NO PROBLEMS
        1 NO SPECTRAL DATA FOUND ON IN