DIRECTORY Hist, Rope, ViewerClasses; TRCViewer: CEDAR DEFINITIONS = BEGIN FeedBackMode: TYPE = {density, reflectance}; ConnectMode: TYPE = {linear, log}; EnumerateProc: TYPE = PROC [x, y:REAL, pinned:BOOLEAN] ; ChangeProc: TYPE = PROC [clientData: REF ANY _ NIL] ; Enumerate: PROC [v: ViewerClasses.Viewer, proc: EnumerateProc, first,last:NAT] ; RegisterChangeProc: PUBLIC PROC [v: ViewerClasses.Viewer, changeProc: ChangeProc, clientData: REF ANY _ NIL] ; Create: PUBLIC PROC [] RETURNS [ViewerClasses.Viewer] ; Get: PUBLIC PROC [v: ViewerClasses.Viewer] RETURNS [Hist.TRCVec]; Set: PUBLIC PROC [v: ViewerClasses.Viewer, trc: Hist.TRCVec, paint:BOOLEAN _ TRUE] ; SetHistogram: PUBLIC PROC [v: ViewerClasses.Viewer, histo: Hist.Histogram _ NIL] ; PinVertex: PUBLIC PROC [v: ViewerClasses.Viewer, in, out: NAT] ; SetTitle: PUBLIC PROC [v: ViewerClasses.Viewer, rope: Rope.ROPE] ; UnpinVertex: PUBLIC PROC [v: ViewerClasses.Viewer, in: NAT] ; SetMaxDensityIn: PUBLIC PROC [v: ViewerClasses.Viewer, maxD:REAL] ; SetMaxDensityOut: PUBLIC PROC [v: ViewerClasses.Viewer, maxD:REAL] ; SetMinReflectanceIn: PUBLIC PROC [v: ViewerClasses.Viewer, minR:REAL] ; SetMinReflectanceOut: PUBLIC PROC [v: ViewerClasses.Viewer, minR:REAL] ; SetFeedBackModes: PUBLIC PROC [v: ViewerClasses.Viewer, in,out: FeedBackMode] ; SetConnectMode: PUBLIC PROC [v: ViewerClasses.Viewer, mode: ConnectMode] ; DensToRef: PUBLIC PROC [density:REAL] RETURNS [reflectance:REAL] ; RefToDens: PUBLIC PROC [reflectance:REAL] RETURNS [density:REAL] ; END. πTRCViewer.mesa Mik Lamming - October 25, 1984 3:15:16 pm PDT Last edited by: Mik Lamming - January 28, 1986 5:19:17 pm PST -- Calls the client enumerate proc for each input value in the range [lb..ub] supplying the -- current corresponding output value. -- register a procedure to be called each time TRC is edited -- Creates a new TRC edit viewer and initial trc. -- Get the trc structure -- Set the trc structure -- Set the histogram backdrop -- Set a single vertex -- set the title displayed below the axes -- Delete a single vertex -- Set maximum density to be displayed during feedback -- Set maximum refectance to be displayed during feedback -- Say whether density or reflectance data is to be shown -- Say how to connect vertices Κ:˜J™™-Icode™=—J™JšΟk œ˜$J˜šΟn ˜$J˜Jšœœ˜,Jšœ œ˜"J˜Jš ž œœœœ œ˜8Jš ž œœœœœœ˜5J˜Jšž œœ;œ˜PJ™[J™&J™Jš žœœœ?œœœ˜nJ™