    TYPE
       pmt$vector_capability = 0 .. 15;

    CONST
      pmc$extended_vectors = 1,
      pmc$standard_vectors = 2,
      pmc$no_vectors = 3;
