1 -- File: MeshAlgo_IndexedPntComparator.cdl
2 -- Created: Tue Apr 5 11:45:18 1994
3 -- Author: Didier PIFFAULT
5 ---Copyright: Matra Datavision 1994
8 generic class IndexedPntComparator from MeshAlgo
9 (HandledStructureOfPnt as any; Direction as any)
11 ---Purpose: Sort two point in a given direction.
14 uses Boolean from Standard
17 is Create (theDir : Direction;
18 TheTol : Real from Standard;
19 HDS : HandledStructureOfPnt)
20 returns IndexedPntComparator;
23 IsLower (me; Left, Right: Integer)
24 ---Purpose: returns True if <Left> is lower than <Right>
25 returns Boolean from Standard;
27 IsGreater (me; Left, Right: Integer)
28 ---Purpose: returns True if <Left> is greater than <Right>
29 returns Boolean from Standard;
31 IsEqual(me; Left, Right: Integer)
32 ---Purpose: returns True when <Right> and <Left> are equal.
33 returns Boolean from Standard;
36 fields IndexedStructure : HandledStructureOfPnt;
37 DirectionOfSort : Direction;
38 Tolerance : Real from Standard;
40 end IndexedPntComparator;