    class
    	EV_COLUMN_ACTION_SEQUENCE

    General
    	cluster: interface
    	description: "Action sequence for multi column list column events."
    	keywords: "ev_column"
    	create: make_filled, default_create

    Ancestors
    	EV_ACTION_SEQUENCE* [EVENT_DATA -> TUPLE create default_create end]

    Action sequences
    	duplicate (n: INTEGER_32): [like Current] EV_COLUMN_ACTION_SEQUENCE

    Queries
    	after: BOOLEAN
    	before: BOOLEAN
    	Blocked_state: INTEGER_32
    	call_is_underway: BOOLEAN
    	capacity: INTEGER_32
    	changeable_comparison_criterion: BOOLEAN
    	count: INTEGER_32
    	cursor: ARRAYED_LIST_CURSOR
    	empty_actions: ARRAYED_LIST [PROCEDURE [ANY, TUPLE]]
    	exhausted: BOOLEAN
    	Extendible: BOOLEAN
    	first: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]]
    	for_all (test: FUNCTION [ANY, TUPLE [PROCEDURE [ANY, TUPLE [INTEGER_32]]], BOOLEAN]): BOOLEAN
    	full: BOOLEAN
    	has (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]]): BOOLEAN
    	i_th alias "[]" (i: INTEGER_32): [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]]
    	index: INTEGER_32
    	index_of (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]]; i: INTEGER_32): INTEGER_32
    	index_set: INTEGER_INTERVAL
    	infix "@" (i: INTEGER_32): [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]]
    	is_empty: BOOLEAN
    	is_equal (other: [like Current] EV_COLUMN_ACTION_SEQUENCE): BOOLEAN
    	is_inserted (v: PROCEDURE [ANY, TUPLE [INTEGER_32]]): BOOLEAN
    	isfirst: BOOLEAN
    	islast: BOOLEAN
    	item: PROCEDURE [ANY, TUPLE [INTEGER_32]]
    	last: [like first] PROCEDURE [ANY, TUPLE [INTEGER_32]]
    	linear_representation: LINEAR [PROCEDURE [ANY, TUPLE [INTEGER_32]]]
    	name: STRING_8
    	Normal_state: INTEGER_32
    	not_empty_actions: ARRAYED_LIST [PROCEDURE [ANY, TUPLE]]
    	object_comparison: BOOLEAN
    	occurrences (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]]): INTEGER_32
    	off: BOOLEAN
    	Paused_state: INTEGER_32
    	prunable: BOOLEAN
    	readable: BOOLEAN
    	sequential_occurrences (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]]): INTEGER_32
    	state: INTEGER_32
    	there_exists (test: FUNCTION [ANY, TUPLE [PROCEDURE [ANY, TUPLE [INTEGER_32]]], BOOLEAN]): BOOLEAN
    	valid_cursor (p: CURSOR): BOOLEAN
    	valid_cursor_index (i: INTEGER_32): BOOLEAN
    	valid_index (i: INTEGER_32): BOOLEAN
    	writable: BOOLEAN

    Commands
    	abort
    	append (s: SEQUENCE [PROCEDURE [ANY, TUPLE [INTEGER_32]]])
    	arrayed_list_make (n: INTEGER_32)
    	back
    	block
    	call (event_data: TUPLE [INTEGER_32])
    	compare_objects
    	compare_references
    	copy (other: [like Current] EV_COLUMN_ACTION_SEQUENCE)
    	do_all (action: PROCEDURE [ANY, TUPLE [PROCEDURE [ANY, TUPLE [INTEGER_32]]]])
    	do_if (action: PROCEDURE [ANY, TUPLE [PROCEDURE [ANY, TUPLE [INTEGER_32]]]]; test: FUNCTION [ANY, TUPLE [PROCEDURE [ANY, TUPLE [INTEGER_32]]], BOOLEAN])
    	extend (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	extend_kamikaze (an_item: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	fill (other: CONTAINER [PROCEDURE [ANY, TUPLE [INTEGER_32]]])
    	finish
    	flush
    	force (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	force_extend (action: PROCEDURE [ANY, TUPLE])
    	forth
    	go_i_th (i: INTEGER_32)
    	go_to (p: CURSOR)
    	make_filled (n: INTEGER_32)
    	make_from_array (a: ARRAY [PROCEDURE [ANY, TUPLE [INTEGER_32]]])
    	merge_left (other: ARRAYED_LIST [PROCEDURE [ANY, TUPLE [INTEGER_32]]])
    	merge_right (other: ARRAYED_LIST [PROCEDURE [ANY, TUPLE [INTEGER_32]]])
    	move (i: INTEGER_32)
    	pause
    	prune (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	prune_all (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	prune_when_called (an_action: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	put (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	put_front (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	put_i_th (v: [like i_th] PROCEDURE [ANY, TUPLE [INTEGER_32]]; i: INTEGER_32)
    	put_left (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	put_right (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	remove
    	remove_left
    	remove_right
    	replace (v: [like first] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	resize (new_capacity: INTEGER_32)
    	resume
    	search (v: [like item] PROCEDURE [ANY, TUPLE [INTEGER_32]])
    	start
    	swap (i: INTEGER_32)
    	wipe_out
    	wrapper (a_column: INTEGER_32; action: PROCEDURE [ANY, TUPLE])