blob: 5287ec8a3d26161095a379c0a9f24ffe660f0d27 (
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
|
-- File: PLib_Base.cdl
-- Created: Wed Oct 22 10:33:35 1997
-- Author: Philippe MANGIN / Sergey SOKOLOV
-- <ssv@velox.nnov.matra-dtv.fr>
---Copyright: Matra Datavision 1997
deferred class Base from PLib inherits TShared from MMgt
---Purpose: To work with different polynomial's Bases
uses
Array1OfReal from TColStd
is
ToCoefficients (me ; Dimension, Degree : Integer;
CoeffinBase : Array1OfReal from TColStd ;
Coefficients : out Array1OfReal from TColStd)
---Purpose:
-- Convert the polynomial P(t) in the canonical base.
is deferred;
D0 (me : mutable; U : Real;
BasisValue : out Array1OfReal from TColStd)
---Purpose: Compute the values of the basis functions in u
--
is deferred;
D1 (me : mutable; U : Real;
BasisValue : out Array1OfReal from TColStd;
BasisD1 : out Array1OfReal from TColStd)
---Purpose: Compute the values and the derivatives values of
-- the basis functions in u
is deferred;
D2 (me : mutable; U : Real;
BasisValue : out Array1OfReal from TColStd;
BasisD1 : out Array1OfReal from TColStd;
BasisD2 : out Array1OfReal from TColStd)
---Purpose: Compute the values and the derivatives values of
-- the basis functions in u
is deferred;
D3 (me : mutable; U : Real;
BasisValue : out Array1OfReal from TColStd;
BasisD1 : out Array1OfReal from TColStd;
BasisD2 : out Array1OfReal from TColStd;
BasisD3 : out Array1OfReal from TColStd)
---Purpose: Compute the values and the derivatives values of
-- the basis functions in u
is deferred;
WorkDegree (me) returns Integer
--- Purpose: returns WorkDegree
is deferred;
ReduceDegree ( me ; Dimension , MaxDegree : Integer ; Tol : Real ;
BaseCoeff : in out Real;
NewDegree : out Integer ;
MaxError : out Real)
---Purpose:
-- Compute NewDegree <= MaxDegree so that MaxError is lower
-- than Tol.
-- MaxError can be greater than Tol if it is not possible
-- to find a NewDegree <= MaxDegree.
-- In this case NewDegree = MaxDegree
--
is deferred;
end Base;
|