Integration of OCCT 6.5.0 from SVN
[occt.git] / src / StepGeom / StepGeom_SphericalSurface.cxx
1 #include <StepGeom_SphericalSurface.ixx>
2
3
4 StepGeom_SphericalSurface::StepGeom_SphericalSurface ()  {}
5
6 void StepGeom_SphericalSurface::Init(
7         const Handle(TCollection_HAsciiString)& aName,
8         const Handle(StepGeom_Axis2Placement3d)& aPosition)
9 {
10
11         StepGeom_ElementarySurface::Init(aName, aPosition);
12 }
13
14 void StepGeom_SphericalSurface::Init(
15         const Handle(TCollection_HAsciiString)& aName,
16         const Handle(StepGeom_Axis2Placement3d)& aPosition,
17         const Standard_Real aRadius)
18 {
19         // --- classe own fields ---
20         radius = aRadius;
21         // --- classe inherited fields ---
22         StepGeom_ElementarySurface::Init(aName, aPosition);
23 }
24
25
26 void StepGeom_SphericalSurface::SetRadius(const Standard_Real aRadius)
27 {
28         radius = aRadius;
29 }
30
31 Standard_Real StepGeom_SphericalSurface::Radius() const
32 {
33         return radius;
34 }