SVMasterObjectTypes.mesa
Copyright © 1986 by Xerox Corporation. All rights reserved.
Last edited by Bier on March 29, 1987
Contents: Types that are shared by SVMasterObject and SVObject modules.
SVMasterObjectTypes: CEDAR DEFINITIONS =
BEGIN
Edge3d: TYPE = SV3d.Edge3d;
SphereRec: TYPE = REF SphereRecObj;
SphereRecObj:
TYPE =
RECORD [
radius: REAL];
Box3d:
TYPE =
RECORD [
loX, loY, loZ, hiX, hiY, hiZ: REAL
];
BlockData: TYPE = REF BlockDataObj;
BlockDataObj:
TYPE =
RECORD [
box: Box3d,
segments: ARRAY [0..12) OF Segment];
CylinderRec: TYPE = REF CylinderRecObj;
CylinderRecObj:
TYPE =
RECORD [
radius, height: REAL];
ConeRec: TYPE = REF ConeRecObj;
ConeRecObj:
TYPE =
RECORD [
radius, height: REAL];
TorusRec: TYPE = REF TorusRecObj;
TorusRecObj:
TYPE =
RECORD [
bigRadius: REAL,
sectionRadius: REAL];
Segment: TYPE = REF SegmentObj;
SegmentObj:
TYPE =
RECORD [
edge: Edge3d
];
END.