TubeDisplay.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Bloomenthal, April 29, 1986 6:43:07 pm PDT
DIRECTORY Controls, Draw2d, Rope, TubeDefs;
TubeDisplay: CEDAR DEFINITIONS
~ BEGIN
OPEN TubeDefs;
Mark: TYPE ~ Draw2d.MarkType;
ShowTube: PUBLIC PROC [tube: Tube, context: Context, details: Details, view: Matrix];
Display entire tube according to the details; splines as solid, if selected, or dotted, otherwise.
ShowSkel: PUBLIC PROC [tube: Tube, context: Context, view: Matrix];
Show the entire tube with straight lines.
ShowSplines: PUBLIC PROC [tube: Tube, context: Context, view: Matrix];
Display splines as solid, if selected, or dotted, otherwise.
ShowSplineEnds: PUBLIC PROC [tube: Tube, context: Context, view: Matrix, mark: Mark ← dot];
Display ends of splines with mark.
ShowCircles: PUBLIC PROC [tube: Tube, context: Context, view: Matrix];
Display circles.
ShowLines: PUBLIC PROC [tube: Tube, context: Context, view: Matrix];
Display lines.
ShowFrames: PUBLIC PROC [tube: Tube, context: Context, view: Matrix, label: BOOL];
Display frames.
ShowNormals: PUBLIC PROC [
tube: Tube, context: Context, view: Matrix, label: BOOL];
Display normals to the tube.
ShowCurv: PUBLIC PROC [tube: Tube, context: Context, view: Matrix, label: BOOL];
Display curvature vectors.
ShowVel: PUBLIC PROC [tube: Tube, context: Context, view: Matrix, label: BOOL];
Display tangent vectors.
ShowAcc: PUBLIC PROC [tube: Tube, context: Context, view: Matrix, label: BOOL];
Display acceleration vectors.
NVectors: PUBLIC PROC [tube: Tube, details: Details] RETURNS [NAT];
Count number of vectors to display.
ToggleDetail: PUBLIC PROC [details: Details, toToggle: DetailType, trueName, falseName: Rope.ROPE, outerData: Controls.OuterData];
Toggle the specified detail and relabel its button.
END.