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
|
-- File: Contap_SurfProps.cdl
-- Created: Fri Feb 24 15:30:15 1995
-- Author: Jacques GOUSSARD
-- <jag@topsn2>
---Copyright: Matra Datavision 1995
generic class SurfProps from Contap
(TheSurface as any;
TheSurfaceTool as any) -- as SurfaceTool from Contap
---Purpose: Internal tool used to compute the normal and its
-- derivatives.
uses Pnt from gp,
Vec from gp
is
Normale(myclass; S: TheSurface; U,V: Real from Standard;
P: out Pnt from gp;
N: out Vec from gp);
---Purpose: Computes the point <P>, and normal vector <N> on
-- <S> at parameters U,V.
DerivAndNorm(myclass; S: TheSurface; U,V: Real from Standard;
P : out Pnt from gp;
d1u,d1v: out Vec from gp;
N : out Vec from gp);
---Purpose: Computes the point <P>, and normal vector <N> on
-- <S> at parameters U,V.
NormAndDn(myclass; S: TheSurface; U,V: Real from Standard;
P : out Pnt from gp;
N,Dnu,Dnv: out Vec from gp);
---Purpose: Computes the point <P>, normal vector <N>, and its
-- derivatives <Dnu> and <Dnv> on <S> at parameters U,V.
end SurfProps;
|
