// Created on: 1994-09-02 // Created by: Frederic MAUPAS // Copyright (c) 1994-1999 Matra Datavision // Copyright (c) 1999-2014 OPEN CASCADE SAS // // This file is part of Open CASCADE Technology software library. // // This library is free software; you can redistribute it and/or modify it under // the terms of the GNU Lesser General Public License version 2.1 as published // by the Free Software Foundation, with special exception defined in the file // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT // distribution for complete text of the license and disclaimer of any warranty. // // Alternatively, this file may be used under the terms of Open CASCADE // commercial license or contractual agreement. Handle(StepGeom_Ellipse) EStep = new StepGeom_Ellipse; StepGeom_Axis2Placement Ax2; Handle(StepGeom_Axis2Placement3d) Ax2Step; Standard_Real majorR, minorR; GeomToStep_MakeAxis2Placement3d MkAxis2(E.Position()); Ax2Step = MkAxis2.Value(); majorR = E.MajorRadius(); minorR = E.MinorRadius(); Ax2.SetValue(Ax2Step); Handle(TCollection_HAsciiString) name = new TCollection_HAsciiString(""); Standard_Real fact = UnitsMethods::LengthFactor(); EStep->Init(name, Ax2,majorR/fact,minorR/fact); theEllipse = EStep; done = Standard_True;