7fd59977 |
1 | -- File: AIS_EllipseRadiusDimension.cdl |
2 | -- Created: Thu Jan 22 09:01:38 1998 |
3 | -- Author: Sergey ZARITCHNY |
4 | -- <szy@androx.nnov.matra-dtv.fr> |
5 | ---Copyright: Matra Datavision 1998 |
6 | |
7 | |
8 | deferred class EllipseRadiusDimension from AIS inherits Relation from AIS |
9 | |
10 | ---Purpose: |
11 | -- Computes geometry ( basis curve and plane of dimension) |
12 | -- for input shape aShape from TopoDS |
13 | -- Root class for MinRadiusDimension and MaxRadiusDimension |
14 | uses |
15 | Shape from TopoDS, |
16 | Elips from gp, |
17 | Pnt from gp, |
18 | Pln from gp, |
19 | Curve from Geom, |
20 | OffsetCurve from Geom, |
21 | Ellipse from Geom, |
22 | Plane from Geom, |
23 | Surface from Geom, |
24 | ExtendedString from TCollection, |
25 | KindOfSurface from AIS, |
26 | KindOfDimension from AIS |
27 | |
28 | is |
29 | Initialize(aShape : Shape from TopoDS; |
30 | aText : ExtendedString from TCollection); |
31 | |
32 | -- Ellipse radius dimension of a Shape which can be Edge |
33 | -- or Face (planar or cylindrical(surface of extrusion or |
34 | -- surface of offset)) |
35 | |
36 | |
37 | |
38 | KindOfDimension(me) returns KindOfDimension from AIS |
39 | is redefined; |
40 | |
41 | IsMovable(me) returns Boolean from Standard |
42 | is redefined; |
43 | |
44 | |
45 | -- |
46 | -- Computation private methods |
47 | -- |
48 | |
49 | ComputeGeometry( me: mutable ) ; |
50 | -- is private; |
51 | |
52 | ComputeFaceGeometry(me: mutable) |
53 | is private; |
54 | |
55 | ComputeCylFaceGeometry(me: mutable; |
56 | aSurfType : KindOfSurface from AIS; |
57 | aSurf : Surface from Geom; |
58 | Offset : Real from Standard ) |
59 | is private; |
60 | |
61 | ComputePlanarFaceGeometry(me: mutable) |
62 | is private; |
63 | |
64 | ComputeEdgeGeometry(me: mutable) |
65 | is private; |
66 | |
67 | fields |
68 | |
69 | myEllipse : Elips from gp is protected; |
70 | myFirstPar : Real from Standard is protected; |
71 | myLastPar : Real from Standard is protected; |
72 | myIsAnArc : Boolean from Standard is protected; |
73 | myOffsetCurve : OffsetCurve from Geom is protected; |
74 | myOffset : Real from Standard is protected; |
75 | myIsOffset : Boolean from Standard is protected; |
76 | |
77 | end EllipseRadiusDimension; |