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
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
|
-- File: FunctionTanCuCuOnCu.cdl
-- Created: Mon May 13 15:33:43 1991
-- Author: Laurent PAINNOT
-- <lpa@topsn3>
---Copyright: Matra Datavision 1991
generic class FunctionTanCuCuOnCu from GccIter (
TheCurve as any;
TheCurveTool as any) -- as CurvePGTool from GccInt (TheCurve)
inherits FunctionSetWithDerivatives from math
---Purpose: This abstract class describes a set on N Functions of
-- M independant variables.
uses Vector from math,
Matrix from math,
Circ2d from gp,
Lin2d from gp,
Pnt2d from gp,
Vec2d from gp,
Type2 from GccIter
raises ConstructionError
is
Create (C1 : TheCurve ;
C2 : TheCurve ;
OnCi : Circ2d from gp ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
Create (C1 : Circ2d from gp ;
C2 : TheCurve ;
OnCi : Circ2d from gp ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
Create (L1 : Lin2d from gp ;
C2 : TheCurve ;
OnCi : Circ2d from gp ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
Create (C1 : TheCurve ;
P2 : Pnt2d from gp ;
OnCi : Circ2d from gp ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
------------------------------------------------------------------------
Create (C1 : TheCurve ;
C2 : TheCurve ;
OnLi : Lin2d from gp ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
Create (C1 : Circ2d from gp ;
C2 : TheCurve ;
OnLi : Lin2d from gp ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
Create (L1 : Lin2d from gp ;
C2 : TheCurve ;
OnLi : Lin2d from gp ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
Create (C1 : TheCurve ;
P2 : Pnt2d from gp ;
OnLi : Lin2d from gp ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
-----------------------------------------------------------------------
Create (C1 : TheCurve ;
C2 : TheCurve ;
OnCu : TheCurve ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
Create (C1 : Circ2d from gp ;
C2 : TheCurve ;
OnCu : TheCurve ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
Create (L1 : Lin2d from gp ;
C2 : TheCurve ;
OnCu : TheCurve ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
Create (C1 : TheCurve ;
P1 : Pnt2d from gp ;
OnCu : TheCurve ;
Rad : Real from Standard )
returns FunctionTanCuCuOnCu from GccIter;
InitDerivative(me : in out ;
X : Vector from math ;
Point1,Point2,Point3 : out Pnt2d from gp ;
Tan1,Tan2,Tan3,D21,D22,D23 : out Vec2d from gp )
raises ConstructionError
is static;
NbVariables(me) returns Integer;
---Purpose: Returns the number of variables of the function.
NbEquations(me) returns Integer;
---Purpose: Returns the number of equations of the function.
Value(me : in out ;
X : Vector from math;
F : out Vector from math) returns Boolean;
---Purpose: Computes the values of the Functions for the variable <X>.
Derivatives(me : in out ;
X : Vector from math;
D : out Matrix from math) returns Boolean;
---Purpose: Returns the values of the derivatives for the variable <X>.
Values(me : in out ;
X : Vector from math;
F : out Vector from math;
D : out Matrix from math) returns Boolean;
---Purpose: Returns the values of the functions and the derivatives
-- for the variable <X>.
fields
Curv1 : TheCurve ;
Curv2 : TheCurve ;
Circ1 : Circ2d from gp ;
Lin1 : Lin2d from gp ;
Pnt2 : Pnt2d from gp ;
Circon : Circ2d from gp ;
Linon : Lin2d from gp ;
Curvon : TheCurve ;
FirstRad : Real from Standard ;
TheType : Type2 from GccIter ;
end FunctionTanCuCuOnCu;
|