-- Created on: 1993-04-21
-- Created by: Bruno DUMORTIER
-- Copyright (c) 1993-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.
class SurfaceOfRevolution from Adaptor3d inherits Surface from Adaptor3d
--- Purpose : This class defines a complete surface of revolution.
-- The surface is obtained by rotating a curve a complete revolution
-- about an axis. The curve and the axis must be in the same plane.
-- If the curve and the axis are not in the same plane it is always
-- possible to be in the previous case after a cylindrical projection
-- of the curve in a referenced plane.
-- For a complete surface of revolution the parametric range is
-- 0 <= U <= 2*PI. --
-- The parametric range for V is defined with the revolved curve.
-- The origin of the U parametrization is given by the position
-- of the revolved curve (reference). The direction of the revolution
-- axis defines the positive sense of rotation (trigonometric sense)
-- corresponding to the increasing of the parametric value U.
-- The derivatives are always defined for the u direction.
-- For the v direction the definition of the derivatives depends on
-- the degree of continuity of the referenced curve.
uses
Array1OfReal from TColStd,
Shape from GeomAbs,
SurfaceType from GeomAbs,
Vec from gp,
Pnt from gp,
Pln from gp,
Cone from gp,
Cylinder from gp,
Sphere from gp,
Torus from gp,
Ax3 from gp,
Ax1 from gp,
Dir from gp,
BezierSurface from Geom,
BSplineSurface from Geom,
HSurface from Adaptor3d,
HCurve from Adaptor3d
raises
OutOfRange from Standard,
NoSuchObject from Standard,
DomainError from Standard
is
--
-- Methods specific of SurfaceOfRevolution.
--
Create returns SurfaceOfRevolution from Adaptor3d;
Create(C : HCurve from Adaptor3d) returns SurfaceOfRevolution from Adaptor3d;
---Purpose: The Curve is loaded.
Create(C : HCurve from Adaptor3d; V : Ax1 from gp)
returns SurfaceOfRevolution from Adaptor3d;
---Purpose: The Curve and the Direction are loaded.
Load( me : in out ; C : HCurve from Adaptor3d)
---Purpose: Changes the Curve
is static;
Load( me : in out ; V : Ax1 from gp)
---Purpose: Changes the Direction
is static;
AxeOfRevolution( me) returns Ax1 from gp
is redefined static;
--
-- Implementation of Surface from Adaptor3d methods.
--
--
-- Global methods - Apply to the whole surface.
--
FirstUParameter(me) returns Real
is redefined static;
LastUParameter(me) returns Real
is redefined static;
FirstVParameter(me) returns Real
is redefined static;
LastVParameter(me) returns Real
is redefined static;
UContinuity(me) returns Shape from GeomAbs
is redefined static;
VContinuity(me) returns Shape from GeomAbs
---Purpose: Return CN.
is redefined static;
NbUIntervals(me; S : Shape from GeomAbs) returns Integer
---Purpose: Returns the number of U intervals for continuity
-- ~~. May be one if UContinuity(me) >= ~~~~
is redefined static;
NbVIntervals(me; S : Shape from GeomAbs) returns Integer
---Purpose: Returns the number of V intervals for continuity
-- ~~~~. May be one if VContinuity(me) >= ~~~~
is redefined static;
UIntervals(me; T : in out Array1OfReal from TColStd;
S : Shape from GeomAbs )
---Purpose: Returns the intervals with the requested continuity
-- in the U direction.
raises
OutOfRange from Standard -- if the Length of the array does
-- have enought slots to accomodate
-- the result.
is redefined static ;
VIntervals(me; T : in out Array1OfReal from TColStd;
S : Shape from GeomAbs )
---Purpose: Returns the intervals with the requested continuity
-- in the V direction.
raises
OutOfRange from Standard -- if the Length of the array does
-- have enought slots to accomodate
-- the result.
is redefined static ;
UTrim(me; First, Last, Tol : Real) returns HSurface from Adaptor3d
---Purpose: Returns a surface trimmed in the U direction
-- equivalent of between
-- parameters and . is used to
-- test for 3d points confusion.
raises
OutOfRange from Standard
---Purpose: If >=
is redefined static ;
VTrim(me; First, Last, Tol : Real) returns HSurface from Adaptor3d
---Purpose: Returns a surface trimmed in the V direction between
-- parameters and . is used to
-- test for 3d points confusion.
raises
OutOfRange from Standard
---Purpose: If >=
is redefined static ;
IsUClosed(me) returns Boolean
is redefined static;
IsVClosed(me) returns Boolean
is redefined static;
IsUPeriodic(me) returns Boolean
is redefined static;
UPeriod(me) returns Real
raises
DomainError from Standard -- if the curve is not periodic
is redefined static;
IsVPeriodic(me) returns Boolean
is redefined static;
VPeriod(me) returns Real
raises
DomainError from Standard -- if the curve is not periodic
is redefined static;
Value (me; U, V : Real) returns Pnt from gp
--- Purpose : Computes the point of parameters U,V on the surface.
is redefined static;
D0 (me; U, V : Real; P : out Pnt from gp)
--- Purpose : Computes the point of parameters U,V on the surface.
is redefined static;
D1 (me; U, V : Real; P : out Pnt from gp; D1U, D1V : out Vec from gp)
--- Purpose : Computes the point and the first derivatives on
-- the surface.
raises DomainError from Standard
--- Purpose : Raised if the continuity of the current
-- intervals is not C1.
is redefined static;
D2 (me; U, V : Real;
P : out Pnt from gp;
D1U, D1V, D2U, D2V, D2UV : out Vec from gp)
--- Purpose : Computes the point, the first and second
-- derivatives on the surface.
raises DomainError from Standard
--- Purpose : Raised if the continuity of the current
-- intervals is not C2.
is redefined static;
D3 (me; U, V : Real;
P : out Pnt from gp;
D1U, D1V, D2U, D2V, D2UV, D3U, D3V, D3UUV, D3UVV : out Vec from gp)
--- Purpose : Computes the point, the first, second and third
-- derivatives on the surface.
raises DomainError from Standard
--- Purpose : Raised if the continuity of the current
-- intervals is not C3.
is redefined static;
DN (me; U, V : Real; Nu, Nv : Integer) returns Vec from gp
--- Purpose : Computes the derivative of order Nu
-- in the direction U and Nv in the direction V
-- at the point P(U, V).
raises DomainError from Standard,
--- Purpose : Raised if the current U interval is not not CNu
-- and the current V interval is not CNv.
OutOfRange from Standard
--- Purpose : Raised if Nu + Nv < 1 or Nu < 0 or Nv < 0.
is redefined static;
UResolution(me; R3d : Real ) returns Real
---Purpose : Returns the parametric U resolution corresponding
-- to the real space resolution .
is redefined static;
VResolution(me; R3d : Real ) returns Real
---Purpose : Returns the parametric V resolution corresponding
-- to the real space resolution .
is redefined static;
GetType(me) returns SurfaceType from GeomAbs
---Purpose: Returns the type of the surface : Plane, Cylinder,
-- Cone, Sphere, Torus, BezierSurface,
-- BSplineSurface, SurfaceOfRevolution,
-- SurfaceOfExtrusion, OtherSurface
is redefined static;
--
-- The following methods must be called when GetType returned
-- the corresponding type.
--
Plane(me) returns Pln from gp
raises NoSuchObject from Standard
is redefined static;
Cylinder(me) returns Cylinder from gp
raises NoSuchObject from Standard
is redefined static;
Cone(me) returns Cone from gp
raises NoSuchObject from Standard
---Purpose : Apex of the Cone = Cone.Position().Location()
-- ==> ReferenceRadius = 0.
is redefined static;
Sphere(me) returns Sphere from gp
raises NoSuchObject from Standard
is redefined static;
Torus(me) returns Torus from gp
raises NoSuchObject from Standard
is redefined static;
UDegree(me) returns Integer
raises NoSuchObject from Standard
is redefined static;
NbUPoles(me) returns Integer
raises NoSuchObject from Standard
is redefined static;
VDegree(me) returns Integer
raises NoSuchObject from Standard
is redefined static;
NbVPoles(me) returns Integer
raises NoSuchObject from Standard
is redefined static;
NbUKnots(me) returns Integer
raises
NoSuchObject from Standard
is redefined static;
NbVKnots(me) returns Integer
raises
NoSuchObject from Standard
is redefined static;
IsURational(me) returns Boolean
raises
NoSuchObject from Standard
is redefined static;
IsVRational(me) returns Boolean
raises
NoSuchObject from Standard
is redefined static;
Bezier(me) returns BezierSurface from Geom
raises
NoSuchObject from Standard
is redefined static;
BSpline(me) returns BSplineSurface from Geom
raises
NoSuchObject from Standard
is redefined static;
Axis(me) returns Ax3 from gp
raises
NoSuchObject from Standard -- only for SurfaceOfRevolution
is static;
Direction(me) returns Dir from gp
raises
NoSuchObject from Standard -- only for SurfaceOfExtrusion
is redefined static;
BasisCurve(me) returns HCurve from Adaptor3d
raises
NoSuchObject from Standard
-- Only for SurfaceOfExtrusion and SurfaceOfRevolution
is redefined static;
fields
myBasisCurve : HCurve from Adaptor3d;
myAxis : Ax1 from gp;
myHaveAxis : Boolean from Standard;
myAxeRev : Ax3 from gp;
end SurfaceOfRevolution;
~~