0024428: Implementation of LGPL license
[occt.git] / src / BRepFill / BRepFill_DraftLaw.cxx
CommitLineData
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//
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#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
34static 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}