  FUNCTION [INLINE] cmp$channels_equivalent
    (    channel_element_1_p: ^cmt$element_definition;
         channel_element_2_p: ^cmt$element_definition): boolean;

?? PUSH (LISTEXT := ON) ??

    cmp$channels_equivalent :=
          (channel_element_1_p^.data_channel.number = channel_element_2_p^.data_channel.number) AND
          (channel_element_1_p^.data_channel.concurrent = channel_element_2_p^.data_channel.concurrent) AND
          (channel_element_1_p^.data_channel.iou = channel_element_2_p^.data_channel.iou);
  FUNCEND cmp$channels_equivalent;

*copyc cmt$element_definition
?? POP ??
