Salome HOME
985fb70d8e8f2428913cdd11ae9b15697e29aed0
[modules/smesh.git] / src / StdMeshers / StdMeshers_Regular_1D.cxx
1 //  Copyright (C) 2007-2010  CEA/DEN, EDF R&D, OPEN CASCADE
2 //
3 //  Copyright (C) 2003-2007  OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 //  CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
5 //
6 //  This library is free software; you can redistribute it and/or
7 //  modify it under the terms of the GNU Lesser General Public
8 //  License as published by the Free Software Foundation; either
9 //  version 2.1 of the License.
10 //
11 //  This library is distributed in the hope that it will be useful,
12 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
13 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14 //  Lesser General Public License for more details.
15 //
16 //  You should have received a copy of the GNU Lesser General Public
17 //  License along with this library; if not, write to the Free Software
18 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
19 //
20 //  See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
21 //
22
23 //  SMESH SMESH : implementaion of SMESH idl descriptions
24 //  File   : StdMeshers_Regular_1D.cxx
25 //           Moved here from SMESH_Regular_1D.cxx
26 //  Author : Paul RASCLE, EDF
27 //  Module : SMESH
28 //
29 #include "StdMeshers_Regular_1D.hxx"
30 #include "StdMeshers_Distribution.hxx"
31
32 #include "StdMeshers_Arithmetic1D.hxx"
33 #include "StdMeshers_AutomaticLength.hxx"
34 #include "StdMeshers_Deflection1D.hxx"
35 #include "StdMeshers_LocalLength.hxx"
36 #include "StdMeshers_MaxLength.hxx"
37 #include "StdMeshers_NumberOfSegments.hxx"
38 #include "StdMeshers_Propagation.hxx"
39 #include "StdMeshers_SegmentLengthAroundVertex.hxx"
40 #include "StdMeshers_StartEndLength.hxx"
41
42 #include "SMESH_Gen.hxx"
43 #include "SMESH_Mesh.hxx"
44 #include "SMESH_HypoFilter.hxx"
45 #include "SMESH_subMesh.hxx"
46 #include "SMESH_subMeshEventListener.hxx"
47 #include "SMESH_Comment.hxx"
48
49 #include "SMDS_MeshElement.hxx"
50 #include "SMDS_MeshNode.hxx"
51
52 #include "Utils_SALOME_Exception.hxx"
53 #include "utilities.h"
54
55 #include <BRepAdaptor_Curve.hxx>
56 #include <BRep_Tool.hxx>
57 #include <GCPnts_AbscissaPoint.hxx>
58 #include <GCPnts_UniformAbscissa.hxx>
59 #include <GCPnts_UniformDeflection.hxx>
60 #include <Precision.hxx>
61 #include <TopExp.hxx>
62 #include <TopExp_Explorer.hxx>
63 #include <TopoDS.hxx>
64 #include <TopoDS_Edge.hxx>
65
66 #include <string>
67 #include <limits>
68
69 using namespace std;
70
71 //=============================================================================
72 /*!
73  *  
74  */
75 //=============================================================================
76
77 StdMeshers_Regular_1D::StdMeshers_Regular_1D(int hypId, int studyId,
78         SMESH_Gen * gen):SMESH_1D_Algo(hypId, studyId, gen)
79 {
80         MESSAGE("StdMeshers_Regular_1D::StdMeshers_Regular_1D");
81         _name = "Regular_1D";
82         _shapeType = (1 << TopAbs_EDGE);
83         _fpHyp = 0;
84
85         _compatibleHypothesis.push_back("LocalLength");
86         _compatibleHypothesis.push_back("MaxLength");
87         _compatibleHypothesis.push_back("NumberOfSegments");
88         _compatibleHypothesis.push_back("StartEndLength");
89         _compatibleHypothesis.push_back("Deflection1D");
90         _compatibleHypothesis.push_back("Arithmetic1D");
91         _compatibleHypothesis.push_back("FixedPoints1D");
92         _compatibleHypothesis.push_back("AutomaticLength");
93
94         _compatibleHypothesis.push_back("QuadraticMesh"); // auxiliary !!!
95         _compatibleHypothesis.push_back("Propagation"); // auxiliary !!!
96 }
97
98 //=============================================================================
99 /*!
100  *  
101  */
102 //=============================================================================
103
104 StdMeshers_Regular_1D::~StdMeshers_Regular_1D()
105 {
106 }
107
108 //=============================================================================
109 /*!
110  *  
111  */
112 //=============================================================================
113
114 bool StdMeshers_Regular_1D::CheckHypothesis
115                          (SMESH_Mesh&                          aMesh,
116                           const TopoDS_Shape&                  aShape,
117                           SMESH_Hypothesis::Hypothesis_Status& aStatus)
118 {
119   _hypType = NONE;
120   _quadraticMesh = false;
121
122   const bool ignoreAuxiliaryHyps = false;
123   const list <const SMESHDS_Hypothesis * > & hyps =
124     GetUsedHypothesis(aMesh, aShape, ignoreAuxiliaryHyps);
125
126   // find non-auxiliary hypothesis
127   const SMESHDS_Hypothesis *theHyp = 0;
128   list <const SMESHDS_Hypothesis * >::const_iterator h = hyps.begin();
129   for ( ; h != hyps.end(); ++h ) {
130     if ( static_cast<const SMESH_Hypothesis*>(*h)->IsAuxiliary() ) {
131       if ( strcmp( "QuadraticMesh", (*h)->GetName() ) == 0 )
132         _quadraticMesh = true;
133     }
134     else {
135       if ( !theHyp )
136         theHyp = *h; // use only the first non-auxiliary hypothesis
137     }
138   }
139
140   if ( !theHyp )
141   {
142     aStatus = SMESH_Hypothesis::HYP_MISSING;
143     return false;  // can't work without a hypothesis
144   }
145
146   string hypName = theHyp->GetName();
147
148   if (hypName == "LocalLength")
149   {
150     const StdMeshers_LocalLength * hyp =
151       dynamic_cast <const StdMeshers_LocalLength * >(theHyp);
152     ASSERT(hyp);
153     _value[ BEG_LENGTH_IND ] = hyp->GetLength();
154     _value[ PRECISION_IND ] = hyp->GetPrecision();
155     ASSERT( _value[ BEG_LENGTH_IND ] > 0 );
156     _hypType = LOCAL_LENGTH;
157     aStatus = SMESH_Hypothesis::HYP_OK;
158   }
159
160   else if (hypName == "MaxLength")
161   {
162     const StdMeshers_MaxLength * hyp =
163       dynamic_cast <const StdMeshers_MaxLength * >(theHyp);
164     ASSERT(hyp);
165     _value[ BEG_LENGTH_IND ] = hyp->GetLength();
166     if ( hyp->GetUsePreestimatedLength() ) {
167       if ( int nbSeg = aMesh.GetGen()->GetBoundaryBoxSegmentation() )
168         _value[ BEG_LENGTH_IND ] = aMesh.GetShapeDiagonalSize() / nbSeg;
169     }
170     ASSERT( _value[ BEG_LENGTH_IND ] > 0 );
171     _hypType = MAX_LENGTH;
172     aStatus = SMESH_Hypothesis::HYP_OK;
173   }
174
175   else if (hypName == "NumberOfSegments")
176   {
177     const StdMeshers_NumberOfSegments * hyp =
178       dynamic_cast <const StdMeshers_NumberOfSegments * >(theHyp);
179     ASSERT(hyp);
180     _ivalue[ NB_SEGMENTS_IND  ] = hyp->GetNumberOfSegments();
181     ASSERT( _ivalue[ NB_SEGMENTS_IND ] > 0 );
182     _ivalue[ DISTR_TYPE_IND ] = (int) hyp->GetDistrType();
183     switch (_ivalue[ DISTR_TYPE_IND ])
184     {
185     case StdMeshers_NumberOfSegments::DT_Scale:
186       _value[ SCALE_FACTOR_IND ] = hyp->GetScaleFactor();
187       _revEdgesIDs = hyp->GetReversedEdges();
188       break;
189     case StdMeshers_NumberOfSegments::DT_TabFunc:
190       _vvalue[ TAB_FUNC_IND ] = hyp->GetTableFunction();
191       _revEdgesIDs = hyp->GetReversedEdges();
192       break;
193     case StdMeshers_NumberOfSegments::DT_ExprFunc:
194       _svalue[ EXPR_FUNC_IND ] = hyp->GetExpressionFunction();
195       _revEdgesIDs = hyp->GetReversedEdges();
196       break;
197     case StdMeshers_NumberOfSegments::DT_Regular:
198       break;
199     default:
200       ASSERT(0);
201       break;
202     }
203     if (_ivalue[ DISTR_TYPE_IND ] == StdMeshers_NumberOfSegments::DT_TabFunc ||
204         _ivalue[ DISTR_TYPE_IND ] == StdMeshers_NumberOfSegments::DT_ExprFunc)
205         _ivalue[ CONV_MODE_IND ] = hyp->ConversionMode();
206     _hypType = NB_SEGMENTS;
207     aStatus = SMESH_Hypothesis::HYP_OK;
208   }
209
210   else if (hypName == "Arithmetic1D")
211   {
212     const StdMeshers_Arithmetic1D * hyp =
213       dynamic_cast <const StdMeshers_Arithmetic1D * >(theHyp);
214     ASSERT(hyp);
215     _value[ BEG_LENGTH_IND ] = hyp->GetLength( true );
216     _value[ END_LENGTH_IND ] = hyp->GetLength( false );
217     ASSERT( _value[ BEG_LENGTH_IND ] > 0 && _value[ END_LENGTH_IND ] > 0 );
218     _hypType = ARITHMETIC_1D;
219
220     _revEdgesIDs = hyp->GetReversedEdges();
221
222     aStatus = SMESH_Hypothesis::HYP_OK;
223   }
224
225   else if (hypName == "FixedPoints1D") {
226     _fpHyp = dynamic_cast <const StdMeshers_FixedPoints1D*>(theHyp);
227     ASSERT(_fpHyp);
228     _hypType = FIXED_POINTS_1D;
229
230     _revEdgesIDs = _fpHyp->GetReversedEdges();
231
232     aStatus = SMESH_Hypothesis::HYP_OK;
233   }
234
235   else if (hypName == "StartEndLength")
236   {
237     const StdMeshers_StartEndLength * hyp =
238       dynamic_cast <const StdMeshers_StartEndLength * >(theHyp);
239     ASSERT(hyp);
240     _value[ BEG_LENGTH_IND ] = hyp->GetLength( true );
241     _value[ END_LENGTH_IND ] = hyp->GetLength( false );
242     ASSERT( _value[ BEG_LENGTH_IND ] > 0 && _value[ END_LENGTH_IND ] > 0 );
243     _hypType = BEG_END_LENGTH;
244
245     _revEdgesIDs = hyp->GetReversedEdges();
246
247     aStatus = SMESH_Hypothesis::HYP_OK;
248   }
249
250   else if (hypName == "Deflection1D")
251   {
252     const StdMeshers_Deflection1D * hyp =
253       dynamic_cast <const StdMeshers_Deflection1D * >(theHyp);
254     ASSERT(hyp);
255     _value[ DEFLECTION_IND ] = hyp->GetDeflection();
256     ASSERT( _value[ DEFLECTION_IND ] > 0 );
257     _hypType = DEFLECTION;
258     aStatus = SMESH_Hypothesis::HYP_OK;
259   }
260
261   else if (hypName == "AutomaticLength")
262   {
263     StdMeshers_AutomaticLength * hyp = const_cast<StdMeshers_AutomaticLength *>
264       (dynamic_cast <const StdMeshers_AutomaticLength * >(theHyp));
265     ASSERT(hyp);
266     _value[ BEG_LENGTH_IND ] = _value[ END_LENGTH_IND ] = hyp->GetLength( &aMesh, aShape );
267 //     _value[ BEG_LENGTH_IND ] = hyp->GetLength( &aMesh, aShape );
268 //     _value[ END_LENGTH_IND ] = Precision::Confusion(); // ?? or set to zero?
269     ASSERT( _value[ BEG_LENGTH_IND ] > 0 );
270     _hypType = MAX_LENGTH;
271     aStatus = SMESH_Hypothesis::HYP_OK;
272   }
273   else
274     aStatus = SMESH_Hypothesis::HYP_INCOMPATIBLE;
275
276   return ( _hypType != NONE );
277 }
278
279 static bool computeParamByFunc(Adaptor3d_Curve& C3d, double first, double last,
280                                double length, bool theReverse,
281                                int nbSeg, Function& func,
282                                list<double>& theParams)
283 {
284   // never do this way
285   //OSD::SetSignal( true );
286
287   if (nbSeg <= 0)
288     return false;
289
290   MESSAGE( "computeParamByFunc" );
291
292   int nbPnt = 1 + nbSeg;
293   vector<double> x(nbPnt, 0.);
294
295   if (!buildDistribution(func, 0.0, 1.0, nbSeg, x, 1E-4))
296      return false;
297
298   MESSAGE( "Points:\n" );
299   char buf[1024];
300   for ( int i=0; i<=nbSeg; i++ )
301   {
302     sprintf(  buf, "%f\n", float(x[i] ) );
303     MESSAGE( buf );
304   }
305
306
307
308   // apply parameters in range [0,1] to the space of the curve
309   double prevU = first;
310   double sign = 1.;
311   if (theReverse)
312   {
313     prevU = last;
314     sign = -1.;
315   }
316   for( int i = 1; i < nbSeg; i++ )
317   {
318     double curvLength = length * (x[i] - x[i-1]) * sign;
319     GCPnts_AbscissaPoint Discret( C3d, curvLength, prevU );
320     if ( !Discret.IsDone() )
321       return false;
322     double U = Discret.Parameter();
323     if ( U > first && U < last )
324       theParams.push_back( U );
325     else
326       return false;
327     prevU = U;
328   }
329   if ( theReverse )
330     theParams.reverse();
331   return true;
332 }
333
334
335 //================================================================================
336 /*!
337  * \brief adjust internal node parameters so that the last segment length == an
338   * \param a1 - the first segment length
339   * \param an - the last segment length
340   * \param U1 - the first edge parameter
341   * \param Un - the last edge parameter
342   * \param length - the edge length
343   * \param C3d - the edge curve
344   * \param theParams - internal node parameters to adjust
345   * \param adjustNeighbors2an - to adjust length of segments next to the last one
346   *  and not to remove parameters
347  */
348 //================================================================================
349
350 static void compensateError(double a1, double an,
351                             double U1, double Un,
352                             double            length,
353                             Adaptor3d_Curve&  C3d,
354                             list<double> &    theParams,
355                             bool              adjustNeighbors2an = false)
356 {
357   int i, nPar = theParams.size();
358   if ( a1 + an < length && nPar > 1 )
359   {
360     bool reverse = ( U1 > Un );
361     GCPnts_AbscissaPoint Discret(C3d, reverse ? an : -an, Un);
362     if ( !Discret.IsDone() )
363       return;
364     double Utgt = Discret.Parameter(); // target value of the last parameter
365     list<double>::reverse_iterator itU = theParams.rbegin();
366     double Ul = *itU++; // real value of the last parameter
367     double dUn = Utgt - Ul; // parametric error of <an>
368     if ( Abs(dUn) <= Precision::Confusion() )
369       return;
370     double dU = Abs( Ul - *itU ); // parametric length of the last but one segment
371     if ( adjustNeighbors2an || Abs(dUn) < 0.5 * dU ) { // last segment is a bit shorter than it should
372       // move the last parameter to the edge beginning
373     }
374     else {  // last segment is much shorter than it should -> remove the last param and
375       theParams.pop_back(); nPar--; // move the rest points toward the edge end
376       dUn = Utgt - theParams.back();
377     }
378
379     double q  = dUn / ( nPar - 1 );
380     if ( !adjustNeighbors2an )
381     {
382       q = Abs( dUn / ( Utgt - Un )); // factor of segment length change
383       for ( itU = theParams.rbegin(), i = 1; i < nPar; i++ ) {
384         double prevU = *itU;
385         (*itU) += dUn;
386         ++itU;
387         dUn = q * (*itU - prevU) * (prevU-U1)/(Un-U1);
388       }
389     }
390     else {
391       theParams.back() += dUn;
392       double sign = reverse ? -1 : 1;
393       double prevU = theParams.back();
394       itU = theParams.rbegin();
395       for ( ++itU, i = 2; i < nPar; ++itU, i++ ) {
396         double newU = *itU + dUn;
397         if ( newU*sign < prevU*sign ) {
398           prevU = *itU = newU;
399           dUn -= q;
400         }
401         else { // set U between prevU and next valid param
402           list<double>::reverse_iterator itU2 = itU;
403           ++itU2;
404           int nb = 2;
405           while ( (*itU2)*sign > prevU*sign ) {
406             ++itU2; ++nb;
407           }
408           dU = ( *itU2 - prevU ) / nb;
409           while ( itU != itU2 ) {
410             *itU += dU; ++itU;
411           }
412           break;
413         }
414       }
415     }
416   }
417 }
418
419 //================================================================================
420 /*!
421  * \brief Class used to clean mesh on edges when 0D hyp modified.
422  * Common approach doesn't work when 0D algo is missing because the 0D hyp is
423  * considered as not participating in computation whereas it is used by 1D algo.
424  */
425 //================================================================================
426
427 // struct VertexEventListener : public SMESH_subMeshEventListener
428 // {
429 //   VertexEventListener():SMESH_subMeshEventListener(0) // won't be deleted by submesh
430 //   {}
431 //   /*!
432 //    * \brief Clean mesh on edges
433 //    * \param event - algo_event or compute_event itself (of SMESH_subMesh)
434 //    * \param eventType - ALGO_EVENT or COMPUTE_EVENT (of SMESH_subMesh)
435 //    * \param subMesh - the submesh where the event occures
436 //    */
437 //   void ProcessEvent(const int event, const int eventType, SMESH_subMesh* subMesh,
438 //                     EventListenerData*, const SMESH_Hypothesis*)
439 //   {
440 //     if ( eventType == SMESH_subMesh::ALGO_EVENT) // all algo events
441 //     {
442 //       subMesh->ComputeStateEngine( SMESH_subMesh::MODIF_ALGO_STATE );
443 //     }
444 //   }
445 // }; // struct VertexEventListener
446
447 //=============================================================================
448 /*!
449  * \brief Sets event listener to vertex submeshes
450  * \param subMesh - submesh where algo is set
451  *
452  * This method is called when a submesh gets HYP_OK algo_state.
453  * After being set, event listener is notified on each event of a submesh.
454  */
455 //=============================================================================
456
457 void StdMeshers_Regular_1D::SetEventListener(SMESH_subMesh* subMesh)
458 {
459   StdMeshers_Propagation::SetPropagationMgr( subMesh );
460 }
461
462 //=============================================================================
463 /*!
464  * \brief Do nothing
465  * \param subMesh - restored submesh
466  *
467  * This method is called only if a submesh has HYP_OK algo_state.
468  */
469 //=============================================================================
470
471 void StdMeshers_Regular_1D::SubmeshRestored(SMESH_subMesh* subMesh)
472 {
473 }
474
475 //=============================================================================
476 /*!
477  * \brief Return StdMeshers_SegmentLengthAroundVertex assigned to vertex
478  */
479 //=============================================================================
480
481 const StdMeshers_SegmentLengthAroundVertex*
482 StdMeshers_Regular_1D::getVertexHyp(SMESH_Mesh &          theMesh,
483                                     const TopoDS_Vertex & theV)
484 {
485   static SMESH_HypoFilter filter( SMESH_HypoFilter::HasName("SegmentAroundVertex_0D"));
486   if ( const SMESH_Hypothesis * h = theMesh.GetHypothesis( theV, filter, true ))
487   {
488     SMESH_Algo* algo = const_cast< SMESH_Algo* >( static_cast< const SMESH_Algo* > ( h ));
489     const list <const SMESHDS_Hypothesis *> & hypList = algo->GetUsedHypothesis( theMesh, theV, 0 );
490     if ( !hypList.empty() && string("SegmentLengthAroundVertex") == hypList.front()->GetName() )
491       return static_cast<const StdMeshers_SegmentLengthAroundVertex*>( hypList.front() );
492   }
493   return 0;
494 }
495
496 //================================================================================
497 /*!
498  * \brief Tune parameters to fit "SegmentLengthAroundVertex" hypothesis
499   * \param theC3d - wire curve
500   * \param theLength - curve length
501   * \param theParameters - internal nodes parameters to modify
502   * \param theVf - 1st vertex
503   * \param theVl - 2nd vertex
504  */
505 //================================================================================
506
507 void StdMeshers_Regular_1D::redistributeNearVertices (SMESH_Mesh &          theMesh,
508                                                       Adaptor3d_Curve &     theC3d,
509                                                       double                theLength,
510                                                       std::list< double > & theParameters,
511                                                       const TopoDS_Vertex & theVf,
512                                                       const TopoDS_Vertex & theVl)
513 {
514   double f = theC3d.FirstParameter(), l = theC3d.LastParameter();
515   int nPar = theParameters.size();
516   for ( int isEnd1 = 0; isEnd1 < 2; ++isEnd1 )
517   {
518     const TopoDS_Vertex & V = isEnd1 ? theVf : theVl;
519     const StdMeshers_SegmentLengthAroundVertex* hyp = getVertexHyp (theMesh, V );
520     if ( hyp ) {
521       double vertexLength = hyp->GetLength();
522       if ( vertexLength > theLength / 2.0 )
523         continue;
524       if ( isEnd1 ) { // to have a segment of interest at end of theParameters
525         theParameters.reverse();
526         std::swap( f, l );
527       }
528       if ( _hypType == NB_SEGMENTS )
529       {
530         compensateError(0, vertexLength, f, l, theLength, theC3d, theParameters, true );
531       }
532       else if ( nPar <= 3 )
533       {
534         if ( !isEnd1 )
535           vertexLength = -vertexLength;
536         GCPnts_AbscissaPoint Discret(theC3d, vertexLength, l);
537         if ( Discret.IsDone() ) {
538           if ( nPar == 0 )
539             theParameters.push_back( Discret.Parameter());
540           else {
541             double L = GCPnts_AbscissaPoint::Length( theC3d, theParameters.back(), l);
542             if ( vertexLength < L / 2.0 )
543               theParameters.push_back( Discret.Parameter());
544             else
545               compensateError(0, vertexLength, f, l, theLength, theC3d, theParameters, true );
546           }
547         }
548       }
549       else
550       {
551         // recompute params between the last segment and a middle one.
552         // find size of a middle segment
553         int nHalf = ( nPar-1 ) / 2;
554         list< double >::reverse_iterator itU = theParameters.rbegin();
555         std::advance( itU, nHalf );
556         double Um = *itU++;
557         double Lm = GCPnts_AbscissaPoint::Length( theC3d, Um, *itU);
558         double L = GCPnts_AbscissaPoint::Length( theC3d, *itU, l);
559         StdMeshers_Regular_1D algo( *this );
560         algo._hypType = BEG_END_LENGTH;
561         algo._value[ BEG_LENGTH_IND ] = Lm;
562         algo._value[ END_LENGTH_IND ] = vertexLength;
563         double from = *itU, to = l;
564         if ( isEnd1 ) {
565           std::swap( from, to );
566           std::swap( algo._value[ BEG_LENGTH_IND ], algo._value[ END_LENGTH_IND ]);
567         }
568         list<double> params;
569         if ( algo.computeInternalParameters( theMesh, theC3d, L, from, to, params, false ))
570         {
571           if ( isEnd1 ) params.reverse();
572           while ( 1 + nHalf-- )
573             theParameters.pop_back();
574           theParameters.splice( theParameters.end(), params );
575         }
576         else
577         {
578           compensateError(0, vertexLength, f, l, theLength, theC3d, theParameters, true );
579         }
580       }
581       if ( isEnd1 )
582         theParameters.reverse();
583     }
584   }
585 }
586
587 //=============================================================================
588 /*!
589  *  
590  */
591 //=============================================================================
592 bool StdMeshers_Regular_1D::computeInternalParameters(SMESH_Mesh &     theMesh,
593                                                       Adaptor3d_Curve& theC3d,
594                                                       double           theLength,
595                                                       double           theFirstU,
596                                                       double           theLastU,
597                                                       list<double> &   theParams,
598                                                       const bool       theReverse,
599                                                       bool             theConsiderPropagation)
600 {
601   theParams.clear();
602
603   double f = theFirstU, l = theLastU;
604
605   switch( _hypType )
606   {
607   case LOCAL_LENGTH:
608   case MAX_LENGTH:
609   case NB_SEGMENTS: {
610
611     double eltSize = 1;
612     if ( _hypType == MAX_LENGTH )
613     {
614       double nbseg = ceil(theLength / _value[ BEG_LENGTH_IND ]); // integer sup
615       if (nbseg <= 0)
616         nbseg = 1;                        // degenerated edge
617       eltSize = theLength / nbseg;
618     }
619     else if ( _hypType == LOCAL_LENGTH )
620     {
621       // Local Length hypothesis
622       double nbseg = ceil(theLength / _value[ BEG_LENGTH_IND ]); // integer sup
623
624       // NPAL17873:
625       bool isFound = false;
626       if (theConsiderPropagation && !_mainEdge.IsNull()) // propagated from some other edge
627       {
628         // Advanced processing to assure equal number of segments in case of Propagation
629         SMESH_subMesh* sm = theMesh.GetSubMeshContaining(_mainEdge);
630         if (sm) {
631           bool computed = sm->IsMeshComputed();
632           if (!computed) {
633             if (sm->GetComputeState() == SMESH_subMesh::READY_TO_COMPUTE) {
634               _gen->Compute( theMesh, _mainEdge, /*anUpward=*/true);
635               computed = sm->IsMeshComputed();
636             }
637           }
638           if (computed) {
639             SMESHDS_SubMesh* smds = sm->GetSubMeshDS();
640             int nb_segments = smds->NbElements();
641             if (nbseg - 1 <= nb_segments && nb_segments <= nbseg + 1) {
642               isFound = true;
643               nbseg = nb_segments;
644             }
645           }
646         }
647       }
648       if (!isFound) // not found by meshed edge in the propagation chain, use precision
649       {
650         double aPrecision = _value[ PRECISION_IND ];
651         double nbseg_prec = ceil((theLength / _value[ BEG_LENGTH_IND ]) - aPrecision);
652         if (nbseg_prec == (nbseg - 1)) nbseg--;
653       }
654
655       if (nbseg <= 0)
656         nbseg = 1;                        // degenerated edge
657       eltSize = theLength / nbseg;
658     }
659     else
660     {
661       // Number Of Segments hypothesis
662       int NbSegm = _ivalue[ NB_SEGMENTS_IND ];
663       if ( NbSegm < 1 )  return false;
664       if ( NbSegm == 1 ) return true;
665
666       switch (_ivalue[ DISTR_TYPE_IND ])
667       {
668       case StdMeshers_NumberOfSegments::DT_Scale:
669         {
670           double scale = _value[ SCALE_FACTOR_IND ];
671
672           if (fabs(scale - 1.0) < Precision::Confusion()) {
673             // special case to avoid division by zero
674             for (int i = 1; i < NbSegm; i++) {
675               double param = f + (l - f) * i / NbSegm;
676               theParams.push_back( param );
677             }
678           } else {
679             // general case of scale distribution
680             if ( theReverse )
681               scale = 1.0 / scale;
682
683             double alpha = pow(scale, 1.0 / (NbSegm - 1));
684             double factor = (l - f) / (1.0 - pow(alpha, NbSegm));
685
686             for (int i = 1; i < NbSegm; i++) {
687               double param = f + factor * (1.0 - pow(alpha, i));
688               theParams.push_back( param );
689             }
690           }
691           return true;
692         }
693         break;
694       case StdMeshers_NumberOfSegments::DT_TabFunc:
695         {
696           FunctionTable func(_vvalue[ TAB_FUNC_IND ], _ivalue[ CONV_MODE_IND ]);
697           return computeParamByFunc(theC3d, f, l, theLength, theReverse,
698                                     _ivalue[ NB_SEGMENTS_IND ], func,
699                                     theParams);
700         }
701         break;
702       case StdMeshers_NumberOfSegments::DT_ExprFunc:
703         {
704           FunctionExpr func(_svalue[ EXPR_FUNC_IND ].c_str(), _ivalue[ CONV_MODE_IND ]);
705           return computeParamByFunc(theC3d, f, l, theLength, theReverse,
706                                     _ivalue[ NB_SEGMENTS_IND ], func,
707                                     theParams);
708         }
709         break;
710       case StdMeshers_NumberOfSegments::DT_Regular:
711         eltSize = theLength / _ivalue[ NB_SEGMENTS_IND ];
712         break;
713       default:
714         return false;
715       }
716     }
717     GCPnts_UniformAbscissa Discret(theC3d, eltSize, f, l);
718     if ( !Discret.IsDone() )
719       return error( "GCPnts_UniformAbscissa failed");
720
721     int NbPoints = Discret.NbPoints();
722     for ( int i = 2; i < NbPoints; i++ )
723     {
724       double param = Discret.Parameter(i);
725       theParams.push_back( param );
726     }
727     compensateError( eltSize, eltSize, f, l, theLength, theC3d, theParams ); // for PAL9899
728     return true;
729   }
730
731   case BEG_END_LENGTH: {
732
733     // geometric progression: SUM(n) = ( a1 - an * q ) / ( 1 - q ) = theLength
734
735     double a1 = _value[ BEG_LENGTH_IND ];
736     double an = _value[ END_LENGTH_IND ];
737     double q  = ( theLength - a1 ) / ( theLength - an );
738
739     double U1 = theReverse ? l : f;
740     double Un = theReverse ? f : l;
741     double param = U1;
742     double eltSize = theReverse ? -a1 : a1;
743     while ( 1 ) {
744       // computes a point on a curve <theC3d> at the distance <eltSize>
745       // from the point of parameter <param>.
746       GCPnts_AbscissaPoint Discret( theC3d, eltSize, param );
747       if ( !Discret.IsDone() ) break;
748       param = Discret.Parameter();
749       if ( f < param && param < l )
750         theParams.push_back( param );
751       else
752         break;
753       eltSize *= q;
754     }
755     compensateError( a1, an, U1, Un, theLength, theC3d, theParams );
756     if (theReverse) theParams.reverse(); // NPAL18025
757     return true;
758   }
759
760   case ARITHMETIC_1D: {
761
762     // arithmetic progression: SUM(n) = ( an - a1 + q ) * ( a1 + an ) / ( 2 * q ) = theLength
763
764     double a1 = _value[ BEG_LENGTH_IND ];
765     double an = _value[ END_LENGTH_IND ];
766
767     double  q = ( an - a1 ) / ( 2 *theLength/( a1 + an ) - 1 );
768     int n = int(fabs(q) > numeric_limits<double>::min() ? ( 1+( an-a1 )/q ) : ( 1+theLength/a1 ));
769
770     double U1 = theReverse ? l : f;
771     double Un = theReverse ? f : l;
772     double param = U1;
773     double eltSize = a1;
774     if ( theReverse ) {
775       eltSize = -eltSize;
776       q = -q;
777     }
778     while ( n-- > 0 && eltSize * ( Un - U1 ) > 0 ) {
779       // computes a point on a curve <theC3d> at the distance <eltSize>
780       // from the point of parameter <param>.
781       GCPnts_AbscissaPoint Discret( theC3d, eltSize, param );
782       if ( !Discret.IsDone() ) break;
783       param = Discret.Parameter();
784       if ( param > f && param < l )
785         theParams.push_back( param );
786       else
787         break;
788       eltSize += q;
789     }
790     compensateError( a1, an, U1, Un, theLength, theC3d, theParams );
791     if (theReverse) theParams.reverse(); // NPAL18025
792
793     return true;
794   }
795
796   case FIXED_POINTS_1D: {
797     const std::vector<double>& aPnts = _fpHyp->GetPoints();
798     const std::vector<int>& nbsegs = _fpHyp->GetNbSegments();
799     int i = 0;
800     TColStd_SequenceOfReal Params;
801     for(; i<aPnts.size(); i++) {
802       if( aPnts[i]<0.0001 || aPnts[i]>0.9999 ) continue;
803       int j=1;
804       bool IsExist = false;
805       for(; j<=Params.Length(); j++) {
806         if( fabs(aPnts[i]-Params.Value(j)) < 1e-4 ) {
807           IsExist = true;
808           break;
809         }
810         if( aPnts[i]<Params.Value(j) ) break;
811       }
812       if(!IsExist) Params.InsertBefore(j,aPnts[i]);
813     }
814     double par2, par1, lp;
815     par1 = f;
816     lp = l;
817     double sign = 1.0;
818     if(theReverse) {
819       par1 = l;
820       lp = f;
821       sign = -1.0;
822     }
823     double eltSize, segmentSize = 0.;
824     double currAbscissa = 0;
825     for(i=0; i<Params.Length(); i++) {
826       int nbseg = ( i > nbsegs.size()-1 ) ? nbsegs[0] : nbsegs[i];
827       segmentSize = Params.Value(i+1)*theLength - currAbscissa;
828       currAbscissa += segmentSize;
829       GCPnts_AbscissaPoint APnt(theC3d, sign*segmentSize, par1);
830       if( !APnt.IsDone() )
831         return error( "GCPnts_AbscissaPoint failed");
832       par2 = APnt.Parameter();
833       eltSize = segmentSize/nbseg;
834       GCPnts_UniformAbscissa Discret(theC3d, eltSize, par1, par2);
835       if(theReverse)
836         Discret.Initialize(theC3d, eltSize, par2, par1);
837       else
838         Discret.Initialize(theC3d, eltSize, par1, par2);
839       if ( !Discret.IsDone() )
840         return error( "GCPnts_UniformAbscissa failed");
841       int NbPoints = Discret.NbPoints();
842       list<double> tmpParams;
843       for(int i=2; i<NbPoints; i++) {
844         double param = Discret.Parameter(i);
845         tmpParams.push_back( param );
846       }
847       if (theReverse) {
848         compensateError( eltSize, eltSize, par2, par1, segmentSize, theC3d, tmpParams );
849         tmpParams.reverse();
850       }
851       else {
852         compensateError( eltSize, eltSize, par1, par2, segmentSize, theC3d, tmpParams );
853       }
854       list<double>::iterator itP = tmpParams.begin();
855       for(; itP != tmpParams.end(); itP++) {
856         theParams.push_back( *(itP) );
857       }
858       theParams.push_back( par2 );
859
860       par1 = par2;
861     }
862     // add for last
863     int nbseg = ( nbsegs.size() > Params.Length() ) ? nbsegs[Params.Length()] : nbsegs[0];
864     segmentSize = theLength - currAbscissa;
865     eltSize = segmentSize/nbseg;
866     GCPnts_UniformAbscissa Discret;
867     if(theReverse)
868       Discret.Initialize(theC3d, eltSize, par1, lp);
869     else
870       Discret.Initialize(theC3d, eltSize, lp, par1);
871     if ( !Discret.IsDone() )
872       return error( "GCPnts_UniformAbscissa failed");
873     int NbPoints = Discret.NbPoints();
874     list<double> tmpParams;
875     for(int i=2; i<NbPoints; i++) {
876       double param = Discret.Parameter(i);
877       tmpParams.push_back( param );
878     }
879     if (theReverse) {
880       compensateError( eltSize, eltSize, lp, par1, segmentSize, theC3d, tmpParams );
881       tmpParams.reverse();
882     }
883     else {
884       compensateError( eltSize, eltSize, par1, lp, segmentSize, theC3d, tmpParams );
885     }
886     list<double>::iterator itP = tmpParams.begin();
887     for(; itP != tmpParams.end(); itP++) {
888       theParams.push_back( *(itP) );
889     }
890
891     if (theReverse) {
892       theParams.reverse(); // NPAL18025
893     }
894     return true;
895   }
896
897   case DEFLECTION: {
898
899     GCPnts_UniformDeflection Discret(theC3d, _value[ DEFLECTION_IND ], f, l, true);
900     if ( !Discret.IsDone() )
901       return false;
902
903     int NbPoints = Discret.NbPoints();
904     for ( int i = 2; i < NbPoints; i++ )
905     {
906       double param = Discret.Parameter(i);
907       theParams.push_back( param );
908     }
909     return true;
910   }
911
912   default:;
913   }
914
915   return false;
916 }
917
918 //=============================================================================
919 /*!
920  *  
921  */
922 //=============================================================================
923
924 bool StdMeshers_Regular_1D::Compute(SMESH_Mesh & theMesh, const TopoDS_Shape & theShape)
925 {
926   if ( _hypType == NONE )
927     return false;
928
929   SMESHDS_Mesh * meshDS = theMesh.GetMeshDS();
930
931   const TopoDS_Edge & EE = TopoDS::Edge(theShape);
932   TopoDS_Edge E = TopoDS::Edge(EE.Oriented(TopAbs_FORWARD));
933   int shapeID = meshDS->ShapeToIndex( E );
934
935   double f, l;
936   Handle(Geom_Curve) Curve = BRep_Tool::Curve(E, f, l);
937
938   TopoDS_Vertex VFirst, VLast;
939   TopExp::Vertices(E, VFirst, VLast);   // Vfirst corresponds to f and Vlast to l
940
941   ASSERT(!VFirst.IsNull());
942   ASSERT(!VLast.IsNull());
943   const SMDS_MeshNode * idFirst = SMESH_Algo::VertexNode( VFirst, meshDS );
944   const SMDS_MeshNode * idLast = SMESH_Algo::VertexNode( VLast, meshDS );
945   if (!idFirst || !idLast)
946     return error( COMPERR_BAD_INPUT_MESH, "No node on vertex");
947
948   if (!Curve.IsNull())
949   {
950     list< double > params;
951     bool reversed = false;
952     if ( theMesh.GetShapeToMesh().ShapeType() >= TopAbs_WIRE ) {
953       reversed = ( EE.Orientation() == TopAbs_REVERSED );
954     }
955     if ( !_mainEdge.IsNull() ) {
956       reversed = ( _mainEdge.Orientation() == TopAbs_REVERSED );
957     }
958     else if ( _revEdgesIDs.size() > 0 ) {
959       for ( int i = 0; i < _revEdgesIDs.size(); i++) {
960         if ( _revEdgesIDs[i] == shapeID ) {
961           reversed = !reversed;
962         }
963       }
964     }
965
966     BRepAdaptor_Curve C3d( E );
967     double length = EdgeLength( E );
968     if ( ! computeInternalParameters( theMesh, C3d, length, f, l, params, reversed, true )) {
969       return false;
970     }
971     redistributeNearVertices( theMesh, C3d, length, params, VFirst, VLast );
972
973     // edge extrema (indexes : 1 & NbPoints) already in SMDS (TopoDS_Vertex)
974     // only internal nodes receive an edge position with param on curve
975
976     const SMDS_MeshNode * idPrev = idFirst;
977     double parPrev = f;
978     double parLast = l;
979
980     /* NPAL18025
981     if (reversed) {
982       idPrev = idLast;
983       idLast = idFirst;
984       idFirst = idPrev;
985       parPrev = l;
986       parLast = f;
987     }
988     */
989
990     for (list<double>::iterator itU = params.begin(); itU != params.end(); itU++) {
991       double param = *itU;
992       gp_Pnt P = Curve->Value(param);
993
994       //Add the Node in the DataStructure
995       SMDS_MeshNode * node = meshDS->AddNode(P.X(), P.Y(), P.Z());
996       meshDS->SetNodeOnEdge(node, shapeID, param);
997
998       if(_quadraticMesh) {
999         // create medium node
1000         double prm = ( parPrev + param )/2;
1001         gp_Pnt PM = Curve->Value(prm);
1002         SMDS_MeshNode * NM = meshDS->AddNode(PM.X(), PM.Y(), PM.Z());
1003         meshDS->SetNodeOnEdge(NM, shapeID, prm);
1004         SMDS_MeshEdge * edge = meshDS->AddEdge(idPrev, node, NM);
1005         meshDS->SetMeshElementOnShape(edge, shapeID);
1006       }
1007       else {
1008         SMDS_MeshEdge * edge = meshDS->AddEdge(idPrev, node);
1009         meshDS->SetMeshElementOnShape(edge, shapeID);
1010       }
1011
1012       idPrev = node;
1013       parPrev = param;
1014     }
1015     if(_quadraticMesh) {
1016       double prm = ( parPrev + parLast )/2;
1017       gp_Pnt PM = Curve->Value(prm);
1018       SMDS_MeshNode * NM = meshDS->AddNode(PM.X(), PM.Y(), PM.Z());
1019       meshDS->SetNodeOnEdge(NM, shapeID, prm);
1020       SMDS_MeshEdge * edge = meshDS->AddEdge(idPrev, idLast, NM);
1021       meshDS->SetMeshElementOnShape(edge, shapeID);
1022     }
1023     else {
1024       SMDS_MeshEdge* edge = meshDS->AddEdge(idPrev, idLast);
1025       meshDS->SetMeshElementOnShape(edge, shapeID);
1026     }
1027   }
1028   else
1029   {
1030     //MESSAGE("************* Degenerated edge! *****************");
1031
1032     // Edge is a degenerated Edge : We put n = 5 points on the edge.
1033     const int NbPoints = 5;
1034     BRep_Tool::Range( E, f, l ); // PAL15185
1035     double du = (l - f) / (NbPoints - 1);
1036
1037     gp_Pnt P = BRep_Tool::Pnt(VFirst);
1038
1039     const SMDS_MeshNode * idPrev = idFirst;
1040     for (int i = 2; i < NbPoints; i++) {
1041       double param = f + (i - 1) * du;
1042       SMDS_MeshNode * node = meshDS->AddNode(P.X(), P.Y(), P.Z());
1043       if(_quadraticMesh) {
1044         // create medium node
1045         double prm = param - du/2.;
1046         SMDS_MeshNode * NM = meshDS->AddNode(P.X(), P.Y(), P.Z());
1047         meshDS->SetNodeOnEdge(NM, shapeID, prm);
1048         SMDS_MeshEdge * edge = meshDS->AddEdge(idPrev, node, NM);
1049         meshDS->SetMeshElementOnShape(edge, shapeID);
1050       }
1051       else {
1052         SMDS_MeshEdge * edge = meshDS->AddEdge(idPrev, node);
1053         meshDS->SetMeshElementOnShape(edge, shapeID);
1054       }
1055       meshDS->SetNodeOnEdge(node, shapeID, param);
1056       idPrev = node;
1057     }
1058     if(_quadraticMesh) {
1059       // create medium node
1060       double prm = l - du/2.;
1061       SMDS_MeshNode * NM = meshDS->AddNode(P.X(), P.Y(), P.Z());
1062       meshDS->SetNodeOnEdge(NM, shapeID, prm);
1063       SMDS_MeshEdge * edge = meshDS->AddEdge(idPrev, idLast, NM);
1064       meshDS->SetMeshElementOnShape(edge, shapeID);
1065     }
1066     else {
1067       SMDS_MeshEdge * edge = meshDS->AddEdge(idPrev, idLast);
1068       meshDS->SetMeshElementOnShape(edge, shapeID);
1069     }
1070   }
1071   return true;
1072 }
1073
1074
1075 //=============================================================================
1076 /*!
1077  *  
1078  */
1079 //=============================================================================
1080
1081 bool StdMeshers_Regular_1D::Evaluate(SMESH_Mesh & theMesh,
1082                                      const TopoDS_Shape & theShape,
1083                                      MapShapeNbElems& aResMap)
1084 {
1085   if ( _hypType == NONE )
1086     return false;
1087
1088   //SMESHDS_Mesh * meshDS = theMesh.GetMeshDS();
1089
1090   const TopoDS_Edge & EE = TopoDS::Edge(theShape);
1091   TopoDS_Edge E = TopoDS::Edge(EE.Oriented(TopAbs_FORWARD));
1092   //  int shapeID = meshDS->ShapeToIndex( E );
1093
1094   double f, l;
1095   Handle(Geom_Curve) Curve = BRep_Tool::Curve(E, f, l);
1096
1097   TopoDS_Vertex VFirst, VLast;
1098   TopExp::Vertices(E, VFirst, VLast);   // Vfirst corresponds to f and Vlast to l
1099
1100   ASSERT(!VFirst.IsNull());
1101   ASSERT(!VLast.IsNull());
1102
1103   std::vector<int> aVec(SMDSEntity_Last,0);
1104
1105   if (!Curve.IsNull()) {
1106     list< double > params;
1107
1108     BRepAdaptor_Curve C3d( E );
1109     double length = EdgeLength( E );
1110     if ( ! computeInternalParameters( theMesh, C3d, length, f, l, params, false, true )) {
1111       SMESH_subMesh * sm = theMesh.GetSubMesh(theShape);
1112       aResMap.insert(std::make_pair(sm,aVec));
1113       SMESH_ComputeErrorPtr& smError = sm->GetComputeError();
1114       smError.reset( new SMESH_ComputeError(COMPERR_ALGO_FAILED,"Submesh can not be evaluated",this));
1115       return false;
1116     }
1117     redistributeNearVertices( theMesh, C3d, length, params, VFirst, VLast );
1118
1119     if(_quadraticMesh) {
1120       aVec[SMDSEntity_Node] = 2*params.size() + 1;
1121       aVec[SMDSEntity_Quad_Edge] = params.size() + 1;
1122     }
1123     else {
1124       aVec[SMDSEntity_Node] = params.size();
1125       aVec[SMDSEntity_Edge] = params.size() + 1;
1126     }
1127     
1128   }
1129   else {
1130     //MESSAGE("************* Degenerated edge! *****************");
1131     // Edge is a degenerated Edge : We put n = 5 points on the edge.
1132     if(_quadraticMesh) {
1133       aVec[SMDSEntity_Node] = 11;
1134       aVec[SMDSEntity_Quad_Edge] = 6;
1135     }
1136     else {
1137       aVec[SMDSEntity_Node] = 5;
1138       aVec[SMDSEntity_Edge] = 6;
1139     }
1140   }
1141
1142   SMESH_subMesh * sm = theMesh.GetSubMesh(theShape);
1143   aResMap.insert(std::make_pair(sm,aVec));
1144
1145   return true;
1146 }
1147
1148
1149 //=============================================================================
1150 /*!
1151  *  See comments in SMESH_Algo.cxx
1152  */
1153 //=============================================================================
1154
1155 const list <const SMESHDS_Hypothesis *> &
1156 StdMeshers_Regular_1D::GetUsedHypothesis(SMESH_Mesh &         aMesh,
1157                                          const TopoDS_Shape & aShape,
1158                                          const bool           ignoreAuxiliary)
1159 {
1160   _usedHypList.clear();
1161   _mainEdge.Nullify();
1162
1163   SMESH_HypoFilter auxiliaryFilter, compatibleFilter;
1164   auxiliaryFilter.Init( SMESH_HypoFilter::IsAuxiliary() );
1165   const bool ignoreAux = true;
1166   InitCompatibleHypoFilter( compatibleFilter, ignoreAux );
1167
1168   // get non-auxiliary assigned to aShape
1169   int nbHyp = aMesh.GetHypotheses( aShape, compatibleFilter, _usedHypList, false );
1170
1171   if (nbHyp == 0 && aShape.ShapeType() == TopAbs_EDGE)
1172   {
1173     // Check, if propagated from some other edge
1174     _mainEdge = StdMeshers_Propagation::GetPropagationSource( aMesh, aShape );
1175     if ( !_mainEdge.IsNull() )
1176     {
1177       // Propagation of 1D hypothesis from <aMainEdge> on this edge;
1178       // get non-auxiliary assigned to _mainEdge
1179       nbHyp = aMesh.GetHypotheses( _mainEdge, compatibleFilter, _usedHypList, true );
1180     }
1181   }
1182
1183   if (nbHyp == 0) // nothing propagated nor assigned to aShape
1184   {
1185     SMESH_Algo::GetUsedHypothesis( aMesh, aShape, ignoreAuxiliary );
1186     nbHyp = _usedHypList.size();
1187   }
1188   else
1189   {
1190     // get auxiliary hyps from aShape
1191     aMesh.GetHypotheses( aShape, auxiliaryFilter, _usedHypList, true );
1192   }
1193   if ( nbHyp > 1 && ignoreAuxiliary )
1194     _usedHypList.clear(); //only one compatible non-auxiliary hypothesis allowed
1195
1196   return _usedHypList;
1197 }