class
	DATE_SET

General
	cluster: time
	description: "Sets of compactly coded dates"
	create: make

Ancestors
	ARRAY [G]

Queries
	infix "@" (i: INTEGER): INTEGER
	additional_space: INTEGER
	all_default: BOOLEAN
	area: SPECIAL [INTEGER]
	capacity: INTEGER
	changeable_comparison_criterion: BOOLEAN
	count: INTEGER
	entry (i: INTEGER): INTEGER
	extendible: BOOLEAN
	full: BOOLEAN
	Growth_percentage: INTEGER
	has (v: INTEGER): BOOLEAN
	index_set: INTEGER_INTERVAL
	is_empty: BOOLEAN
	is_equal (other: [like Current] DATE_SET): BOOLEAN
	is_inserted (v: INTEGER): BOOLEAN
	item (i: INTEGER): DATE
	item_array (i: INTEGER): INTEGER
	last: INTEGER
	linear_representation: LINEAR [INTEGER]
	lower: INTEGER
	Minimal_increase: INTEGER
	object_comparison: BOOLEAN
	occurrences (v: INTEGER): INTEGER
	prunable: BOOLEAN
	resizable: BOOLEAN
	same_items (other: [like Current] DATE_SET): BOOLEAN
	subarray (start_pos, end_pos: INTEGER): [like Current] DATE_SET
	to_c: ANY
	upper: INTEGER
	valid_index (i: INTEGER): BOOLEAN
	valid_index_set: BOOLEAN

Commands
	automatic_grow
	clear_all
	compare_objects
	compare_references
	copy (other: [like Current] DATE_SET)
	discard_items
	enter (v: [like item] INTEGER; i: INTEGER)
	fill (other: CONTAINER [INTEGER])
	force (v: [like item] INTEGER; i: INTEGER)
	grow (i: INTEGER)
	make (n: INTEGER)
	make_array (min_index, max_index: INTEGER)
	make_from_array (a: ARRAY [INTEGER])
	prune_all (v: INTEGER)
	put (d: DATE)
	put_array (v: [like item] INTEGER; i: INTEGER)
	resize (min_index, max_index: INTEGER)
	subcopy (other: [like Current] DATE_SET; start_pos, end_pos, index_pos: INTEGER)

Constraints
	last non negative
	last small enough