blob: 1cc82fb47f762898ea5db3d7e527de295b4a223b (
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
|
-- File: DNaming_SphereDriver.cdl
-- Created: Thu Jun 18 14:30:28 2009
-- Author: Sergey ZARITCHNY <sergey.zaritchny@opencascade.com>
---Copyright: Open CasCade SA 2009
class SphereDriver from DNaming inherits Driver from TFunction
---Purpose:
uses
Label from TDF,
Logbook from TFunction,
Function from TFunction,
ExtendedString from TCollection,
MakeSphere from BRepPrimAPI,
Shape from TopoDS
is
Create returns mutable SphereDriver from DNaming;
---Purpose: Constructor
---Purpose: validation
-- ==========
Validate(me; theLog : in out Logbook from TFunction)
is redefined;
---Purpose: Validates labels of a function in <log>.
-- In regeneration mode this method must be called (by the
-- solver) even if the function is not executed, to build
-- the valid label scope.
---Purpose: execution of function
-- ======================
MustExecute (me; theLog : Logbook from TFunction)
---Purpose: Analyse in <log> if the loaded function must be executed
-- (i.e.arguments are modified) or not.
-- If the Function label itself is modified, the function must
-- be executed.
returns Boolean from Standard
is redefined;
Execute (me; theLog : in out Logbook from TFunction)
---Purpose: Execute the function and push in <log> the impacted
-- labels (see method SetImpacted).
returns Integer from Standard
is redefined;
LoadNamingDS(me; theResultLabel : Label from TDF; mkSphere : in out MakeSphere from BRepPrimAPI)
is private;
end SphereDriver;
|