1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-10 18:51:21 +03:00
occt/src/ShapeCustom/ShapeCustom_TrsfModification.cdl
abv 6e33d3ced2 0024830: Remove redundant keyword 'mutable' in CDL declarations
Redundant keyword 'mutable' removed in CDL files.
In IGESConvGeom_GeomBuilder, unused methods MakeXY() and MakeXYZ() removed.
Method StepAP214_AutoDesignGroupAssignment::Init() replicating same method of the base class is removed as it causes CDL extraction error after above (seemingly irrelevant) changes.
2014-05-29 14:58:25 +04:00

92 lines
3.6 KiB
Plaintext

-- Created on: 1999-03-09
-- Created by: Roman LYGIN
-- Copyright (c) 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.
private class TrsfModification from ShapeCustom inherits TrsfModification from BRepTools
---Purpose: Complements BRepTools_TrsfModification to provide reversible
-- scaling regarding tolerances.
-- Uses actual tolerances (attached to the shapes) not ones
-- returned by BRep_Tool::Tolerance to work with tolerances
-- lower than Precision::Confusion.
uses
Face from TopoDS,
Edge from TopoDS,
Vertex from TopoDS,
Location from TopLoc,
Shape from GeomAbs,
Surface from Geom,
Curve from Geom,
Curve from Geom2d,
Trsf from gp,
Pnt from gp
is
Create (T: Trsf from gp) returns TrsfModification from ShapeCustom;
---Purpose: Empty constructor
NewSurface (me: mutable; F : Face from TopoDS;
S : out Surface from Geom;
L : out Location from TopLoc;
Tol : out Real from Standard;
RevWires: out Boolean from Standard;
RevFace : out Boolean from Standard)
returns Boolean from Standard;
---Purpose: Calls inherited method.
-- Sets <Tol> as actual tolerance of <F> multiplied with scale
-- factor.
NewCurve (me: mutable; E : Edge from TopoDS;
C : out Curve from Geom;
L : out Location from TopLoc;
Tol: out Real from Standard)
returns Boolean from Standard;
---Purpose: Calls inherited method.
-- Sets <Tol> as actual tolerance of <E> multiplied with scale
-- factor.
NewPoint (me: mutable; V : Vertex from TopoDS;
P : out Pnt from gp;
Tol: out Real from Standard)
returns Boolean from Standard;
---Purpose: Calls inherited method.
-- Sets <Tol> as actual tolerance of <V> multiplied with scale
-- factor.
NewCurve2d (me: mutable; E : Edge from TopoDS;
F : Face from TopoDS;
NewE : Edge from TopoDS;
NewF : Face from TopoDS;
C : out Curve from Geom2d;
Tol : out Real from Standard)
returns Boolean from Standard;
---Purpose: Calls inherited method.
-- Sets <Tol> as actual tolerance of <E> multiplied with scale
-- factor.
NewParameter (me: mutable; V : Vertex from TopoDS;
E : Edge from TopoDS;
P : out Real from Standard;
Tol: out Real from Standard)
returns Boolean from Standard;
---Purpose: Calls inherited method.
-- Sets <Tol> as actual tolerance of <V> multiplied with scale
-- factor.
end TrsfModification;