class TIME_SET General cluster: time description: "Sets of compactly coded times" create: make Ancestors ARRAY [G] Queries infix "@" (i: INTEGER): NUMERIC additional_space: INTEGER all_default: BOOLEAN area: SPECIAL [NUMERIC] capacity: INTEGER changeable_comparison_criterion: BOOLEAN count: INTEGER entry (i: INTEGER): NUMERIC extendible: BOOLEAN full: BOOLEAN Growth_percentage: INTEGER has (v: NUMERIC): BOOLEAN index_set: INTEGER_INTERVAL is_empty: BOOLEAN is_equal (other: [like Current] TIME_SET): BOOLEAN is_inserted (v: NUMERIC): BOOLEAN item (i: INTEGER): TIME item_array (i: INTEGER): NUMERIC last: INTEGER linear_representation: LINEAR [NUMERIC] lower: INTEGER Minimal_increase: INTEGER object_comparison: BOOLEAN occurrences (v: NUMERIC): INTEGER prunable: BOOLEAN resizable: BOOLEAN same_items (other: [like Current] TIME_SET): BOOLEAN subarray (start_pos, end_pos: INTEGER): [like Current] TIME_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] TIME_SET) discard_items enter (v: [like item] NUMERIC; i: INTEGER) fill (other: CONTAINER [NUMERIC]) force (v: [like item] NUMERIC; i: INTEGER) grow (i: INTEGER) make (n: INTEGER) make_array (min_index, max_index: INTEGER) make_from_array (a: ARRAY [NUMERIC]) prune_all (v: NUMERIC) put (t: TIME) put_array (v: [like item] NUMERIC; i: INTEGER) resize (min_index, max_index: INTEGER) subcopy (other: [like Current] TIME_SET; start_pos, end_pos, index_pos: INTEGER) Constraints last non negative last small enough