CIPRIME SOAPC1                                                          SOAPC1      1
C                                                                       SOAPC1      2
C-----------------------------------------------------------------------SOAPC1      3
C                                                                       SOAPC1      4
                                                                        SOAPC1      5
      LOGICAL RECORD,OPEN1,OPENED,PLAYBA,FILLED,DPINIT,HTIME            SOAPC1      6
      LOGICAL GPINIT,GPPLOT,MENUM,USCALE,DPPLOT,RELATE,LHELP,GSCALE     SOAPC1      7
      LOGICAL GINIT,ONEPLT,SCALX,SSCALE,PINT,WFLAG,WFLAG2,GPINI2,P3INT  SOAPC1      8
      CHARACTER*80 CHNLFI                                               SOAPC1      9
      CHARACTER*7 PROMPT                                                SOAPC1     10
      CHARACTER*5 VERNUM                                                SOAPC1     11
      CHARACTER*8 VSDATE                                                SOAPC1     12
      COMMON /INPDEV/ LIN,LOUT,ICHNL,IREC,IREL,LU55,ISAVE,IPPLOT,LPIN   SOAPC1     13
     *               ,IOU                                               SOAPC1     14
      COMMON /FNAMES/ PROMPT,CHNLFI                                     SOAPC1     15
      COMMON /STATUS/ RECORD,OPEN1,OPENED,PLAYBA,FILLED,DPINIT,HTIME,   SOAPC1     16
     1                SSCALE,GPINIT,GPPLOT,MENUM,USCALE,DPPLOT,         SOAPC1     17
     1                ONEPLT,GINIT,SCALX,PINT,IPSPLT,WFLAG,WFLAG2,      SOAPC1     18
     1                GPINI2,P3INT,LHELP,GSCALE                         SOAPC1     19
      COMMON /RELANG/ RELATE,IREF,KLFO,BASPC,FQBASE                     SOAPC1     20
      COMMON /VERS/ VERNUM,VSDATE                                       SOAPC1     21
C                                                                       SOAPC1     22
C-----------------------------------                                    SOAPC1     23
                                                                        SOAPC1     24
                                                                        SOAPC1     25
