src/DrawFairCurve/DrawFairCurve_Batten.cxx

   1 // File:        DrawFairCurve_Batten.cxx
   2 // Created:     Fri Feb 16 14:32:26 1996
   3 // Author:      Philippe MANGIN
   4 //              <pmn@sgi29>
   5 // Copyright:    Matra Datavision 1996
   6
   7 #include <DrawFairCurve_Batten.ixx>
   8
   9 #include <FairCurve_Batten.hxx>
  10 #include <FairCurve_AnalysisCode.hxx>
  11 #include <GeomTools_Curve2dSet.hxx>
  12
  13 DrawFairCurve_Batten::DrawFairCurve_Batten(const Standard_Address TheBatten)
  14                      : DrawTrSurf_BSplineCurve2d( ((FairCurve_Batten*)TheBatten)->Curve()),
  15                        MyBatten( TheBatten)
  16
  17 {
  18   Compute();
  19   ShowCurvature();
  20 }
  21
  22 void DrawFairCurve_Batten::Compute()
  23 {
  24   FairCurve_AnalysisCode Iana;
  25 #ifdef DEB
  26   Standard_Boolean Ok =
  27 #endif
  28                         ((FairCurve_Batten*)MyBatten)->Compute(Iana, 50, 1.0e-2);
  29   curv = ((FairCurve_Batten*)MyBatten)->Curve();
  30 }
  31 void DrawFairCurve_Batten::SetPoint(const Standard_Integer Side, const gp_Pnt2d& Point)
  32 {
  33   if (Side == 1) {
  34     ((FairCurve_Batten*)MyBatten)->SetP1(Point);
  35    }
  36   else {
  37     ((FairCurve_Batten*)MyBatten)-> SetP2(Point);
  38    }
  39   Compute();
  40 }
  41
  42 void DrawFairCurve_Batten::SetAngle(const Standard_Integer Side, const Standard_Real Angle)
  43 {
  44   if (Side == 1) {
  45      ((FairCurve_Batten*)MyBatten)->SetAngle1(Angle*M_PI/180);
  46      if ( ((FairCurve_Batten*)MyBatten)->GetConstraintOrder1() == 0 )
  47      {
  48        ((FairCurve_Batten*)MyBatten)->SetConstraintOrder1(1);
  49      }
  50    }
  51   else {
  52      ((FairCurve_Batten*)MyBatten)->SetAngle2(Angle*M_PI/180);
  53      if ( ((FairCurve_Batten*)MyBatten)->GetConstraintOrder2() == 0 )
  54      {
  55      ((FairCurve_Batten*)MyBatten)->SetConstraintOrder2(1);
  56      }
  57    }
  58   Compute();
  59 }
  60
  61 void DrawFairCurve_Batten::SetSliding(const Standard_Real Length)
  62 {
  63   ((FairCurve_Batten*)MyBatten)-> SetFreeSliding(Standard_False);
  64   ((FairCurve_Batten*)MyBatten)->SetSlidingFactor(Length);
  65   Compute();
  66 }
  67
  68 void DrawFairCurve_Batten::SetHeight(const Standard_Real Height)
  69 {
  70  ((FairCurve_Batten*)MyBatten)->SetHeight(Height);
  71  Compute();
  72 }
  73
  74 void DrawFairCurve_Batten::SetSlope(const Standard_Real Slope)
  75 {
  76  ((FairCurve_Batten*)MyBatten)->SetSlope(Slope);
  77  Compute();
  78 }
  79
  80 Standard_Real DrawFairCurve_Batten::GetAngle(const Standard_Integer Side) const
  81 {
  82  if (Side == 1) return ((FairCurve_Batten*)MyBatten)->GetAngle1();
  83  else           return ((FairCurve_Batten*)MyBatten)->GetAngle2();
  84 }
  85
  86 Standard_Real DrawFairCurve_Batten::GetSliding() const
  87 {
  88    return ((FairCurve_Batten*)MyBatten)->GetSlidingFactor();
  89 }
  90
  91
  92 void DrawFairCurve_Batten::FreeSliding()
  93 {
  94   ((FairCurve_Batten*)MyBatten)->SetFreeSliding(Standard_True);
  95   Compute();
  96 }
  97
  98 void DrawFairCurve_Batten::FreeAngle(const Standard_Integer Side)
  99 {
 100  if (Side == 1) ((FairCurve_Batten*)MyBatten)->SetConstraintOrder1(0);
 101  else           ((FairCurve_Batten*)MyBatten)->SetConstraintOrder2(0);
 102
 103  Compute();
 104 }
 105
 106 void DrawFairCurve_Batten::Dump(Standard_OStream& S)const
 107 {
 108   GeomTools_Curve2dSet::PrintCurve2d(curv,S);
 109   ((FairCurve_Batten*)MyBatten)->Dump(S);
 110 }