CIPRIME UDCE                                                            UDCE        1
C                                                                       UDCE        2
C                                                                       UDCE        3
      LOGICAL       SOLN                                                UDCE        4
      COMMON /UDCED/ IDUMBK(300),IDUMAX,IDUMNX,IDUMPT(30),IFREE,        UDCE        5
     1              IFRTBK, IFRTMX,INNUM(NUDC*5),INTOP(NUDC),           UDCE        6
     2              IPOINT(NUDC*5),JOPOIN(NUDC*5),IOUTNU(NUDC*5),       UDCE        7
     3              IOUTOP(NUDC),SOLN                                   UDCE        8
C                                                                       UDCE        9
C                                                                       UDCE       10
      CHARACTER*17  DUMNAM,FRTNAM                                       UDCE       11
      COMMON/UDCEC/     DUMNAM(300),        FRTNAM(30)                  UDCE       12
C                                                                       UDCE       13
