File: PredefSweeps.mesa
Last edited by Eric Bier on June 26, 1984 10:30:59 am PDT
Contents: A cube, a cylinder, a cone, a sphere and a torus are created at load time and made available through this interface
PredefSweeps: DEFINITIONS =
BEGIN
RevoluteMesh: TYPE = REF RevoluteMeshRecord;
RevoluteMeshRecord: TYPE = SweepGeometry.RevoluteMeshRecord;
LinearMesh: TYPE = REF LinearMeshRecord;
LinearMeshRecord: TYPE = SweepGeometry.LinearMeshRecord;
ToroidalMesh: TYPE = REF ToroidalMeshRecord;
ToroidalMeshRecord: TYPE = SweepGeometry.ToroidalMeshRecord;
GetUnitSphere: PROC RETURNS [RevoluteMesh];
GetUnitCube: PROC RETURNS [LinearMesh];
GetUnitCylinder: PROC RETURNS [RevoluteMesh];
GetUnitCone: PROC RETURNS [RevoluteMesh];
CreateTorus: PROC [rBig, rCross: REAL] RETURNS [ToroidalMesh];
END.