0024002: Overall code and build procedure refactoring -- automatic
[occt.git] / src / BRepBlend / BRepBlend_RstRstEvolRad.cxx
old mode 100755 (executable)
new mode 100644 (file)
index 1c928ff..afe84f8
@@ -1,21 +1,42 @@
-// File:       BRepBlend_RstRstEvolRad.cxx
-// Created:    Mon Feb 10 10:32:10 1997
-// Author:     Laurent BOURESCHE
-// Author:     Jacques GOUSSARD
-//             <lbo@pomalox.paris1.matra-dtv.fr>
-
-#include <BRepBlend_RstRstEvolRad.ixx>
-#include <math_Gauss.hxx>
-#include <math_SVD.hxx>
-
-#include <ElCLib.hxx>
-#include <gp.hxx>
+// Created on: 1997-02-10
+// Created by: Jacques GOUSSARD
+// Copyright (c) 1997-1999 Matra Datavision
+// Copyright (c) 1999-2014 OPEN CASCADE SAS
+//
+// This file is part of Open CASCADE Technology software library.
+//
+// This library is free software; you can redistribute it and/or modify it under
+// the terms of the GNU Lesser General Public License version 2.1 as published
+// by the Free Software Foundation, with special exception defined in the file
+// OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
+// distribution for complete text of the license and disclaimer of any warranty.
+//
+// Alternatively, this file may be used under the terms of Open CASCADE
+// commercial license or contractual agreement.
+
+
+#include <Adaptor2d_HCurve2d.hxx>
+#include <Adaptor3d_HCurve.hxx>
+#include <Adaptor3d_HSurface.hxx>
+#include <Blend_Point.hxx>
 #include <BlendFunc.hxx>
+#include <BRepBlend_RstRstEvolRad.hxx>
+#include <ElCLib.hxx>
 #include <GeomFill.hxx>
-#include <TColStd_SequenceOfReal.hxx>
+#include <gp.hxx>
+#include <gp_Circ.hxx>
+#include <gp_Pnt.hxx>
+#include <gp_Pnt2d.hxx>
+#include <gp_Vec.hxx>
+#include <gp_Vec2d.hxx>
+#include <Law_Function.hxx>
+#include <math_Gauss.hxx>
+#include <math_Matrix.hxx>
+#include <math_SVD.hxx>
+#include <Precision.hxx>
 #include <Standard_DomainError.hxx>
 #include <Standard_NotImplemented.hxx>
-#include <Precision.hxx>
+#include <TColStd_SequenceOfReal.hxx>
 
 #define Eps 1.e-15
 
@@ -183,10 +204,8 @@ Standard_Boolean BRepBlend_RstRstEvolRad::Values(const math_Vector& X,
                                                 math_Vector&       F,
                                                 math_Matrix&       D)
 {
-  Standard_Boolean Error;
-
-  Error = Value(X, F);  
-  Error = Derivatives(X, D);
+  Value(X, F);  
+  Derivatives(X, D);
  
   return Standard_True;
 }
@@ -523,9 +542,7 @@ Blend_DecrochStatus BRepBlend_RstRstEvolRad::Decroch(const math_Vector& Sol,
   // Normal to the reference surface 2
   NRst2     = d1u.Crossed(d1v);
 
-  Standard_Boolean IsCenter;
-
-  IsCenter = CenterCircleRst1Rst2(PtTmp1, PtTmp2, nplan, Center, NotUsed);
+  CenterCircleRst1Rst2(PtTmp1, PtTmp2, nplan, Center, NotUsed);
 
   norm      = nplan.Crossed(NRst1).Magnitude();
   unsurnorm = 1. / norm;
@@ -662,9 +679,7 @@ void BRepBlend_RstRstEvolRad::Section(const Standard_Real Param,
   ptrst1   = cons1.Value(U);
   ptrst2   = cons2.Value(V);
 
-  Standard_Boolean IsCenter;
-
-  IsCenter = CenterCircleRst1Rst2(ptrst1, ptrst2, np, Center, NotUsed);
+  CenterCircleRst1Rst2(ptrst1, ptrst2, np, Center, NotUsed);
 
   C.SetRadius(Abs(ray));
   ns = gp_Vec(Center, ptrst1).Normalized(); 
@@ -871,8 +886,7 @@ void BRepBlend_RstRstEvolRad::Section(const Blend_Point& P,
   }
 
   // Calculate the center of the circle
-  Standard_Boolean IsCenter;
-  IsCenter = CenterCircleRst1Rst2(ptrst1, ptrst2, nplan, Center, NotUsed);
+  CenterCircleRst1Rst2(ptrst1, ptrst2, nplan, Center, NotUsed);
 
   // normals to the section with points 
   n1  = gp_Vec(Center, ptrst1).Normalized();  
@@ -915,9 +929,6 @@ Standard_Boolean BRepBlend_RstRstEvolRad::Section(const Blend_Point& P,
   math_Matrix gradsol(1, 2, 1, 2);
   
   Standard_Real prm       = P.Parameter();
-#ifdef DEB
-  Standard_Integer NbSpan = (Poles.Length() - 1) / 2;
-#endif
   Standard_Integer low    = Poles.Lower();
   Standard_Integer upp    = Poles.Upper();
   Standard_Boolean istgt;