1 -- File: GeomToIGES_GeomPoint.cdl
2 -- Created: Wed Nov 16 14:24:57 1994
3 -- Author: Marie Jose MARTZ
5 ---Copyright: Matra Datavision 1994
7 class GeomPoint from GeomToIGES inherits GeomEntity from GeomToIGES
9 ---Purpose: This class implements the transfer of the Point Entity from Geom
10 -- to IGES . These are :
18 CartesianPoint from Geom,
20 GeomEntity from GeomToIGES
24 Create returns GeomPoint from GeomToIGES;
27 Create(GE : GeomEntity from GeomToIGES)
28 returns GeomPoint from GeomToIGES;
29 ---Purpose : Creates a tool GeomPoint ready to run and sets its
32 TransferPoint (me : in out;
33 start : Point from Geom)
34 returns mutable Point from IGESGeom;
35 ---Purpose : Transfert a Point from Geom to IGES. If this
36 -- Entity could not be converted, this member returns a NullEntity.
38 TransferPoint (me : in out;
39 start : CartesianPoint from Geom)
40 returns mutable Point from IGESGeom;
41 ---Purpose : Transfert a CartesianPoint from Geom to IGES. If this
42 -- Entity could not be converted, this member returns a NullEntity.