File: SVPredefSweeps.mesa
Last edited by Eric Bier on July 22, 1987 4:51:24 pm PDT
Contents: A cube, a cylinder, a cone, a sphere and a torus are created at load time and made available through this interface
DIRECTORY
SVSweepGeometry;
SVPredefSweeps: CEDAR DEFINITIONS =
BEGIN
RevoluteMesh: TYPE = REF RevoluteMeshRecord;
RevoluteMeshRecord: TYPE = SVSweepGeometry.RevoluteMeshRecord;
LinearMesh: TYPE = REF LinearMeshRecord;
LinearMeshRecord: TYPE = SVSweepGeometry.LinearMeshRecord;
ToroidalMesh: TYPE = REF ToroidalMeshRecord;
ToroidalMeshRecord: TYPE = SVSweepGeometry.ToroidalMeshRecord;
SetLinesOfLatitude: PROC [lat: NAT];
SetLinesOfLongitude: PROC [long: NAT];
GetLinesOfLatitude: PROC [] RETURNS [lat: NAT];
GetLinesOfLongitude: PROC [] RETURNS [long: NAT];
GetUnitSphere: PROC RETURNS [RevoluteMesh];
GetUnitCube: PROC RETURNS [LinearMesh];
GetUnitCylinder: PROC RETURNS [RevoluteMesh];
GetUnitCone: PROC RETURNS [RevoluteMesh];
CreateTorus: PROC [rBig, rCross: REAL] RETURNS [ToroidalMesh];
END.