
  TYPE
    ift$terminal_model_size = 1 .. ifc$max_terminal_model_size;

  TYPE
    ift$terminal_model = record
      size: ift$terminal_model_size,
      value: string (ifc$max_terminal_model_size),
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc ifc$terminal_constants
?? POP ??
