blob: 1070d7a444d4bb5b210a2591c1c6998e219e7a60 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
|
-- File: ShapeCustom_TrsfModification.cdl
-- Created: Tue Mar 9 13:59:08 1999
-- Author: Roman LYGIN
-- <rln@kinox.nnov.matra-dtv.fr>
---Copyright: Matra Datavision 1999
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 mutable 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;
|
