
*copyc tut$cursor_addressing_type
*copyc tut$cursor_addressing_bias
*copyc tuc$cursor_number_of_digits
*copyc tut$cursor_behavior

  TYPE
    tut$cursor_parameters = record
      addressing_type: tut$cursor_addressing_type,
      addressing_bias: tut$cursor_addressing_bias,
      column_before_row: boolean,
      number_digits_in_column: 0 .. tuc$cursor_number_of_digits,
      number_digits_in_row: 0 .. tuc$cursor_number_of_digits,
      behavior: tut$cursor_behavior,
    recend;

