src/HLRBRep/HLRBRep_EdgeFaceTool.cxx

   1 // File:      HLRBRep_EdgeFaceTool.cxx
   2 // Created:   Mon Oct 18 19:31:35 1993
   3 // Author:    Christophe MARION
   4 // Copyright: OPEN CASCADE 2000
   5
   6 #include <HLRBRep_EdgeFaceTool.ixx>
   7 #include <HLRBRep_Curve.hxx>
   8 #include <HLRBRep_Surface.hxx>
   9 #include <BRepExtrema_ExtPF.hxx>
  10 #include <BRepLib_MakeVertex.hxx>
  11 #include <BRep_Tool.hxx>
  12 #include <BRepAdaptor_Curve2d.hxx>
  13 #include <TopoDS_Vertex.hxx>
  14 #include <gp.hxx>
  15
  16 //=======================================================================
  17 //function : CurvatureDirection
  18 //purpose  :
  19 //=======================================================================
  20
  21 Standard_Real HLRBRep_EdgeFaceTool::CurvatureValue
  22  (const Standard_Address F,
  23   const Standard_Real U,
  24   const Standard_Real V,
  25   const gp_Dir& Tg)
  26 {
  27   gp_Pnt P;
  28   gp_Vec D1U,D1V,D2U,D2V,D2UV;
  29   ((HLRBRep_Surface*)F)->D2(U,V,P,D1U,D1V,D2U,D2V,D2UV);
  30   Standard_Real d1ut   = D1U*Tg;
  31   Standard_Real d1vt   = D1V*Tg;
  32   Standard_Real d1ud1v = D1U*D1V;
  33   Standard_Real nmu2   = D1U*D1U;
  34   Standard_Real nmv2   = D1V*D1V;
  35   Standard_Real det = nmu2 * nmv2 - d1ud1v * d1ud1v;
  36   Standard_Real alfa = ( d1ut * nmv2 - d1vt * d1ud1v ) / det;
  37   Standard_Real beta = ( d1vt * nmu2 - d1ut * d1ud1v ) / det;
  38   gp_Vec Nm = D1U ^ D1V;
  39   if (Nm.Magnitude() > gp::Resolution()) {
  40     Nm.Normalize();
  41     Standard_Real alfa2 = alfa*alfa;
  42     Standard_Real beta2 = beta*beta;
  43     Standard_Real alfabeta = alfa*beta;
  44     Standard_Real N = (Nm*D2U)*alfa2  + 2*(Nm*D2UV)*alfabeta + (Nm*D2V)*beta2;
  45     Standard_Real D = nmu2    *alfa2  + 2*d1ud1v   *alfabeta + nmv2    *beta2;
  46     return N/D;
  47   }
  48   return 0.;
  49 }
  50
  51 //=======================================================================
  52 //function : UVPoint
  53 //purpose  :
  54 //=======================================================================
  55
  56 Standard_Boolean HLRBRep_EdgeFaceTool::UVPoint(const Standard_Real Par,
  57                                                const Standard_Address E,
  58                                                const Standard_Address F,
  59                                                Standard_Real& U,
  60                                                Standard_Real& V)
  61 {
  62   Standard_Real pfbid,plbid;
  63   if (BRep_Tool::CurveOnSurface
  64       (((HLRBRep_Curve  *)E)->Curve().Edge(),
  65        ((HLRBRep_Surface*)F)->Surface().Face(),pfbid,plbid).IsNull())
  66   {
  67     BRepExtrema_ExtPF proj
  68       (BRepLib_MakeVertex(((HLRBRep_Curve*)E)->Value3D(Par)),
  69        ((HLRBRep_Surface*)F)->Surface().Face());
  70     Standard_Integer i, index = 0;
  71     Standard_Real dist2 = RealLast();
  72     const Standard_Integer n = proj.NbExt();
  73     for (i = 1; i <= n; i++) {
  74       const Standard_Real newdist2 = proj.SquareDistance(i);
  75       if (newdist2 < dist2) {
  76         dist2 = newdist2;
  77         index = i;
  78       }
  79     }
  80     if (index == 0)
  81       return Standard_False;
  82
  83     proj.Parameter(index,U,V);
  84   }
  85   else {
  86     BRepAdaptor_Curve2d PC
  87       (((HLRBRep_Curve  *)E)->Curve().Edge(),
  88        ((HLRBRep_Surface*)F)->Surface().Face());
  89     gp_Pnt2d P2d;
  90     PC.D0(Par,P2d);
  91     U = P2d.X();
  92     V = P2d.Y();
  93   }
  94   return Standard_True;
  95 }