7fd59977 |
1 | -- File: Geom2d_CartesianPoint.cdl |
2 | -- Created: Wed Mar 24 17:56:19 1993 |
3 | -- Author: Philippe DAUTRY |
4 | -- <fid@sdsun2> |
5 | -- Copyright: Matra Datavision 1993 |
6 | |
7 | ---Copyright: Matra Datavision 1991 |
8 | |
9 | |
10 | class CartesianPoint from Geom2d inherits Point from Geom2d |
11 | |
12 | --- Purpose : Describes a point in 2D space. A |
13 | -- Geom2d_CartesianPoint is defined by a gp_Pnt2d |
14 | -- point, with its two Cartesian coordinates X and Y. |
15 | |
16 | |
17 | |
18 | uses Ax2d from gp, |
19 | Pnt2d from gp, |
20 | Trsf2d from gp, |
21 | Vec2d from gp, |
22 | Geometry from Geom2d |
23 | |
24 | is |
25 | |
26 | Create (P : Pnt2d) returns mutable CartesianPoint; |
27 | --- Purpose : Returns a persistent copy of P. |
28 | |
29 | |
30 | Create (X, Y : Real) returns mutable CartesianPoint; |
31 | |
32 | |
33 | |
34 | SetCoord (me : mutable; X, Y : Real); |
35 | --- Purpose : Set <me> to X, Y coordinates. |
36 | |
37 | |
38 | SetPnt2d (me : mutable; P : Pnt2d); |
39 | --- Purpose : Set <me> to P.X(), P.Y() coordinates. |
40 | |
41 | |
42 | SetX (me : mutable; X : Real); |
43 | --- Purpose : Changes the X coordinate of me. |
44 | |
45 | |
46 | SetY (me : mutable; Y : Real); |
47 | --- Purpose : Changes the Y coordinate of me. |
48 | |
49 | |
50 | Coord (me; X, Y : out Real); |
51 | --- Purpose : Returns the coordinates of <me>. |
52 | |
53 | |
54 | Pnt2d (me) returns Pnt2d; |
55 | --- Purpose : |
56 | -- Returns a non persistent cartesian point with |
57 | -- the same coordinates as <me>. |
58 | -- -C++: return const& |
59 | |
60 | |
61 | X (me) returns Real; |
62 | --- Purpose : Returns the X coordinate of <me>. |
63 | |
64 | |
65 | Y (me) returns Real; |
66 | --- Purpose : Returns the Y coordinate of <me>. |
67 | |
68 | |
69 | |
70 | Transform (me : mutable; T : Trsf2d); |
71 | |
72 | |
73 | |
74 | Copy (me) returns mutable like me; |
75 | |
76 | fields |
77 | |
78 | gpPnt2d : Pnt2d; |
79 | |
80 | end; |