b311480e |
1 | // Created on: 1998-01-14 |
2 | // Created by: Philippe MANGIN |
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 | // |
d5f74e42 |
8 | // This library is free software; you can redistribute it and/or modify it under |
9 | // the terms of the GNU Lesser General Public License version 2.1 as published |
973c2be1 |
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 | #include <BRepFill_DraftLaw.ixx> |
18 | |
19 | #include <GeomFill_LocationDraft.hxx> |
20 | #include <GeomFill_LocationLaw.hxx> |
21 | #include <GeomFill_HArray1OfLocationLaw.hxx> |
22 | |
23 | #include <gp_Vec.hxx> |
24 | #include <gp_Mat.hxx> |
25 | #include <gp_XYZ.hxx> |
26 | #include <gp_Trsf.hxx> |
27 | |
28 | |
29 | //======================================================================= |
30 | //function : ToG0 |
31 | //purpose : Cacul une tranformation T tq T.M2 = M1 |
32 | //======================================================================= |
33 | |
34 | static void ToG0(const gp_Mat& M1, const gp_Mat& M2, gp_Mat& T) { |
35 | T = M2.Inverted(); |
36 | T *= M1; |
37 | } |
38 | |
39 | |
40 | BRepFill_DraftLaw::BRepFill_DraftLaw(const TopoDS_Wire & Path, |
41 | const Handle(GeomFill_LocationDraft) & Law) |
42 | :BRepFill_Edge3DLaw(Path, Law) |
43 | { |
44 | } |
45 | |
46 | void BRepFill_DraftLaw::CleanLaw(const Standard_Real TolAngular) |
47 | { |
48 | Standard_Real First, Last;//, Angle; |
49 | Standard_Integer ipath; |
50 | gp_Mat Trsf, M1, M2; |
51 | gp_Vec V, T1, T2, N1, N2; |
52 | // gp_Dir D; |
53 | |
54 | myLaws->Value(1)->GetDomain(First, Last); |
55 | // D = Handle(GeomFill_LocationDraft)::DownCast(myLaws->Value(1))->Direction(); |
56 | // gp_Vec Vd(D); |
57 | |
58 | for (ipath=2; ipath<=myLaws->Length(); ipath++) { |
59 | myLaws->Value(ipath-1)->D0(Last, M1, V); |
60 | myLaws->Value(ipath)->GetDomain(First, Last); |
61 | myLaws->Value(ipath)->D0(First, M2, V); |
62 | T1.SetXYZ(M1.Column(3)); |
63 | T2.SetXYZ(M2.Column(3)); |
64 | N1.SetXYZ(M1.Column(1)); |
65 | N2.SetXYZ(M2.Column(1)); |
66 | if (N1.IsParallel(N2, TolAngular)) { // Correction G0 des normales... |
67 | ToG0(M1, M2, Trsf); |
68 | myLaws->Value(ipath)->SetTrsf(Trsf); |
69 | } |
70 | } |
71 | } |