 TYPE
    cmt$radial_interface = record
      { An S1 has only four radial interface ports.}
      { On an S3, the M3 and P3 are on the same radial_interface port.}
      port: array [cmt$radial_if_port_number] of cmt$element_connection,
    recend;

*copyc cmt$element_connection
*copyc cmt$radial_if_port_number
