mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-06-10 08:08:36 +08:00
d5f74e42d6
License statement text corrected; compiler warnings caused by Bison 2.41 disabled for MSVC; a few other compiler warnings on 54-bit Windows eliminated by appropriate type cast Wrong license statements corrected in several files. Copyright and license statements added in XSD and GLSL files. Copyright year updated in some files. Obsolete documentation files removed from DrawResources.
110 lines
3.7 KiB
Plaintext
110 lines
3.7 KiB
Plaintext
-- Created on: 1994-07-22
|
|
-- Created by: Remi LEQUETTE
|
|
-- 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.
|
|
|
|
class FindSurface from BRepLib
|
|
|
|
---Purpose: Provides an algorithm to find a Surface through a
|
|
-- set of edges.
|
|
--
|
|
-- The edges of the shape given as argument are
|
|
-- explored if they are not coplanar at the required
|
|
-- tolerance the method Found returns false.
|
|
--
|
|
-- If a null tolerance is given the max of the edges
|
|
-- tolerances is used.
|
|
--
|
|
-- The method Tolerance returns the true distance of
|
|
-- the edges to the Surface.
|
|
--
|
|
-- The method Surface returns the Surface if found.
|
|
--
|
|
-- The method Existed returns returns True if the
|
|
-- Surface was already attached to some of the edges.
|
|
--
|
|
-- When Existed returns True the Surface may have a
|
|
-- location given by the Location method.
|
|
|
|
uses
|
|
|
|
Shape from TopoDS,
|
|
Location from TopLoc,
|
|
Surface from Geom
|
|
|
|
raises
|
|
|
|
NoSuchObject from Standard
|
|
|
|
is
|
|
|
|
Create returns FindSurface from BRepLib;
|
|
|
|
Create (S : Shape from TopoDS;
|
|
Tol : Real from Standard = -1;
|
|
OnlyPlane : Boolean from Standard = Standard_False;
|
|
OnlyClosed: Boolean from Standard = Standard_False)
|
|
---Purpose: Computes the Surface from the edges of <S> with the
|
|
-- given tolerance.
|
|
-- if <OnlyPlane> is true, the computed surface will be
|
|
-- a plane. If it is not possible to find a plane, the
|
|
-- flag NotDone will be set.
|
|
-- If <OnlyClosed> is true, then S sould be a wire
|
|
-- and the existing surface, on which wire S is not
|
|
-- closed in 2D, will be ignored.
|
|
returns FindSurface from BRepLib;
|
|
|
|
Init (me : in out;
|
|
S : Shape from TopoDS;
|
|
Tol : Real from Standard = -1;
|
|
OnlyPlane : Boolean from Standard = Standard_False;
|
|
OnlyClosed: Boolean from Standard = Standard_False)
|
|
---Purpose: Computes the Surface from the edges of <S> with the
|
|
-- given tolerance.
|
|
-- if <OnlyPlane> is true, the computed surface will be
|
|
-- a plane. If it is not possible to find a plane, the
|
|
-- flag NotDone will be set.
|
|
-- If <OnlyClosed> is true, then S sould be a wire
|
|
-- and the existing surface, on which wire S is not
|
|
-- closed in 2D, will be ignored.
|
|
is static;
|
|
|
|
Found(me) returns Boolean
|
|
is static;
|
|
|
|
Surface(me) returns mutable Surface from Geom
|
|
is static;
|
|
|
|
Tolerance(me) returns Real
|
|
is static;
|
|
|
|
ToleranceReached(me) returns Real
|
|
is static;
|
|
|
|
Existed(me) returns Boolean
|
|
is static;
|
|
|
|
Location(me) returns Location from TopLoc
|
|
is static;
|
|
|
|
fields
|
|
|
|
mySurface : Surface from Geom;
|
|
myTolerance : Real;
|
|
myTolReached : Real;
|
|
isExisted : Boolean;
|
|
myLocation : Location from TopLoc;
|
|
|
|
end FindSurface;
|