Integration of OCCT 6.5.0 from SVN

[occt.git] / src / StepGeom / StepGeom_ConicalSurface.cdl

diff --git a/src/StepGeom/StepGeom_ConicalSurface.cdl b/src/StepGeom/StepGeom_ConicalSurface.cdl
new file mode 100755 (executable)
index 0000000..dbc49b2
--- /dev/null
+++ b/src/StepGeom/StepGeom_ConicalSurface.cdl
@@ -0,0 +1,44 @@
+-- File:        ConicalSurface.cdl
+-- Created:     Fri Dec  1 11:11:17 1995
+-- Author:      EXPRESS->CDL V0.2 Translator
+-- Copyright:   Matra-Datavision 1993
+
+
+class ConicalSurface from StepGeom 
+
+inherits ElementarySurface from StepGeom 
+
+uses
+
+       Real from Standard, 
+       HAsciiString from TCollection, 
+       Axis2Placement3d from StepGeom
+is
+
+       Create returns mutable ConicalSurface;
+       ---Purpose: Returns a ConicalSurface
+
+
+       Init (me : mutable;
+             aName : mutable HAsciiString from TCollection;
+             aPosition : mutable Axis2Placement3d from StepGeom) is redefined;
+
+       Init (me : mutable;
+             aName : mutable HAsciiString from TCollection;
+             aPosition : mutable Axis2Placement3d from StepGeom;
+             aRadius : Real from Standard;
+             aSemiAngle : Real from Standard) is virtual;
+
+       -- Specific Methods for Field Data Access --
+
+       SetRadius(me : mutable; aRadius : Real);
+       Radius (me) returns Real;
+       SetSemiAngle(me : mutable; aSemiAngle : Real);
+       SemiAngle (me) returns Real;
+
+fields
+
+       radius : Real from Standard;
+       semiAngle : Real from Standard;
+
+end ConicalSurface;