deferred class FINITE [G] General cluster: base description: "Structures with a finite item count" Ancestors BOX* [G] Queries changeable_comparison_criterion: BOOLEAN count: INTEGER_32 full: BOOLEAN has (v: G): BOOLEAN is_empty: BOOLEAN linear_representation: LINEAR [G] object_comparison: BOOLEAN Commands compare_objects compare_references Constraints empty definition non negative count