7fd59977 |
1 | -- File: PLib_Base.cdl |
2 | -- Created: Wed Oct 22 10:33:35 1997 |
3 | -- Author: Philippe MANGIN / Sergey SOKOLOV |
4 | -- <ssv@velox.nnov.matra-dtv.fr> |
5 | ---Copyright: Matra Datavision 1997 |
6 | |
7 | deferred class Base from PLib inherits TShared from MMgt |
8 | |
9 | ---Purpose: To work with different polynomial's Bases |
10 | |
11 | uses |
12 | Array1OfReal from TColStd |
13 | |
14 | is |
15 | ToCoefficients (me ; Dimension, Degree : Integer; |
16 | CoeffinBase : Array1OfReal from TColStd ; |
17 | Coefficients : out Array1OfReal from TColStd) |
18 | ---Purpose: |
19 | -- Convert the polynomial P(t) in the canonical base. |
20 | is deferred; |
21 | |
22 | D0 (me : mutable; U : Real; |
23 | BasisValue : out Array1OfReal from TColStd) |
24 | ---Purpose: Compute the values of the basis functions in u |
25 | -- |
26 | is deferred; |
27 | |
28 | D1 (me : mutable; U : Real; |
29 | BasisValue : out Array1OfReal from TColStd; |
30 | BasisD1 : out Array1OfReal from TColStd) |
31 | ---Purpose: Compute the values and the derivatives values of |
32 | -- the basis functions in u |
33 | is deferred; |
34 | |
35 | D2 (me : mutable; U : Real; |
36 | BasisValue : out Array1OfReal from TColStd; |
37 | BasisD1 : out Array1OfReal from TColStd; |
38 | BasisD2 : out Array1OfReal from TColStd) |
39 | ---Purpose: Compute the values and the derivatives values of |
40 | -- the basis functions in u |
41 | is deferred; |
42 | |
43 | D3 (me : mutable; U : Real; |
44 | BasisValue : out Array1OfReal from TColStd; |
45 | BasisD1 : out Array1OfReal from TColStd; |
46 | BasisD2 : out Array1OfReal from TColStd; |
47 | BasisD3 : out Array1OfReal from TColStd) |
48 | ---Purpose: Compute the values and the derivatives values of |
49 | -- the basis functions in u |
50 | is deferred; |
51 | |
52 | WorkDegree (me) returns Integer |
53 | --- Purpose: returns WorkDegree |
54 | is deferred; |
55 | |
56 | ReduceDegree ( me ; Dimension , MaxDegree : Integer ; Tol : Real ; |
57 | BaseCoeff : in out Real; |
58 | NewDegree : out Integer ; |
59 | MaxError : out Real) |
60 | |
61 | ---Purpose: |
62 | -- Compute NewDegree <= MaxDegree so that MaxError is lower |
63 | -- than Tol. |
64 | -- MaxError can be greater than Tol if it is not possible |
65 | -- to find a NewDegree <= MaxDegree. |
66 | -- In this case NewDegree = MaxDegree |
67 | -- |
68 | |
69 | is deferred; |
70 | |
71 | end Base; |