1 // Created on: 1992-09-02
2 // Created by: Remi GILET
3 // Copyright (c) 1992-1999 Matra Datavision
4 // Copyright (c) 1999-2014 OPEN CASCADE SAS
6 // This file is part of Open CASCADE Technology software library.
8 // This library is free software; you can redistribute it and / or modify it
9 // under the terms of the GNU Lesser General Public version 2.1 as published
10 // by the Free Software Foundation, with special exception defined in the file
11 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 // distribution for complete text of the license and disclaimer of any warranty.
14 // Alternatively, this file may be used under the terms of Open CASCADE
15 // commercial license or contractual agreement.
17 #include <gce_MakeCylinder.ixx>
18 #include <StdFail_NotDone.hxx>
22 //=========================================================================
23 // Constructions d un cylindre de gp par son Ax2 A2 et son rayon +
25 //=========================================================================
27 gce_MakeCylinder::gce_MakeCylinder(const gp_Ax2& A2 ,
28 const Standard_Real Radius )
30 if (Radius < 0.0) { TheError = gce_NegativeRadius; }
32 TheCylinder = gp_Cylinder(A2,Radius);
37 //=========================================================================
38 // Constructions d un cylindre de gp par son axe Axis et son rayon +
40 //=========================================================================
42 gce_MakeCylinder::gce_MakeCylinder(const gp_Ax1& Axis ,
43 const Standard_Real Radius )
45 if (Radius < 0.0) { TheError = gce_NegativeRadius; }
47 gp_Dir D(Axis.Direction());
49 Standard_Real x = D.X();
50 Standard_Real y = D.Y();
51 Standard_Real z = D.Z();
52 if (Abs(x) > gp::Resolution()) { Direc = gp_Dir(-y,x,0.0); }
53 else if (Abs(y) > gp::Resolution()) { Direc = gp_Dir(-y,x,0.0); }
54 else if (Abs(z) > gp::Resolution()) { Direc = gp_Dir(0.0,-z,y); }
55 TheCylinder = gp_Cylinder(gp_Ax2(Axis.Location(),D,Direc),Radius);
60 //=========================================================================
61 // Constructions d un cylindre de gp par un cercle. +
62 //=========================================================================
64 gce_MakeCylinder::gce_MakeCylinder(const gp_Circ& Circ )
66 TheCylinder = gp_Cylinder(Circ.Position(),Circ.Radius());
70 //=========================================================================
71 // Constructions d un cylindre de gp par trois points P1, P2, P3. +
72 // P1 et P2 donnent l axe du cylindre, la distance de P3 a l axe donne +
73 // le rayon du cylindre. +
74 //=========================================================================
76 gce_MakeCylinder::gce_MakeCylinder(const gp_Pnt& P1 ,
80 if (P1.Distance(P2) < gp::Resolution()) { TheError = gce_ConfusedPoints; }
82 gp_Dir D1(P2.XYZ()-P1.XYZ());
84 Standard_Real x = D1.X();
85 Standard_Real y = D1.Y();
86 Standard_Real z = D1.Z();
87 if (Abs(x) > gp::Resolution()) { D2 = gp_Dir(-y,x,0.0); }
88 else if (Abs(y) > gp::Resolution()) { D2 = gp_Dir(-y,x,0.0); }
89 else if (Abs(z) > gp::Resolution()) { D2 = gp_Dir(0.0,-z,y); }
90 TheCylinder = gp_Cylinder(gp_Ax2(P1,D1,D2 ),gp_Lin(P1,D1).Distance(P3));
95 //=========================================================================
96 // Constructions d un cylindre de gp concentrique a un autre cylindre de +
97 // gp a une distance Dist. +
98 //=========================================================================
100 gce_MakeCylinder::gce_MakeCylinder(const gp_Cylinder& Cyl ,
101 const Standard_Real Dist )
103 Standard_Real Rad = Cyl.Radius()+Dist;
104 if (Rad < 0.) { TheError = gce_NegativeRadius; }
106 TheCylinder = gp_Cylinder(Cyl);
107 TheCylinder.SetRadius(Rad);
112 //=========================================================================
113 // Constructions d un cylindre de gp concentrique a un autre cylindre de +
114 // gp passant par le point P. +
115 //=========================================================================
117 gce_MakeCylinder::gce_MakeCylinder(const gp_Cylinder& Cyl ,
120 gp_Lin L(Cyl.Axis());
121 Standard_Real Rad = L.Distance(P);
122 TheCylinder = gp_Cylinder(Cyl);
123 TheCylinder.SetRadius(Rad);
127 const gp_Cylinder& gce_MakeCylinder::Value() const
129 StdFail_NotDone_Raise_if(!TheError == gce_Done,"");
133 const gp_Cylinder& gce_MakeCylinder::Operator() const
138 gce_MakeCylinder::operator gp_Cylinder() const