1 -- Created on: 2010-02-25
2 -- Created by: Sergey ZARITCHNY <sergey.zaritchny@opencascade.com>
3 -- Copyright (c) 2010-2014 OPEN CASCADE SAS
5 -- This file is part of Open CASCADE Technology software library.
7 -- This library is free software; you can redistribute it and/or modify it under
8 -- the terms of the GNU Lesser General Public License version 2.1 as published
9 -- by the Free Software Foundation, with special exception defined in the file
10 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 -- distribution for complete text of the license and disclaimer of any warranty.
13 -- Alternatively, this file may be used under the terms of Open CASCADE
14 -- commercial license or contractual agreement.
16 class PointDriver from DNaming inherits Driver from TFunction
18 ---Purpose: Driver for PointXYZ and RelativePoint
22 Logbook from TFunction,
23 Function from TFunction
26 Create returns PointDriver from DNaming;
27 ---Purpose: Constructor
29 ---Purpose: validation
32 Validate(me; theLog : in out Logbook from TFunction)
34 ---Purpose: Validates labels of a function in <log>.
35 -- In regeneration mode this method must be called (by the
36 -- solver) even if the function is not executed, to build
37 -- the valid label scope.
39 ---Purpose: execution of function
40 -- ======================
42 MustExecute (me; theLog : Logbook from TFunction)
43 ---Purpose: Analyse in <log> if the loaded function must be executed
44 -- (i.e.arguments are modified) or not.
45 -- If the Function label itself is modified, the function must
47 returns Boolean from Standard
50 Execute (me; theLog : in out Logbook from TFunction)
51 ---Purpose: Execute the function and push in <log> the impacted
52 -- labels (see method SetImpacted).
53 returns Integer from Standard