src/StepGeom/StepGeom_CylindricalSurface.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_CylindricalSurface.ixx>
  15
  16
  17 StepGeom_CylindricalSurface::StepGeom_CylindricalSurface ()  {}
  18
  19 void StepGeom_CylindricalSurface::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_CylindricalSurface::Init(
  28         const Handle(TCollection_HAsciiString)& aName,
  29         const Handle(StepGeom_Axis2Placement3d)& aPosition,
  30         const Standard_Real aRadius)
  31 {
  32         // --- classe own fields ---
  33         radius = aRadius;
  34         // --- classe inherited fields ---
  35         StepGeom_ElementarySurface::Init(aName, aPosition);
  36 }
  37
  38
  39 void StepGeom_CylindricalSurface::SetRadius(const Standard_Real aRadius)
  40 {
  41         radius = aRadius;
  42 }
  43
  44 Standard_Real StepGeom_CylindricalSurface::Radius() const
  45 {
  46         return radius;
  47 }