blob: d943378876461178026e3fbac2405c16d90c07de (
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
|
--
-- File : BoundedSurface.cdl
-- Created : Sat 9 Jan 1993
-- Author : CKY / Contract Toubro-Larsen (Kiran)
--
---Copyright : MATRA-DATAVISION 1993
--
class BoundedSurface from IGESGeom inherits IGESEntity
---Purpose: defines BoundedSurface, Type <143> Form <0>
-- in package IGESGeom
-- A bounded surface is used to communicate trimmed
-- surfaces. The surface and trimming curves are assumed
-- to be represented parametrically.
uses
Boundary from IGESGeom,
HArray1OfBoundary from IGESGeom
raises OutOfRange
is
Create returns mutable BoundedSurface;
-- Specific Methods pertaining to the class
Init (me : mutable;
aType : Integer;
aSurface : IGESEntity;
allBounds : HArray1OfBoundary);
---Purpose : This method is used to set the fields of the class
-- BoundedSurface
-- - aType : Type of bounded surface representation
-- - aSurface : Surface entity to be bounded
-- - allBounds : Array of boundary entities
RepresentationType (me) returns Integer;
---Purpose : returns the type of Bounded surface representation
-- 0 = The boundary entities may only reference model space curves
-- 1 = The boundary entities may reference both model space curves
-- and associated parameter space curve representations
Surface (me) returns IGESEntity;
---Purpose : returns the bounded surface
NbBoundaries (me) returns Integer;
---Purpose : returns the number of boundaries
Boundary (me; Index : Integer) returns Boundary
raises OutOfRange;
---Purpose : returns boundary entity
-- raises exception if Index <= 0 or Index > NbBoundaries()
fields
--
-- Class : IGESGeom_BoundedSurface
--
-- Purpose : Declaration of variables specific to the definition
-- of the Class BoundedSurface.
--
-- Reminder : A BoundedSurface instance is defined by :
-- The type of bounded surface representation, the surface
-- entity bounded and a collection of boundary entities
theType : Integer;
theSurface : IGESEntity;
theBoundaries : HArray1OfBoundary;
end BoundedSurface;
|