      BLOCK DATA   DBLUK                                                SQ EX3
      COMMON /X/ X
      DATA X/25.4/
      END
