7fd59977 |
1 | -- File: IntImpParGen.cdl |
2 | -- Created: Mon Mar 2 10:07:38 1992 |
3 | -- Author: Laurent BUCHARD |
4 | -- <lbr@phobox> |
5 | ---Copyright: Matra Datavision 1992 |
6 | |
7 | |
8 | |
9 | package IntImpParGen |
10 | |
11 | |
12 | ---Purpose: Gives a generic algorithm to intersect Implicit Curves |
13 | -- and Bounded Parametric Curves. |
14 | -- |
15 | -- Level: Internal |
16 | -- |
17 | -- All the methods of all the classes are Internal. |
18 | |
19 | |
20 | uses Standard, TColStd, gp, math, IntRes2d, StdFail |
21 | |
22 | is |
23 | |
24 | deferred class ImpTool; |
25 | ---Purpose: Template class for an implicit curve. |
26 | |
27 | deferred generic class ParTool; |
28 | ---Purpose: Template class for a tool on a parameterised curve. |
29 | |
30 | generic class ImpParTool; |
31 | ---Purpose: Math function, instantiated inside the Intersector. |
32 | |
33 | generic class Intersector,MyImpParTool; |
34 | |
35 | |
36 | ---Purpose: Tool used by the package IntCurve and IntImpParGen |
37 | |
38 | DetermineTransition(Pos1 : Position from IntRes2d; |
39 | Tan1 : in out Vec2d from gp; |
40 | Norm1 : Vec2d from gp; |
41 | Trans1: in out Transition from IntRes2d; |
42 | Pos2 : Position from IntRes2d; |
43 | Tan2 : in out Vec2d from gp; |
44 | Norm2 : Vec2d from gp; |
45 | Trans2: in out Transition from IntRes2d; |
46 | Tol : Real from Standard); |
47 | |
48 | DetermineTransition(Pos1 : Position from IntRes2d; |
49 | Tan1 : in out Vec2d from gp; |
50 | Trans1: in out Transition from IntRes2d; |
51 | Pos2 : Position from IntRes2d; |
52 | Tan2 : in out Vec2d from gp; |
53 | Trans2: in out Transition from IntRes2d; |
54 | Tol : Real from Standard) |
55 | returns Boolean from Standard; |
56 | |
57 | DeterminePosition( Pos1 : in out Position from IntRes2d; |
58 | Dom1 : Domain from IntRes2d; |
59 | P1 : Pnt2d from gp; |
60 | Tol : Real from Standard); |
61 | |
62 | NormalizeOnDomain( Par1 : in out Real from Standard; |
63 | Dom1 : Domain from IntRes2d) |
64 | |
65 | returns Real from Standard; |
66 | |
67 | |
68 | end IntImpParGen; |
69 | |