b311480e |
1 | // Created on: 1992-08-19 |
2 | // Created by: Modelistation |
3 | // Copyright (c) 1992-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 | |
42cf5bc1 |
17 | |
18 | #include <gp_Lin2d.hxx> |
19 | #include <Hatch_Hatcher.hxx> |
20 | #include <Hatch_Line.hxx> |
7fd59977 |
21 | #include <Hatch_Parameter.hxx> |
22 | |
23 | //======================================================================= |
24 | //function : Hatch_Line |
25 | //purpose : |
26 | //======================================================================= |
7fd59977 |
27 | Hatch_Line::Hatch_Line() |
d533dafb |
28 | : myForm(Hatch_ANYLINE) |
7fd59977 |
29 | { |
30 | } |
31 | |
32 | //======================================================================= |
33 | //function : Hatch_Line |
34 | //purpose : |
35 | //======================================================================= |
36 | |
37 | Hatch_Line::Hatch_Line(const gp_Lin2d& L, |
38 | const Hatch_LineForm T) : |
39 | myLin(L), |
40 | myForm(T) |
41 | { |
42 | } |
43 | |
44 | //======================================================================= |
45 | //function : AddIntersection |
46 | //purpose : |
47 | //======================================================================= |
48 | |
49 | void Hatch_Line::AddIntersection |
50 | (const Standard_Real Par1, |
51 | const Standard_Boolean Start, |
52 | const Standard_Integer Index, |
53 | const Standard_Real Par2, |
54 | const Standard_Real theToler) |
55 | { |
56 | Hatch_Parameter P(Par1,Start,Index,Par2); |
57 | Standard_Integer i; |
58 | for (i = 1; i <= myInters.Length(); i++) { |
59 | Standard_Real dfIntPar1 = myInters(i).myPar1; |
60 | // akm OCC109 vvv : Two intersections too close |
61 | if (Abs(Par1-dfIntPar1) < theToler) |
62 | { |
63 | myInters.Remove(i); |
64 | return; |
65 | } |
66 | // akm OCC109 ^^^ |
67 | if (Par1 < dfIntPar1) { |
68 | myInters.InsertBefore(i,P); |
69 | return; |
70 | } |
71 | } |
72 | myInters.Append(P); |
73 | } |