Salome HOME
Fix preprocessor instructions for GCC
[plugins/netgenplugin.git] / src / NETGENPlugin / NETGENPlugin_NETGEN_2D_ONLY.cxx
1 // Copyright (C) 2007-2016  CEA/DEN, EDF R&D, OPEN CASCADE
2 //
3 // This library is free software; you can redistribute it and/or
4 // modify it under the terms of the GNU Lesser General Public
5 // License as published by the Free Software Foundation; either
6 // version 2.1 of the License, or (at your option) any later version.
7 //
8 // This library is distributed in the hope that it will be useful,
9 // but WITHOUT ANY WARRANTY; without even the implied warranty of
10 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11 // Lesser General Public License for more details.
12 //
13 // You should have received a copy of the GNU Lesser General Public
14 // License along with this library; if not, write to the Free Software
15 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
16 //
17 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
18 //
19
20 // File      : NETGENPlugin_NETGEN_2D_ONLY.cxx
21 // Author    : Edward AGAPOV (OCC)
22 // Project   : SALOME
23 //
24 #include "NETGENPlugin_NETGEN_2D_ONLY.hxx"
25
26 #include "NETGENPlugin_Mesher.hxx"
27 #include "NETGENPlugin_Hypothesis_2D.hxx"
28
29 #include <SMDS_MeshElement.hxx>
30 #include <SMDS_MeshNode.hxx>
31 #include <SMESHDS_Mesh.hxx>
32 #include <SMESH_Comment.hxx>
33 #include <SMESH_Gen.hxx>
34 #include <SMESH_Mesh.hxx>
35 #include <SMESH_MesherHelper.hxx>
36 #include <SMESH_subMesh.hxx>
37 #include <StdMeshers_FaceSide.hxx>
38 #include <StdMeshers_LengthFromEdges.hxx>
39 #include <StdMeshers_MaxElementArea.hxx>
40 #include <StdMeshers_QuadranglePreference.hxx>
41 #include <StdMeshers_ViscousLayers2D.hxx>
42
43 #include <Precision.hxx>
44 #include <Standard_ErrorHandler.hxx>
45 #include <Standard_Failure.hxx>
46
47 #include <utilities.h>
48
49 #include <list>
50 #include <vector>
51 #include <limits>
52
53 /*
54   Netgen include files
55 */
56 namespace nglib {
57 #include <nglib.h>
58 }
59 #ifndef OCCGEOMETRY
60 #define OCCGEOMETRY
61 #endif
62 #include <occgeom.hpp>
63 #include <meshing.hpp>
64 //#include <meshtype.hpp>
65 namespace netgen {
66 #ifdef NETGEN_V5
67   extern int OCCGenerateMesh (OCCGeometry&, Mesh*&, MeshingParameters&, int, int);
68 #else
69   extern int OCCGenerateMesh (OCCGeometry&, Mesh*&, int, int, char*);
70 #endif
71 #if defined(NETGEN_V5) && defined(WIN32)
72   DLL_HEADER 
73 #endif
74   extern MeshingParameters mparam;
75   extern void OCCSetLocalMeshSize(OCCGeometry & geom, Mesh & mesh);
76 }
77
78 using namespace std;
79 using namespace netgen;
80 using namespace nglib;
81
82 //=============================================================================
83 /*!
84  *  
85  */
86 //=============================================================================
87
88 NETGENPlugin_NETGEN_2D_ONLY::NETGENPlugin_NETGEN_2D_ONLY(int        hypId,
89                                                          int        studyId,
90                                                          SMESH_Gen* gen)
91   : SMESH_2D_Algo(hypId, studyId, gen)
92 {
93   _name = "NETGEN_2D_ONLY";
94   
95   _shapeType = (1 << TopAbs_FACE);// 1 bit /shape type
96   _onlyUnaryInput = false; // treat all FACEs at once
97
98   _compatibleHypothesis.push_back("MaxElementArea");
99   _compatibleHypothesis.push_back("LengthFromEdges");
100   _compatibleHypothesis.push_back("QuadranglePreference");
101   _compatibleHypothesis.push_back("NETGEN_Parameters_2D");
102   _compatibleHypothesis.push_back("ViscousLayers2D");
103
104   _hypMaxElementArea       = 0;
105   _hypLengthFromEdges      = 0;
106   _hypQuadranglePreference = 0;
107   _hypParameters           = 0;
108 }
109
110 //=============================================================================
111 /*!
112  *  
113  */
114 //=============================================================================
115
116 NETGENPlugin_NETGEN_2D_ONLY::~NETGENPlugin_NETGEN_2D_ONLY()
117 {
118   MESSAGE("NETGENPlugin_NETGEN_2D_ONLY::~NETGENPlugin_NETGEN_2D_ONLY");
119 }
120
121 //=============================================================================
122 /*!
123  *  
124  */
125 //=============================================================================
126
127 bool NETGENPlugin_NETGEN_2D_ONLY::CheckHypothesis (SMESH_Mesh&         aMesh,
128                                                    const TopoDS_Shape& aShape,
129                                                    Hypothesis_Status&  aStatus)
130 {
131   _hypMaxElementArea = 0;
132   _hypLengthFromEdges = 0;
133   _hypQuadranglePreference = 0;
134   _hypParameters = 0;
135   _progressByTic = -1;
136
137   const list<const SMESHDS_Hypothesis*>& hyps = GetUsedHypothesis(aMesh, aShape, false);
138
139   if (hyps.empty())
140   {
141     aStatus = HYP_OK; //SMESH_Hypothesis::HYP_MISSING;
142     return true;  // (PAL13464) can work with no hypothesis, LengthFromEdges is default one
143   }
144
145   aStatus = HYP_MISSING;
146
147   bool hasVL = false;
148   list<const SMESHDS_Hypothesis*>::const_iterator ith;
149   for (ith = hyps.begin(); ith != hyps.end(); ++ith )
150   {
151     const SMESHDS_Hypothesis* hyp = (*ith);
152
153     string hypName = hyp->GetName();
154
155     if      ( hypName == "MaxElementArea")
156       _hypMaxElementArea = static_cast<const StdMeshers_MaxElementArea*> (hyp);
157     else if ( hypName == "LengthFromEdges" )
158       _hypLengthFromEdges = static_cast<const StdMeshers_LengthFromEdges*> (hyp);
159     else if ( hypName == "QuadranglePreference" )
160       _hypQuadranglePreference = static_cast<const StdMeshers_QuadranglePreference*>(hyp);
161     else if ( hypName == "NETGEN_Parameters_2D" )
162       _hypParameters = static_cast<const NETGENPlugin_Hypothesis_2D*>(hyp);
163     else if ( hypName == StdMeshers_ViscousLayers2D::GetHypType() )
164       hasVL = true;
165     else {
166       aStatus = HYP_INCOMPATIBLE;
167       return false;
168     }
169   }
170
171   int nbHyps = bool(_hypMaxElementArea) + bool(_hypLengthFromEdges) + bool(_hypParameters );
172   if ( nbHyps > 1 )
173     aStatus = HYP_CONCURENT;
174   else if ( hasVL )
175     error( StdMeshers_ViscousLayers2D::CheckHypothesis( aMesh, aShape, aStatus ));
176   else
177     aStatus = HYP_OK;
178
179   if ( aStatus == HYP_OK && _hypParameters && _hypQuadranglePreference )
180   {
181     aStatus = HYP_INCOMPAT_HYPS;
182     return error(SMESH_Comment("\"") << _hypQuadranglePreference->GetName()
183                  << "\" and \"" << _hypParameters->GetName()
184                  << "\" are incompatible hypotheses");
185   }
186
187   return ( aStatus == HYP_OK );
188 }
189
190 // namespace
191 // {
192 //   void limitSize( netgen::Mesh* ngMesh,
193 //                   const double  maxh )
194 //   {
195 //     // get bnd box
196 //     netgen::Point3d pmin, pmax;
197 //     ngMesh->GetBox( pmin, pmax, 0 );
198 //     const double dx = pmax.X() - pmin.X();
199 //     const double dy = pmax.Y() - pmin.Y();
200 //     const double dz = pmax.Z() - pmin.Z();
201
202 //     const int nbX = Max( 2, int( dx / maxh * 3 ));
203 //     const int nbY = Max( 2, int( dy / maxh * 3 ));
204 //     const int nbZ = Max( 2, int( dz / maxh * 3 ));
205
206 //     if ( ! & ngMesh->LocalHFunction() )
207 //       ngMesh->SetLocalH( pmin, pmax, 0.1 );
208
209 //     netgen::Point3d p;
210 //     for ( int i = 0; i <= nbX; ++i )
211 //     {
212 //       p.X() = pmin.X() +  i * dx / nbX;
213 //       for ( int j = 0; j <= nbY; ++j )
214 //       {
215 //         p.Y() = pmin.Y() +  j * dy / nbY;
216 //         for ( int k = 0; k <= nbZ; ++k )
217 //         {
218 //           p.Z() = pmin.Z() +  k * dz / nbZ;
219 //           ngMesh->RestrictLocalH( p, maxh );
220 //         }
221 //       }
222 //     }
223 //   }
224 // }
225
226 //=============================================================================
227 /*!
228  *Here we are going to use the NETGEN mesher
229  */
230 //=============================================================================
231
232 bool NETGENPlugin_NETGEN_2D_ONLY::Compute(SMESH_Mesh&         aMesh,
233                                           const TopoDS_Shape& aShape)
234 {
235   netgen::multithread.terminate = 0;
236   //netgen::multithread.task = "Surface meshing";
237
238   SMESHDS_Mesh* meshDS = aMesh.GetMeshDS();
239   SMESH_MesherHelper helper(aMesh);
240   helper.SetElementsOnShape( true );
241
242   NETGENPlugin_NetgenLibWrapper ngLib;
243   ngLib._isComputeOk = false;
244
245   netgen::Mesh   ngMeshNoLocSize;
246   netgen::Mesh * ngMeshes[2] = { (netgen::Mesh*) ngLib._ngMesh,  & ngMeshNoLocSize };
247   netgen::OCCGeometry occgeoComm;
248
249   // min / max sizes are set as follows:
250   // if ( _hypParameters )
251   //    min and max are defined by the user
252   // else if ( _hypLengthFromEdges )
253   //    min = aMesher.GetDefaultMinSize()
254   //    max = average segment len of a FACE
255   // else if ( _hypMaxElementArea )
256   //    min = aMesher.GetDefaultMinSize()
257   //    max = f( _hypMaxElementArea )
258   // else
259   //    min = aMesher.GetDefaultMinSize()
260   //    max = max segment len of a FACE
261
262   NETGENPlugin_Mesher aMesher( &aMesh, aShape, /*isVolume=*/false);
263   aMesher.SetParameters( _hypParameters ); // _hypParameters -> netgen::mparam
264   const bool toOptimize = _hypParameters ? _hypParameters->GetOptimize() : true;
265   if ( _hypMaxElementArea )
266   {
267     netgen::mparam.maxh = sqrt( 2. * _hypMaxElementArea->GetMaxArea() / sqrt(3.0) );
268   }
269   if ( _hypQuadranglePreference )
270     netgen::mparam.quad = true;
271
272   // local size is common for all FACEs in aShape?
273   const bool isCommonLocalSize = ( !_hypLengthFromEdges && !_hypMaxElementArea && netgen::mparam.uselocalh );
274   const bool isDefaultHyp = ( !_hypLengthFromEdges && !_hypMaxElementArea && !_hypParameters );
275
276   if ( isCommonLocalSize ) // compute common local size in ngMeshes[0]
277   {
278     //list< SMESH_subMesh* > meshedSM[4]; --> all sub-shapes are added to occgeoComm
279     aMesher.PrepareOCCgeometry( occgeoComm, aShape, aMesh );//, meshedSM );
280
281     // local size set at MESHCONST_ANALYSE step depends on
282     // minh, face_maxh, grading and curvaturesafety; find minh if not set by the user
283     if ( !_hypParameters || netgen::mparam.minh < DBL_MIN )
284     {
285       if ( !_hypParameters )
286         netgen::mparam.maxh = occgeoComm.GetBoundingBox().Diam() / 3.;
287       netgen::mparam.minh = aMesher.GetDefaultMinSize( aShape, netgen::mparam.maxh );
288     }
289     // set local size depending on curvature and NOT closeness of EDGEs
290     netgen::occparam.resthcloseedgeenable = false;
291     //netgen::occparam.resthcloseedgefac = 1.0 + netgen::mparam.grading;
292     occgeoComm.face_maxh = netgen::mparam.maxh;
293     netgen::OCCSetLocalMeshSize( occgeoComm, *ngMeshes[0] );
294     occgeoComm.emap.Clear();
295     occgeoComm.vmap.Clear();
296
297     // set local size according to size of existing segments
298     const double factor = netgen::occparam.resthcloseedgefac;
299     TopTools_IndexedMapOfShape edgeMap;
300     TopExp::MapShapes( aMesh.GetShapeToMesh(), TopAbs_EDGE, edgeMap );
301     for ( int iE = 1; iE <= edgeMap.Extent(); ++iE )
302     {
303       const TopoDS_Shape& edge = edgeMap( iE );
304       if ( SMESH_Algo::isDegenerated( TopoDS::Edge( edge )))
305         continue;
306       SMESHDS_SubMesh* smDS = meshDS->MeshElements( edge );
307       if ( !smDS ) continue;
308       SMDS_ElemIteratorPtr segIt = smDS->GetElements();
309       while ( segIt->more() )
310       {
311         const SMDS_MeshElement* seg = segIt->next();
312         SMESH_TNodeXYZ n1 = seg->GetNode(0);
313         SMESH_TNodeXYZ n2 = seg->GetNode(1);
314         gp_XYZ p = 0.5 * ( n1 + n2 );
315         netgen::Point3d pi(p.X(), p.Y(), p.Z());
316         ngMeshes[0]->RestrictLocalH( pi, factor * ( n1 - n2 ).Modulus() );
317       }
318     }
319
320     // set local size defined on shapes
321     aMesher.SetLocalSize( occgeoComm, *ngMeshes[0] );
322     try {
323       ngMeshes[0]->LoadLocalMeshSize( mparam.meshsizefilename );
324     } catch (NgException & ex) {
325       return error( COMPERR_BAD_PARMETERS, ex.What() );
326     }
327   }
328   netgen::mparam.uselocalh = toOptimize; // restore as it is used at surface optimization
329
330   // ==================
331   // Loop on all FACEs
332   // ==================
333
334   vector< const SMDS_MeshNode* > nodeVec;
335
336   TopExp_Explorer fExp( aShape, TopAbs_FACE );
337   for ( int iF = 0; fExp.More(); fExp.Next(), ++iF )
338   {
339     TopoDS_Face F = TopoDS::Face( fExp.Current() /*.Oriented( TopAbs_FORWARD )*/);
340     int    faceID = meshDS->ShapeToIndex( F );
341     SMESH_ComputeErrorPtr& faceErr = aMesh.GetSubMesh( F )->GetComputeError();
342
343     _quadraticMesh = helper.IsQuadraticSubMesh( F );
344     const bool ignoreMediumNodes = _quadraticMesh;
345
346     // build viscous layers if required
347     if ( F.Orientation() != TopAbs_FORWARD &&
348          F.Orientation() != TopAbs_REVERSED )
349       F.Orientation( TopAbs_FORWARD ); // avoid pb with TopAbs_INTERNAL
350     SMESH_ProxyMesh::Ptr proxyMesh = StdMeshers_ViscousLayers2D::Compute( aMesh, F );
351     if ( !proxyMesh )
352       continue;
353
354     // ------------------------
355     // get all EDGEs of a FACE
356     // ------------------------
357     TSideVector wires =
358       StdMeshers_FaceSide::GetFaceWires( F, aMesh, ignoreMediumNodes, faceErr, proxyMesh );
359     if ( faceErr && !faceErr->IsOK() )
360       continue;
361     int nbWires = wires.size();
362     if ( nbWires == 0 )
363     {
364       faceErr.reset
365         ( new SMESH_ComputeError
366           ( COMPERR_ALGO_FAILED, "Problem in StdMeshers_FaceSide::GetFaceWires()" ));
367       continue;
368     }
369     if ( wires[0]->NbSegments() < 3 ) // ex: a circle with 2 segments
370     {
371       faceErr.reset
372         ( new SMESH_ComputeError
373           ( COMPERR_BAD_INPUT_MESH, SMESH_Comment("Too few segments: ")<<wires[0]->NbSegments()) );
374       continue;
375     }
376
377     // ----------------------
378     // compute maxh of a FACE
379     // ----------------------
380
381     if ( !_hypParameters )
382     {
383       double edgeLength = 0;
384       if (_hypLengthFromEdges )
385       {
386         // compute edgeLength as an average segment length
387         int nbSegments = 0;
388         for ( int iW = 0; iW < nbWires; ++iW )
389         {
390           edgeLength += wires[ iW ]->Length();
391           nbSegments += wires[ iW ]->NbSegments();
392         }
393         if ( nbSegments )
394           edgeLength /= nbSegments;
395         netgen::mparam.maxh = edgeLength;
396       }
397       else if ( isDefaultHyp )
398       {
399         // set edgeLength by a longest segment
400         double maxSeg2 = 0;
401         for ( int iW = 0; iW < nbWires; ++iW )
402         {
403           const UVPtStructVec& points = wires[ iW ]->GetUVPtStruct();
404           if ( points.empty() )
405             return error( COMPERR_BAD_INPUT_MESH );
406           gp_Pnt pPrev = SMESH_TNodeXYZ( points[0].node );
407           for ( size_t i = 1; i < points.size(); ++i )
408           {
409             gp_Pnt p = SMESH_TNodeXYZ( points[i].node );
410             maxSeg2 = Max( maxSeg2, p.SquareDistance( pPrev ));
411             pPrev = p;
412           }
413         }
414         edgeLength = sqrt( maxSeg2 ) * 1.05;
415         netgen::mparam.maxh = edgeLength;
416       }
417       if ( netgen::mparam.maxh < DBL_MIN )
418         netgen::mparam.maxh = occgeoComm.GetBoundingBox().Diam();
419
420       if ( !isCommonLocalSize )
421       {
422         netgen::mparam.minh = aMesher.GetDefaultMinSize( F, netgen::mparam.maxh );
423       }
424     }
425
426     // prepare occgeom
427     netgen::OCCGeometry occgeom;
428     occgeom.shape = F;
429     occgeom.fmap.Add( F );
430     occgeom.CalcBoundingBox();
431     occgeom.facemeshstatus.SetSize(1);
432     occgeom.facemeshstatus = 0;
433     occgeom.face_maxh_modified.SetSize(1);
434     occgeom.face_maxh_modified = 0;
435     occgeom.face_maxh.SetSize(1);
436     occgeom.face_maxh = netgen::mparam.maxh;
437
438     // -------------------------
439     // Fill netgen mesh
440     // -------------------------
441
442     // MESHCONST_ANALYSE step may lead to a failure, so we make an attempt
443     // w/o MESHCONST_ANALYSE at the second loop
444     int err = 0;
445     enum { LOC_SIZE, NO_LOC_SIZE };
446     int iLoop = isCommonLocalSize ? 0 : 1;
447     for ( ; iLoop < 2; iLoop++ )
448     {
449       //bool isMESHCONST_ANALYSE = false;
450       InitComputeError();
451
452       netgen::Mesh * ngMesh = ngMeshes[ iLoop ];
453       ngMesh->DeleteMesh();
454
455       if ( iLoop == NO_LOC_SIZE )
456       {
457         ngMesh->SetGlobalH ( mparam.maxh );
458         ngMesh->SetMinimalH( mparam.minh );
459         Box<3> bb = occgeom.GetBoundingBox();
460         bb.Increase (bb.Diam()/10);
461         ngMesh->SetLocalH (bb.PMin(), bb.PMax(), mparam.grading);
462         aMesher.SetLocalSize( occgeom, *ngMesh );
463         try {
464           ngMesh->LoadLocalMeshSize( mparam.meshsizefilename );
465         } catch (NgException & ex) {
466           return error( COMPERR_BAD_PARMETERS, ex.What() );
467         }
468       }
469
470       nodeVec.clear();
471       faceErr = aMesher.AddSegmentsToMesh( *ngMesh, occgeom, wires, helper, nodeVec,
472                                            /*overrideMinH=*/!_hypParameters);
473       if ( faceErr && !faceErr->IsOK() )
474         break;
475
476       //if ( !isCommonLocalSize )
477       //limitSize( ngMesh, mparam.maxh * 0.8);
478
479       // -------------------------
480       // Generate surface mesh
481       // -------------------------
482
483       const int startWith = MESHCONST_MESHSURFACE;
484       const int endWith   = toOptimize ? MESHCONST_OPTSURFACE : MESHCONST_MESHSURFACE;
485
486       SMESH_Comment str;
487       try {
488         OCC_CATCH_SIGNALS;
489
490 #ifdef NETGEN_V5
491         err = netgen::OCCGenerateMesh(occgeom, ngMesh, netgen::mparam, startWith, endWith);
492 #else
493         char *optstr = 0;
494         err = netgen::OCCGenerateMesh(occgeom, ngMesh, startWith, endWith, optstr);
495 #endif
496         if ( netgen::multithread.terminate )
497           return false;
498         if ( err )
499           str << "Error in netgen::OCCGenerateMesh() at " << netgen::multithread.task;
500       }
501       catch (Standard_Failure& ex)
502       {
503         err = 1;
504         str << "Exception in  netgen::OCCGenerateMesh()"
505             << " at " << netgen::multithread.task
506             << ": " << ex.DynamicType()->Name();
507         if ( ex.GetMessageString() && strlen( ex.GetMessageString() ))
508           str << ": " << ex.GetMessageString();
509       }
510       catch (...) {
511         err = 1;
512         str << "Exception in  netgen::OCCGenerateMesh()"
513             << " at " << netgen::multithread.task;
514       }
515       if ( err )
516       {
517         if ( aMesher.FixFaceMesh( occgeom, *ngMesh, 1 ))
518           break;
519         if ( iLoop == LOC_SIZE )
520         {
521           netgen::mparam.minh = netgen::mparam.maxh;
522           netgen::mparam.maxh = 0;
523           for ( size_t iW = 0; iW < wires.size(); ++iW )
524           {
525             StdMeshers_FaceSidePtr wire = wires[ iW ];
526             const vector<UVPtStruct>& uvPtVec = wire->GetUVPtStruct();
527             for ( size_t iP = 1; iP < uvPtVec.size(); ++iP )
528             {
529               SMESH_TNodeXYZ   p( uvPtVec[ iP ].node );
530               netgen::Point3d np( p.X(),p.Y(),p.Z());
531               double segLen = p.Distance( uvPtVec[ iP-1 ].node );
532               double   size = ngMesh->GetH( np );
533               netgen::mparam.minh = Min( netgen::mparam.minh, size );
534               netgen::mparam.maxh = Max( netgen::mparam.maxh, segLen );
535             }
536           }
537           //cerr << "min " << netgen::mparam.minh << " max " << netgen::mparam.maxh << endl;
538           netgen::mparam.minh *= 0.9;
539           netgen::mparam.maxh *= 1.1;
540           continue;
541         }
542         else
543         {
544           faceErr.reset( new SMESH_ComputeError( COMPERR_ALGO_FAILED, str ));
545         }
546       }
547
548
549       // ----------------------------------------------------
550       // Fill the SMESHDS with the generated nodes and faces
551       // ----------------------------------------------------
552
553       int nbNodes = ngMesh->GetNP();
554       int nbFaces = ngMesh->GetNSE();
555
556       int nbInputNodes = nodeVec.size()-1;
557       nodeVec.resize( nbNodes+1, 0 );
558
559       // add nodes
560       for ( int ngID = nbInputNodes + 1; ngID <= nbNodes; ++ngID )
561       {
562         const MeshPoint& ngPoint = ngMesh->Point( ngID );
563         SMDS_MeshNode * node = meshDS->AddNode(ngPoint(0), ngPoint(1), ngPoint(2));
564         nodeVec[ ngID ] = node;
565       }
566
567       // create faces
568       int i,j;
569       vector<const SMDS_MeshNode*> nodes;
570       for ( i = 1; i <= nbFaces ; ++i )
571       {
572         const Element2d& elem = ngMesh->SurfaceElement(i);
573         nodes.resize( elem.GetNP() );
574         for (j=1; j <= elem.GetNP(); ++j)
575         {
576           int pind = elem.PNum(j);
577           if ( pind < 1 )
578             break;
579           nodes[ j-1 ] = nodeVec[ pind ];
580           if ( nodes[ j-1 ]->GetPosition()->GetTypeOfPosition() == SMDS_TOP_3DSPACE )
581           {
582             const PointGeomInfo& pgi = elem.GeomInfoPi(j);
583             meshDS->SetNodeOnFace( nodes[ j-1 ], faceID, pgi.u, pgi.v);
584           }
585         }
586         if ( j > elem.GetNP() )
587         {
588           if ( elem.GetType() == TRIG )
589             helper.AddFace(nodes[0],nodes[1],nodes[2]);
590           else
591             helper.AddFace(nodes[0],nodes[1],nodes[2],nodes[3]);
592         }
593       }
594
595       break;
596     } // two attempts
597   } // loop on FACEs
598
599   return true;
600 }
601
602 void NETGENPlugin_NETGEN_2D_ONLY::CancelCompute()
603 {
604   SMESH_Algo::CancelCompute();
605   netgen::multithread.terminate = 1;
606 }
607
608 //================================================================================
609 /*!
610  * \brief Return progress of Compute() [0.,1]
611  */
612 //================================================================================
613
614 double NETGENPlugin_NETGEN_2D_ONLY::GetProgress() const
615 {
616   return -1;
617   // const char* task1 = "Surface meshing";
618   // //const char* task2 = "Optimizing surface";
619   // double& progress = const_cast<NETGENPlugin_NETGEN_2D_ONLY*>( this )->_progress;
620   // if ( _progressByTic < 0. &&
621   //      strncmp( netgen::multithread.task, task1, 3 ) == 0 )
622   // {
623   //   progress = Min( 0.25, SMESH_Algo::GetProgressByTic() ); // [0, 0.25]
624   // }
625   // else //if ( strncmp( netgen::multithread.task, task2, 3 ) == 0)
626   // {
627   //   if ( _progressByTic < 0 )
628   //   {
629   //     NETGENPlugin_NETGEN_2D_ONLY* me = (NETGENPlugin_NETGEN_2D_ONLY*) this;
630   //     me->_progressByTic = 0.25 / (_progressTic+1);
631   //   }
632   //   const_cast<NETGENPlugin_NETGEN_2D_ONLY*>( this )->_progressTic++;
633   //   progress = Max( progress, _progressByTic * _progressTic );
634   // }
635   // //cout << netgen::multithread.task << " " << _progressTic << endl;
636   // return Min( progress, 0.99 );
637 }
638
639 //=============================================================================
640 /*!
641  *
642  */
643 //=============================================================================
644
645 bool NETGENPlugin_NETGEN_2D_ONLY::Evaluate(SMESH_Mesh& aMesh,
646                                            const TopoDS_Shape& aShape,
647                                            MapShapeNbElems& aResMap)
648 {
649   TopoDS_Face F = TopoDS::Face(aShape);
650   if(F.IsNull())
651     return false;
652
653   // collect info from edges
654   int nb0d = 0, nb1d = 0;
655   bool IsQuadratic = false;
656   bool IsFirst = true;
657   double fullLen = 0.0;
658   TopTools_MapOfShape tmpMap;
659   for (TopExp_Explorer exp(F, TopAbs_EDGE); exp.More(); exp.Next()) {
660     TopoDS_Edge E = TopoDS::Edge(exp.Current());
661     if( tmpMap.Contains(E) )
662       continue;
663     tmpMap.Add(E);
664     SMESH_subMesh *aSubMesh = aMesh.GetSubMesh(exp.Current());
665     MapShapeNbElemsItr anIt = aResMap.find(aSubMesh);
666     if( anIt==aResMap.end() ) {
667       SMESH_subMesh *sm = aMesh.GetSubMesh(F);
668       SMESH_ComputeErrorPtr& smError = sm->GetComputeError();
669       smError.reset( new SMESH_ComputeError(COMPERR_ALGO_FAILED,"Submesh can not be evaluated",this));
670       return false;
671     }
672     std::vector<int> aVec = (*anIt).second;
673     nb0d += aVec[SMDSEntity_Node];
674     nb1d += Max(aVec[SMDSEntity_Edge],aVec[SMDSEntity_Quad_Edge]);
675     double aLen = SMESH_Algo::EdgeLength(E);
676     fullLen += aLen;
677     if(IsFirst) {
678       IsQuadratic = (aVec[SMDSEntity_Quad_Edge] > aVec[SMDSEntity_Edge]);
679       IsFirst = false;
680     }
681   }
682   tmpMap.Clear();
683
684   // compute edge length
685   double ELen = 0;
686   if (( _hypLengthFromEdges ) || ( !_hypLengthFromEdges && !_hypMaxElementArea )) {
687     if ( nb1d > 0 )
688       ELen = fullLen / nb1d;
689   }
690   if ( _hypMaxElementArea ) {
691     double maxArea = _hypMaxElementArea->GetMaxArea();
692     ELen = sqrt(2. * maxArea/sqrt(3.0));
693   }
694   GProp_GProps G;
695   BRepGProp::SurfaceProperties(F,G);
696   double anArea = G.Mass();
697
698   const int hugeNb = numeric_limits<int>::max()/10;
699   if ( anArea / hugeNb > ELen*ELen )
700   {
701     SMESH_subMesh *sm = aMesh.GetSubMesh(F);
702     SMESH_ComputeErrorPtr& smError = sm->GetComputeError();
703     smError.reset( new SMESH_ComputeError(COMPERR_ALGO_FAILED,"Submesh can not be evaluated.\nToo small element length",this));
704     return false;
705   }
706   int nbFaces = (int) ( anArea / ( ELen*ELen*sqrt(3.) / 4 ) );
707   int nbNodes = (int) ( ( nbFaces*3 - (nb1d-1)*2 ) / 6 + 1 );
708   std::vector<int> aVec(SMDSEntity_Last);
709   for(int i=SMDSEntity_Node; i<SMDSEntity_Last; i++) aVec[i]=0;
710   if( IsQuadratic ) {
711     aVec[SMDSEntity_Node] = nbNodes;
712     aVec[SMDSEntity_Quad_Triangle] = nbFaces;
713   }
714   else {
715     aVec[SMDSEntity_Node] = nbNodes;
716     aVec[SMDSEntity_Triangle] = nbFaces;
717   }
718   SMESH_subMesh *sm = aMesh.GetSubMesh(F);
719   aResMap.insert(std::make_pair(sm,aVec));
720
721   return true;
722 }