 TYPE
    cmt$pem_connectivity = record
      central_processor: cmt$element_connection,
      iou: cmt$element_connection,
      sensor_channel: array [cmt$sensor_channel_number] of cmt$sensor_channel,
    recend;

*copyc cmt$element_connection
*copyc cmt$sensor_channel
*copyc cmt$sensor_channel_number
