0024947: Redesign OCCT legacy type system -- automatic
[occt.git] / src / StepGeom / StepGeom_ConicalSurface.cxx
1 // Copyright (c) 1999-2014 OPEN CASCADE SAS
2 //
3 // This file is part of Open CASCADE Technology software library.
4 //
5 // This library is free software; you can redistribute it and/or modify it under
6 // the terms of the GNU Lesser General Public License version 2.1 as published
7 // by the Free Software Foundation, with special exception defined in the file
8 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
9 // distribution for complete text of the license and disclaimer of any warranty.
10 //
11 // Alternatively, this file may be used under the terms of Open CASCADE
12 // commercial license or contractual agreement.
13
14 #include <StepGeom_ConicalSurface.ixx>
15
16
17 StepGeom_ConicalSurface::StepGeom_ConicalSurface ()  {}
18
19 void StepGeom_ConicalSurface::Init(
20         const Handle(TCollection_HAsciiString)& aName,
21         const Handle(StepGeom_Axis2Placement3d)& aPosition)
22 {
23
24         StepGeom_ElementarySurface::Init(aName, aPosition);
25 }
26
27 void StepGeom_ConicalSurface::Init(
28         const Handle(TCollection_HAsciiString)& aName,
29         const Handle(StepGeom_Axis2Placement3d)& aPosition,
30         const Standard_Real aRadius,
31         const Standard_Real aSemiAngle)
32 {
33         // --- classe own fields ---
34         radius = aRadius;
35         semiAngle = aSemiAngle;
36         // --- classe inherited fields ---
37         StepGeom_ElementarySurface::Init(aName, aPosition);
38 }
39
40
41 void StepGeom_ConicalSurface::SetRadius(const Standard_Real aRadius)
42 {
43         radius = aRadius;
44 }
45
46 Standard_Real StepGeom_ConicalSurface::Radius() const
47 {
48         return radius;
49 }
50
51 void StepGeom_ConicalSurface::SetSemiAngle(const Standard_Real aSemiAngle)
52 {
53         semiAngle = aSemiAngle;
54 }
55
56 Standard_Real StepGeom_ConicalSurface::SemiAngle() const
57 {
58         return semiAngle;
59 }