From 92d439ffddb2ef1a8302f6dfca6b861e7fb63d8f Mon Sep 17 00:00:00 2001 From: Raphael Luz <luz@ivt.tugraz.at> Date: Mon, 8 Apr 2013 11:36:09 +0200 Subject: [PATCH] Internal Release VECTO 1.1 beta 4 [FIXED] - Fixed delaunay error --- VECTO/cDelaunayMap.vb | 21 ++++++++++++--------- 1 file changed, 12 insertions(+), 9 deletions(-) diff --git a/VECTO/cDelaunayMap.vb b/VECTO/cDelaunayMap.vb index 136c66a5b9..337e8bf9f6 100644 --- a/VECTO/cDelaunayMap.vb +++ b/VECTO/cDelaunayMap.vb @@ -48,14 +48,14 @@ Public Class cDelaunayMap -#If DEBUG Then - Debug.Print("x,y,z,x,y,z") - For Each tr In lDT - Debug.Print(tr.P1.X & "," & tr.P1.Y & "," & tr.P1.Z & "," & tr.P2.X & "," & tr.P2.Y & "," & tr.P2.Z) - Debug.Print(tr.P3.X & "," & tr.P3.Y & "," & tr.P3.Z & "," & tr.P2.X & "," & tr.P2.Y & "," & tr.P2.Z) - Debug.Print(tr.P1.X & "," & tr.P1.Y & "," & tr.P1.Z & "," & tr.P3.X & "," & tr.P3.Y & "," & tr.P3.Z) - Next -#End If + '#If DEBUG Then + ' Debug.Print("x,y,z,x,y,z") + ' For Each tr In lDT + ' Debug.Print(tr.P1.X & "," & tr.P1.Y & "," & tr.P1.Z & "," & tr.P2.X & "," & tr.P2.Y & "," & tr.P2.Z) + ' Debug.Print(tr.P3.X & "," & tr.P3.Y & "," & tr.P3.Z & "," & tr.P2.X & "," & tr.P2.Y & "," & tr.P2.Z) + ' Debug.Print(tr.P1.X & "," & tr.P1.Y & "," & tr.P1.Z & "," & tr.P3.X & "," & tr.P3.Y & "," & tr.P3.Z) + ' Next + '#End If @@ -216,7 +216,10 @@ Public Class cDelaunayMap v = (dot00 * dot12 - dot01 * dot02) * invDenom ' Check if point is in triangle - Return (u >= 0) And (v >= 0) And (u + v <= 1) + Return (u >= 0) And (v >= 0) And (u + v <= 1.00000000001) + + + End Function -- GitLab