blob: 8ba67e452530ecb48badabc428996da7aef42c54 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
|
-- File: EdgeFaceTransition.cdl
-- Created: Tue Aug 11 18:17:52 1992
-- Author: Remi LEQUETTE
-- <rle@phylox>
---Copyright: Matra Datavision 1992
class EdgeFaceTransition from TopCnx
---Purpose: TheEdgeFaceTransition is an algorithm to compute
-- the cumulated transition for interferences on an
-- edge.
uses
Boolean from Standard,
Real from Standard,
Integer from Standard,
Pnt from gp,
Dir from gp,
State from TopAbs,
Orientation from TopAbs,
CurveTransition from TopTrans
is
Create returns EdgeFaceTransition from TopCnx;
---Purpose: Creates an empty algorithm.
Reset( me : in out;
Tgt : Dir from gp; -- Tangent at this point
Norm : Dir from gp; -- Normal vector at this point
Curv : Real from Standard) -- Curvature at this point
---Purpose: Initialize the algorithm with the local
-- description of the edge.
is static;
Reset( me : in out;
Tgt : in Dir from gp) -- Tangent at this point
---Purpose: Initialize the algorithm with a linear Edge.
is static;
AddInterference(me : in out;
Tole : Real from Standard; -- Cosine tolerance
Tang : Dir from gp; -- Tangent on curve for this point
Norm : Dir from gp; -- Normal vector at this point
Curv : Real from Standard; -- Curvature at this point
Or : Orientation from TopAbs; -- Orientation on the curve
Tr : Orientation from TopAbs; -- Transition
BTr : Orientation from TopAbs) -- Boundary transition
---Purpose: Add a curve element to the boundary. Or is the
-- orientation of the interference on the boundary
-- curve. Tr is the transition of the interference.
-- BTr is the boundary transition of the
-- interference.
is static;
Transition(me) returns Orientation from TopAbs
---Purpose: Returns the current cumulated transition.
is static;
BoundaryTransition(me) returns Orientation from TopAbs
---Purpose: Returns the current cumulated BoundaryTransition.
is static;
fields
myCurveTransition : CurveTransition from TopTrans;
nbBoundForward : Integer from Standard;
nbBoundReversed : Integer from Standard;
end EdgeFaceTransition;
|