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
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
-- File: Contap_SurfaceTool.cdl
-- Created: Wed May 12 09:11:00 1993
-- Author: Jacques GOUSSARD
-- <jag@topsn2>
---Copyright: Matra Datavision 1993
deferred generic class SurfaceTool from Contap
(TheSurface as any)
---Purpose: Template class for a tool on a surface.
-- It is possible to implement this class with an
-- instantiation of the Surface2Tool from Adaptor3d.
uses SurfaceType from GeomAbs,
Pln from gp,
Sphere from gp,
Cylinder from gp,
Cone from gp,
Pnt from gp,
Vec from gp
is
GetType(myclass; S: TheSurface)
returns SurfaceType from GeomAbs;
Plane(myclass; S: TheSurface)
---Purpose: Returns the plane from gp when GetType returns
-- GeomAbs_Plane.
returns Pln from gp;
Cylinder(myclass; S: TheSurface)
---Purpose: Returns the cylinder from gp when GetType returns
-- GeomAbs_Cylinder.
returns Cylinder from gp;
Sphere(myclass; S: TheSurface)
---Purpose: Returns the sphere from gp when GetType returns
-- GeomAbs_Sphere.
returns Sphere from gp;
Cone(myclass; S: TheSurface)
---Purpose: Returns the cone from gp when GetType returns
-- GeomAbs_Cone.
returns Cone from gp;
UIntervalFirst(myclass ; S: TheSurface)
---Purpose: Returns the first U parameter of the surface.
returns Real from Standard;
VIntervalFirst(myclass ; S: TheSurface)
---Purpose: Returns the first V parameter of the surface.
returns Real from Standard;
UIntervalLast(myclass ; S: TheSurface)
---Purpose: Returns the last U parameter of the surface.
returns Real from Standard;
VIntervalLast(myclass ; S: TheSurface)
---Purpose: Returns the last V parameter of the surface.
returns Real from Standard;
Value (myclass ; S: TheSurface;
U,V : Real from Standard)
---Purpose: Returns the point of parameter (U,V) on the surface.
returns Pnt from gp;
D1(myclass; S: TheSurface; U,V: Real from Standard;
P: out Pnt from gp; D1U,D1V: out Vec from gp);
---Purpose: Returns the point of parameter (U,V) on the surface,
-- and the first derivatives in the directions u and v.
D2(myclass; S: TheSurface; U,V: Real from Standard; P: out Pnt from gp;
D1U,D1V,D2U,D2V,D2UV: out Vec from gp);
---Purpose: Returns the point of parameter (U,V) on the surface,
-- and the first and the second derivatives in the
-- directions u and v.
UResolution(myclass; S : TheSurface; Tol3d: Real from Standard)
---Purpose: Returns the numerical resolution in the U direction,
-- for a given resolution in 3d space.
returns Real from Standard;
VResolution(myclass; S : TheSurface; Tol3d: Real from Standard)
---Purpose: Returns the numerical resolution in the V direction,
-- for a given resolution in 3d space.
returns Real from Standard;
end SurfaceTool;
|
