-- File: TCollection_CompareOfInteger.cdl -- Created: Thu Aug 27 12:06:34 1992 -- Author: Mireille MERCIEN -- ---Copyright: Matra Datavision 1992 class CompareOfInteger from TCollection inherits PrivCompareOfInteger is Create ; IsLower (me; Left, Right: Integer) ---Level: Public ---Purpose: Returns True if is lower than . returns Boolean is redefined; IsGreater (me; Left, Right: Integer) ---Level: Public ---Purpose: Returns True if is greater than . returns Boolean is redefined; end;