blob: ad4f7b36db746caf40fa58318f6993961bf8b9cf (
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
|
-- File: Law_S.cdl
-- Created: Fri Dec 24 10:43:17 1993
-- Author: Jacques GOUSSARD
-- <jag@topsn2>
---Copyright: Matra Datavision 1993
class S from Law inherits BSpFunc from Law
---Purpose: Describes an "S" evolution law.
is
Create
returns mutable S from Law;
---Purpose: Constructs an empty "S" evolution law.
Set(me: mutable; Pdeb,Valdeb,Pfin,Valfin: Real from Standard)
is static;
---Purpose:
-- Defines this S evolution law by assigning both:
-- - the bounds Pdeb and Pfin of the parameter, and
-- - the values Valdeb and Valfin of the function at these
-- two parametric bounds.
-- The function is assumed to have the first derivatives
-- equal to 0 at the two parameter points Pdeb and Pfin.
Set(me: mutable; Pdeb,Valdeb,Ddeb,Pfin,Valfin,Dfin: Real from Standard)
is static;
---Purpose: Defines this S evolution law by assigning
-- - the bounds Pdeb and Pfin of the parameter,
-- - the values Valdeb and Valfin of the function at these
-- two parametric bounds, and
-- - the values Ddeb and Dfin of the first derivative of the
-- function at these two parametric bounds.
end S;
|