b311480e |
1 | -- Created on: 1993-06-03 |
2 | -- Created by: Jacques GOUSSARD |
3 | -- Copyright (c) 1993-1999 Matra Datavision |
973c2be1 |
4 | -- Copyright (c) 1999-2014 OPEN CASCADE SAS |
b311480e |
5 | -- |
973c2be1 |
6 | -- This file is part of Open CASCADE Technology software library. |
b311480e |
7 | -- |
d5f74e42 |
8 | -- This library is free software; you can redistribute it and/or modify it under |
9 | -- the terms of the GNU Lesser General Public License version 2.1 as published |
973c2be1 |
10 | -- by the Free Software Foundation, with special exception defined in the file |
11 | -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT |
12 | -- distribution for complete text of the license and disclaimer of any warranty. |
b311480e |
13 | -- |
973c2be1 |
14 | -- Alternatively, this file may be used under the terms of Open CASCADE |
15 | -- commercial license or contractual agreement. |
7fd59977 |
16 | |
17 | generic class ArcFunction from Contap |
18 | (TheArc as any; |
19 | TheSurface as any; |
89f18cb9 |
20 | TheArcTool as any; |
21 | TheSurfaceTool as any; |
7fd59977 |
22 | TheSurfProps as any; -- as SurfProps from Contap(TheSurface, |
23 | -- TheSurfaceTool) |
24 | TheContTool as any) -- as ContTool from Contap() |
25 | |
26 | |
27 | inherits FunctionWithDerivative from math |
28 | |
29 | uses Pnt from gp, |
30 | Dir from gp, |
31 | SequenceOfPnt from TColgp, |
32 | TFunction from Contap, |
33 | --modified by NIZNHY-PKV Thu Mar 29 16:52:28 2001 f |
34 | Quadric from IntSurf |
35 | --modified by NIZNHY-PKV Thu Mar 29 16:52:31 2001 t |
36 | |
37 | |
38 | is |
39 | |
40 | Create |
41 | |
42 | returns ArcFunction from Contap; |
43 | |
44 | |
45 | Set(me: in out; S: TheSurface) |
46 | |
47 | is static; |
48 | |
49 | Set(me: in out; Direction: Dir from gp) |
50 | |
51 | ---C++: inline |
52 | is static; |
53 | |
54 | |
55 | Set(me: in out; Direction: Dir from gp; Angle: Real from Standard) |
56 | |
57 | ---C++: inline |
58 | is static; |
59 | |
60 | |
61 | Set(me: in out; Eye: Pnt from gp) |
62 | |
63 | ---C++: inline |
64 | is static; |
65 | |
66 | |
67 | Set(me: in out; Eye: Pnt from gp; Angle: Real from Standard) |
68 | |
69 | ---C++: inline |
70 | is static; |
71 | |
72 | |
73 | Set(me: in out; A: TheArc) |
74 | |
75 | ---C++: inline |
76 | is static; |
77 | |
78 | |
79 | Value(me: in out; X: Real from Standard; F: out Real from Standard) |
80 | |
81 | returns Boolean from Standard; |
82 | |
83 | |
84 | Derivative(me: in out; X: Real from Standard; D: out Real from Standard) |
85 | |
86 | returns Boolean from Standard; |
87 | |
88 | |
89 | Values(me: in out; X: Real from Standard; F,D: out Real from Standard) |
90 | |
91 | returns Boolean from Standard; |
92 | |
93 | |
94 | NbSamples(me) |
95 | |
96 | returns Integer from Standard |
97 | is static; |
98 | |
99 | |
100 | GetStateNumber(me: in out) |
101 | |
102 | returns Integer from Standard |
103 | is redefined; |
104 | |
105 | |
106 | Valpoint(me; Index: Integer from Standard) |
107 | |
108 | returns Pnt from gp |
109 | ---C++: return const& |
110 | ---C++: inline |
111 | is static; |
112 | |
113 | --modified by NIZNHY-PKV Thu Mar 29 16:51:24 2001 f |
114 | Quadric(me) |
115 | returns Quadric from IntSurf |
116 | ---C++: return const& |
117 | is static; |
118 | --modified by NIZNHY-PKV Thu Mar 29 16:51:31 2001 t |
119 | |
120 | |
121 | |
122 | fields |
123 | |
124 | myArc : TheArc; |
125 | mySurf : TheSurface; |
126 | myMean : Real from Standard; |
127 | myType : TFunction from Contap; |
128 | myDir : Dir from gp; |
129 | myCosAng : Real from Standard; |
130 | myEye : Pnt from gp; |
131 | solpt : Pnt from gp; |
132 | seqpt : SequenceOfPnt from TColgp; |
133 | --modified by NIZNHY-PKV Thu Mar 29 16:51:41 2001f |
134 | myQuad : Quadric from IntSurf; |
135 | --modified by NIZNHY-PKV Thu Mar 29 16:51:47 2001t |
136 | |
137 | end ArcFunction; |