DIRECTORY TubeDefs; TubePick: CEDAR DEFINITIONS ~ BEGIN OPEN TubeDefs; LastTubePicked: PUBLIC PROC RETURNS [Tube]; ScreenPick: PUBLIC PROC [tube: Tube, mouse: Mouse, view: Matrix, pick: Pick]; SetPickPoint: PUBLIC PROC [pick: Pick]; SetPickSelected: PUBLIC PROC [pick: Pick]; DivideSpline: PUBLIC PROC [pick: Pick]; NewSplits: PUBLIC PROC [pick: Pick]; ChangeTangent: PUBLIC PROC [pick: Pick, tangent: Triple]; ChangePosition: PUBLIC PROC [pick: Pick, change: Triple]; ChangeRadii: PUBLIC PROC [pick: Pick, r0, r1, scale, epsilon: REAL]; ChangeTension: PUBLIC PROC [pick: Pick, tens0, tens1: REAL]; ChangeTw0: PUBLIC PROC [pick: Pick, tw0, tw0Prev: REAL]; ChangeTw1: PUBLIC PROC [pick: Pick, tw1, tw1Prev: REAL]; NumberSelected: PUBLIC PROC [pick: Pick] RETURNS [INTEGER]; BeforeSelected: PUBLIC PROC [pick: Pick] RETURNS [INTEGER]; AfterSelected: PUBLIC PROC [pick: Pick] RETURNS [INTEGER]; RemakeSelected: PUBLIC PROC [pick: Pick, scale, epsilon: REAL]; END. RTubePick.mesa Copyright c 1985 by Xerox Corporation. All rights reserved. Bloomenthal, November 22, 1986 4:56:48 pm PST Return the tube most recently ScreenPicked. Choose a point or a spline on the screen. Set pick data for point selected. Set pick data for spline(s) selected. Divide a spline at the picked point because the point has been manipulated. Recompute splines to left and right of picked point. Change tangent at picked point. Change position of picked point. Change the radii of the picked tube; remake the affected tubes. Change the tension of the picked tubes. Cnange the twist0 of the picked tube. Cnange the twist1 of the picked tube. Return number of splines currently picked. Return number of splines preceeding the picked splines. Return number of splines following the picked splines. Remake picked tubes. Κ˜šœ ™ Jšœ Οmœ1™