
  TYPE
    tut$cursor_behavior_ordinal = (tuc$move_past_left, tuc$move_past_right,
          tuc$move_past_top, tuc$move_past_bottom, tuc$char_past_left,
          tuc$char_past_right, tuc$char_past_last_position);


