b311480e |
1 | -- Created on: 1998-04-17 |
2 | -- Created by: Andre LIEUTIER |
3 | -- Copyright (c) 1998-1999 Matra Datavision |
973c2be1 |
4 | -- Copyright (c) 1999-2014 OPEN CASCADE SAS |
b311480e |
5 | -- |
973c2be1 |
6 | -- This file is part of Open CASCADE Technology software library. |
b311480e |
7 | -- |
973c2be1 |
8 | -- This library is free software; you can redistribute it and / or modify it |
9 | -- under the terms of the GNU Lesser General Public version 2.1 as published |
10 | -- by the Free Software Foundation, with special exception defined in the file |
11 | -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT |
12 | -- distribution for complete text of the license and disclaimer of any warranty. |
b311480e |
13 | -- |
973c2be1 |
14 | -- Alternatively, this file may be used under the terms of Open CASCADE |
15 | -- commercial license or contractual agreement. |
7fd59977 |
16 | |
17 | class HPG0G1Constraint from NLPlate inherits HPG0Constraint from NLPlate |
18 | ---Purpose: define a PinPoint G0+G1 Constraint used to load a Non Linear |
19 | -- Plate |
20 | uses |
21 | XY from gp, |
22 | XYZ from gp, |
23 | D1 from Plate |
24 | |
25 | is |
26 | Create(UV : XY; Value : XYZ; D1T : D1 from Plate) returns mutable HPG0G1Constraint; |
27 | -- create a G0+G1 Constraint |
28 | -- |
29 | |
30 | SetOrientation(me: mutable; Orient : Integer = 0) |
31 | is redefined; |
32 | -- set the orientation (meaningless for non G1 Constraints) |
33 | -- -1 means that the Surface Normal have to be -1*the Constraint Normal |
34 | -- 0 means that G1 constraint is up to a normal inversion (default value) |
35 | -- 1 means that the Surface Normal have to be equal to the Constraint Normal. |
36 | -- remarks : within the current implementation, this is effective only in case of |
37 | -- incremental loading computation |
38 | |
39 | ActiveOrder(me) returns Integer |
40 | is redefined; |
41 | -- returns the constraint active order, i.e. the maximum between |
42 | -- -- the initial constraint i.e 1 (for G1 Constraints) |
43 | |
44 | Orientation(me: mutable) returns Integer |
45 | is redefined; |
46 | -- set the orientation (meaningless for non G1 Constraints) |
47 | -- -1 means that the Surface Normal have to be -1*the Constraint Normal |
48 | -- 0 means that G1 constraint is up to a normal inversion (default value) |
49 | -- 1 means that the Surface Normal have to be equal to the Constraint Normal. |
50 | -- remarks : within the current implementation, this is effective only in case of |
51 | -- incremental loading computation |
52 | -- |
53 | |
54 | G1Target(me) returns D1 from Plate |
55 | ---C++: return const & |
56 | is redefined; |
57 | |
58 | |
59 | fields |
60 | myG1Target : D1 from Plate; |
61 | myOrientation : Integer; |
62 | end; |