From 25f4a9cc6fd3423d48a41f027a294319509fe737 Mon Sep 17 00:00:00 2001
From: eap <eap@opencascade.com>
Date: Fri, 24 Aug 2012 13:23:35 +0000
Subject: [PATCH] 0021812: [CEA 638] Error when using Use Internal Vertices on
 all faces

make enforced only INTERNAL vertices

+          if ( exp_face.Current().Orientation() != TopAbs_INTERNAL )
+            continue;
---
 src/BLSURFPlugin/BLSURFPlugin_BLSURF.cxx | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/BLSURFPlugin/BLSURFPlugin_BLSURF.cxx b/src/BLSURFPlugin/BLSURFPlugin_BLSURF.cxx
index 86ebb0e..732760b 100644
--- a/src/BLSURFPlugin/BLSURFPlugin_BLSURF.cxx
+++ b/src/BLSURFPlugin/BLSURFPlugin_BLSURF.cxx
@@ -1031,6 +1031,8 @@ void BLSURFPlugin_BLSURF::SetParameters(
           // Get coords of vertex
           // Check if current coords is already in enfVertexList
           // If coords not in enfVertexList, add new enfVertex
+          if ( exp_face.Current().Orientation() != TopAbs_INTERNAL )
+            continue;
           aPnt = BRep_Tool::Pnt(TopoDS::Vertex(exp_face.Current()));
           MESSAGE("Found vertex on face at " << aPnt.X() <<", "<<aPnt.Y()<<", "<<aPnt.Z());
           BLSURFPlugin_Hypothesis::TEnfVertex* enfVertex = new BLSURFPlugin_Hypothesis::TEnfVertex();
-- 
2.39.2