mirror of
https://git.salome-platform.org/gitpub/modules/geom.git
synced 2025-01-31 22:50:33 +05:00
29 lines
540 B
Plaintext
29 lines
540 B
Plaintext
|
-- File: BlockFix_UnionEdges.cdl
|
||
|
|
-- Created: Tue Dec 7 15:24:51 2004
|
||
|
|
-- Author: Sergey KUUL
|
||
|
|
-- <skl@novgorox.nnov.matra-dtv.fr>
|
||
|
|
|
||
|
|
class UnionEdges from BlockFix
|
||
|
|
|
||
|
|
---Purpose:
|
||
|
|
|
||
|
|
uses
|
||
|
|
|
||
|
|
Shape from TopoDS,
|
||
|
|
ReShape from ShapeBuild
|
||
|
|
|
||
|
|
is
|
||
|
|
|
||
|
|
Create returns UnionEdges from BlockFix;
|
||
|
|
|
||
|
|
Perform(me: in out; Shape: Shape from TopoDS;
|
||
|
|
Tol : Real)
|
||
|
|
returns Shape from TopoDS;
|
||
|
|
|
||
|
|
fields
|
||
|
|
|
||
|
|
myTolerance : Real;
|
||
|
|
myContext : ReShape from ShapeBuild;
|
||
|
|
|
||
|
|
end UnionEdges;
|