blob: a050890a5b40386c4cddc562db0541950ee1a63c (
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
|
-- File: PcurveOrSurface.cdl
-- Created: Fri Dec 1 11:11:11 1995
-- Author: EXPRESS->CDL V0.2 Translator
-- Copyright: Matra-Datavision 1993
class PcurveOrSurface from StepGeom inherits SelectType from StepData
-- <PcurveOrSurface> is an EXPRESS Select Type construct translation.
-- it gathers : Pcurve, Surface
uses
Pcurve,
Surface
is
Create returns PcurveOrSurface;
---Purpose : Returns a PcurveOrSurface SelectType
CaseNum (me; ent : Transient) returns Integer;
---Purpose: Recognizes a PcurveOrSurface Kind Entity that is :
-- 1 -> Pcurve
-- 2 -> Surface
-- 0 else
Pcurve (me) returns any Pcurve;
---Purpose : returns Value as a Pcurve (Null if another type)
Surface (me) returns any Surface;
---Purpose : returns Value as a Surface (Null if another type)
end PcurveOrSurface;
|