DIRECTORY Controls, Imager, Vector2, ViewerClasses;ControlsPrivate: CEDAR DEFINITIONS~ BEGINOPEN Controls;MaybeForkControlProc: PUBLIC PROC [control: Control];ForkControlProc: PUBLIC PROC [control: Control];ControlProcBusy: PUBLIC PROC [control: Control] RETURNS [BOOL];NewSliderDial: PUBLIC PROC [control: Control];NotifySliderDial: PUBLIC PROC [Control];PaintSliderDial: ViewerClasses.PaintProc;NewFunction: PUBLIC PROC [control: Control];NotifyFunction: PUBLIC PROC [Control];PaintFunction: ViewerClasses.PaintProc;ResetFunction: PUBLIC PROC [control: Control, repaint: BOOL _ TRUE];NewContour: PUBLIC PROC [control: Control];NotifyContour: PUBLIC PROC [Control];PaintContour: ViewerClasses.PaintProc;ClearContour: PUBLIC PROC [control: Control, repaint: BOOL _ TRUE];NewSketch: PUBLIC PROC [control: Control];NotifySketch: PUBLIC PROC [Control];PaintSketch: ViewerClasses.PaintProc;ClearSketch: PUBLIC PROC [control: Control, repaint: BOOL _ TRUE];END.  ¸  ControlsPrivate.mesaCopyright c 1985 by Xerox Corporation.  All rights reserved.Bloomenthal, October 8, 1986 10:48:14 pm PDTMiscellaneousIf control has a non-busy proc, for it.If control has a proc, fork it.Test if control has a busy proc.Sliders/DialsSlider or dial initialization.Called by Controls notify proc if control is a slider or dial.Paint proc if control is a slider or dial.FunctionsFunction initialization.Called by Controls notify proc if control is a function.Paint proc if control is a function.Set the function values to the function minimum and optionally repaint.ContoursContour initialization.Called by Controls notify proc if control is a contour.Paint proc if control is a contour.Clear the contour and optionally repaint.SketchesContour initialization.Called by Controls notify proc if control is a sketch.Paint proc if control is a sketch.Clear the sketcher and optionally repaint. ÊA  ˜ šœ™Jšœ
Ïmœ1™<J™,J˜ JšÏk	œ*˜3J˜ —šÐblœžœž˜"J˜ —Jšœž˜˜ Jšžœ
˜—headšÏl™šÏnœžœ˜5Icode™'L™ —š¡œžœžœ˜0J™J™ —š
¡œžœžœžœžœ˜?J™ ——š ™š¡œžœ˜.J™J™ —šÏbœžœžœ˜(J™>J™ —š¡œ˜)L™*——š 	™	š¡œžœ˜,J™J™ —š¡œžœžœ˜&J™8J™ —š¡œ˜'L™$L™ —š
¡œžœžœžœžœ˜DL™G——š ™šÐbn
œžœ˜+J™J™ —š¡œžœžœ˜%J™7J™ —š¡œ˜&L™#L™ —š
¡œžœžœžœžœ˜CL™)——š ™š£	œžœ˜*J™J™ —š¡œžœžœ˜$J™6J™ —š¡œ˜%L™"L™ —š
¡œžœžœžœžœ˜BL™*L™ ——Jšžœ˜J˜ J˜ — …—    Ú  	Ó  