[occt.git] / src / MeshAlgo / MeshAlgo_PntComparator.cdl

-- File:	MeshAlgo_PntComparator.cdl
-- Created:	Fri Jun 18 13:46:14 1993
-- Author:	Didier PIFFAULT
--		<dpf@zerox>
---Copyright:	 Matra Datavision 1993


generic class PntComparator from MeshAlgo (Point as any; Direction as any)

	---Purpose: Sort two point in a given direction.


uses  Boolean from Standard


is      Create (theDir : Direction; TheTol: Real from Standard) 
    	    returns PntComparator;


    	IsLower (me; Left, Right: Point)
	---Purpose: returns True if <Left> is lower than <Right>
    	    returns Boolean from Standard;
    
    	IsGreater (me; Left, Right: Point)
	---Purpose: returns True if <Left> is greater than <Right>
    	    returns Boolean from Standard;

    	IsEqual(me; Left, Right: Point)
	---Purpose: returns True when <Right> and <Left> are equal.
	    returns Boolean from Standard;


fields  DirectionOfSort : Direction;
    	Tolerance       : Real from Standard;

end PntComparator;
Commit	Line	Data
7fd59977	1	-- File: MeshAlgo_PntComparator.cdl
	2	-- Created: Fri Jun 18 13:46:14 1993
	3	-- Author: Didier PIFFAULT
	4	-- <dpf@zerox>
	5	---Copyright: Matra Datavision 1993
	6
	7
	8	generic class PntComparator from MeshAlgo (Point as any; Direction as any)
	9
	10	---Purpose: Sort two point in a given direction.
	11
	12
	13	uses Boolean from Standard
	14
	15
	16	is Create (theDir : Direction; TheTol: Real from Standard)
	17	returns PntComparator;
	18
	19
	20	IsLower (me; Left, Right: Point)
	21	---Purpose: returns True if <Left> is lower than <Right>
	22	returns Boolean from Standard;
	23
	24	IsGreater (me; Left, Right: Point)
	25	---Purpose: returns True if <Left> is greater than <Right>
	26	returns Boolean from Standard;
	27
	28	IsEqual(me; Left, Right: Point)
	29	---Purpose: returns True when <Right> and <Left> are equal.
	30	returns Boolean from Standard;
	31
	32
	33	fields DirectionOfSort : Direction;
	34	Tolerance : Real from Standard;
	35
	36	end PntComparator;