From 41c423031ec79d0e3dc0421f974dbfb0a85bc34c Mon Sep 17 00:00:00 2001
From: Christophe Geuzaine <cgeuzaine@ulg.ac.be>
Date: Sat, 2 Jun 2001 13:09:14 +0000
Subject: [PATCH] *** empty log message ***

---
 Mesh/Create.cpp  | 8 ++++++--
 Mesh/Numeric.cpp | 6 +++---
 2 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/Mesh/Create.cpp b/Mesh/Create.cpp
index 150e62e401..d4b54ff0b6 100644
--- a/Mesh/Create.cpp
+++ b/Mesh/Create.cpp
@@ -1,4 +1,4 @@
-// $Id: Create.cpp,v 1.16 2001-05-29 13:28:26 geuzaine Exp $
+// $Id: Create.cpp,v 1.17 2001-06-02 13:09:14 geuzaine Exp $
 
 #include "Gmsh.h"
 #include "Const.h"
@@ -544,6 +544,8 @@ Surface * Create_Surface (int Num, int Typ, int Mat){
   pS->Orientations = NULL;
   pS->Support = pS;
   pS->Control_Points = List_Create (1, 10, sizeof (Vertex *));
+  pS->s.Generatrices = NULL;
+  pS->Edges = NULL;
   pS->Extrude = NULL;
   pS->STL = NULL;
   return (pS);
@@ -555,10 +557,12 @@ void Free_Surface(void *a, void *b){
     Tree_Action(pS->Simplexes, Free_Simplex);
     Tree_Delete(pS->Simplexes);
     List_Delete(pS->TrsfSimplexes);
-    Tree_Delete(pS->Vertices); //the vertices are freed globally before
+    //Tree_Delete(pS->Vertices);//fait planter l'extrusion (1D-2D-1D boum)
+                      //the vertices are freed globally before
     List_Delete(pS->TrsfVertices);
     List_Delete(pS->Contours);
     List_Delete(pS->Control_Points);
+    List_Delete(pS->s.Generatrices);
     Free(pS);
     pS = NULL;
   }
diff --git a/Mesh/Numeric.cpp b/Mesh/Numeric.cpp
index 59a7a5b26f..7772de5ffe 100644
--- a/Mesh/Numeric.cpp
+++ b/Mesh/Numeric.cpp
@@ -1,4 +1,4 @@
-// $Id: Numeric.cpp,v 1.14 2001-04-08 20:36:50 geuzaine Exp $
+// $Id: Numeric.cpp,v 1.15 2001-06-02 13:09:14 geuzaine Exp $
 
 #include "Gmsh.h"
 #include "Const.h"
@@ -119,8 +119,8 @@ int sys3x3_with_tol (double mat[3][3], double b[3], double res[3], double *det){
 
   out = sys3x3(mat,b,res,det);
 
-  if (fabs(*det) < 1.e-12){
-    Msg(DEBUG, "Assuming 3x3 matrix is singular (is this OK?)");
+  if (fabs(*det) < 1.e-14){
+    Msg(DEBUG, "Assuming 3x3 matrix is singular (det == %g)", fabs(*det));
     res[0] = res[1] = res[2] = 0.0 ;
     return (0);
   }
-- 
GitLab