blob: 0d7d47f0dd8f4bdfa04353ae7738f830cae2fe32 (
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
|
-- File: FEmTool_ElementaryCriterion.cdl
-- Created: Thu Sep 11 18:06:06 1997
-- Author: Philippe MANGIN
-- <pmn@sgi29>
---Copyright: Matra Datavision 1997
deferred class ElementaryCriterion from FEmTool inherits TShared from MMgt
---Purpose: defined J Criteria to used in minimisation
uses
Vector from math,
Matrix from math,
HArray2OfReal from TColStd,
HArray2OfInteger from TColStd
raises
NotImplemented,
DomainError
is
Set(me : mutable;
Coeff : HArray2OfReal)
---Purpose: Set the coefficient of the Element (the Curve)
is static;
Set(me : mutable;
FirstKnot : Real;
LastKnot : Real)
---Purpose: Set the definition interval of the Element
is virtual;
DependenceTable(me)
returns HArray2OfInteger from TColStd
---Purpose: To know if two dimension are independent.
is deferred;
Value (me : mutable)
---Purpose: To Compute J(E) where E is the current Element
returns Real is deferred;
Hessian(me : mutable ;
Dim1 : Integer;
Dim2 : Integer;
H : out Matrix from math)
---Purpose: To Compute J(E) the coefficients of Hessian matrix of
-- J(E) wich are crossed derivatives in dimensions <Dim1>
-- and <Dim2>.
raises DomainError -- If DependenceTable(Dimension1,Dimension2) is False
is deferred;
Gradient(me : mutable;
Dim : Integer;
G : out Vector from math)
---Purpose: To Compute the coefficients in the dimension <dim>
-- of the J(E)'s Gradient where E is the current Element
is deferred;
fields
myCoeff : HArray2OfReal is protected;
myFirst, myLast : Real is protected;
end ElementaryCriterion;
|