;          **************************************************
;          *                                                *
;          *               S U P E R - M A C                *
;          *                                                *
;          *                  PREPROCESSOR                  *
;          *                                                *
;          *                 FORTRAN VERSION                *
;          *                                                *
;          *     AUTHORS:        Thomas J. Weslowski        *
;          *                     Computer Science Dept.     *
;          *                     SUNY at Oswego             *
;          *                     Oswego, NY  13126          *
;          *                                                *
;          *                     and                        *
;          *                                                *
;          *                     Richard R. DeMidio         *
;          *                     Instructional Comp. Ctr.   *
;          *                     Snygg Hall                 *
;          *                     SUNY at Oswego             *
;          *                     Oswego, NY  13126          *
;          *                                                *
;          *     MAINTAINER:     Edward F. Beadel, Jr.      *
;          *                     Manager                    *
;          *                     Instructional Comp. Ctr.   *
;          *                     Snygg Hall                 *
;          *                     SUNY at Oswego             *
;          *                     Oswego, NY  13126          *
;          *                                                *
;          *     PHONE:          (315) 341-3305             *
;          *                                                *
;          **************************************************
;
;
;                    COPYRIGHT (c) 1981, 1982, 1983
;                                  BY
;                    Instructional Computing Center
;                State University of New York at Oswego
;                          Oswego, NY   13126
;
;               contact:	Edward F. Beadel, Jr., Manager
;                         phone:		315/341-3055
;
;
;          This software is furnished in an as-is  condition,
;          with  no committments of support or updates.  This
;          software or any other copies thereof  may  NOT  be
;          sold  for  profit  nor  can  it be included in any
;          package to be sold for profit without the  written
;          consent  of  the  author and the coppyright owner.
;          This software may be used and copied only  in  ac-
;          cordance  with  the terms set forth above and with
;          the inclusion of the above copyright notice.
;
;               The information in this software  is  subject
;          to  change  without  notice and should not be con-
;          strued as a commitment by The State University  of
;          New  York, The C.A.U.S.E.  Instructional Computing
;          Center, the author(s)  or  maintainer(s)  of  this
;          software.
;
;               The  State  University  of  New   York,   The
;          C.A.U.S.E.   Instructional  Computing  Center, the
;          author(s), and the maintainer(s) of this  software
;          collectively  and individually assume no responsi-
;          bility  for  the  use  or  reliability   of   this
;          software.
;
;
;

