File: PredefSweeps.mesa
Last edited by Eric Bier on September 14, 1986 3:30:48 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
PredefSweeps: CEDAR 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;
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.