Last edited by: Mik Lamming - January 28, 1986 5:19:17 pm PST

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] ;

-- Calls the client enumerate proc for each input value in the range [lb..ub] supplying the

-- current corresponding output value.

RegisterChangeProc: PUBLIC PROC [v: ViewerClasses.Viewer, changeProc: ChangeProc, clientData: REF ANY ← NIL] ;

-- register a procedure to be called each time TRC is edited

Create: PUBLIC PROC [] RETURNS [ViewerClasses.Viewer] ;

-- Creates a new TRC edit viewer and initial trc.

Get: PUBLIC PROC [v: ViewerClasses.Viewer] RETURNS [Hist.TRCVec];

-- Get the trc structure

Set: PUBLIC PROC [v: ViewerClasses.Viewer, trc: Hist.TRCVec, paint:BOOLEAN ← TRUE] ;

-- Set the trc structure

SetHistogram: PUBLIC PROC [v: ViewerClasses.Viewer, histo: Hist.Histogram ← NIL] ;

-- Set the histogram backdrop

PinVertex: PUBLIC PROC [v: ViewerClasses.Viewer, in, out: NAT] ;

-- Set a single vertex

SetTitle: PUBLIC PROC [v: ViewerClasses.Viewer, rope: Rope.ROPE] ;

-- set the title displayed below the axes

UnpinVertex: PUBLIC PROC [v: ViewerClasses.Viewer, in: NAT] ;

-- Delete a single vertex

-- Set maximum density to be displayed during feedback

SetMaxDensityIn: PUBLIC PROC [v: ViewerClasses.Viewer, maxD:REAL] ;

SetMaxDensityOut: PUBLIC PROC [v: ViewerClasses.Viewer, maxD:REAL] ;

-- Set maximum refectance to be displayed during feedback

SetMinReflectanceIn: PUBLIC PROC [v: ViewerClasses.Viewer, minR:REAL] ;

SetMinReflectanceOut: PUBLIC PROC [v: ViewerClasses.Viewer, minR:REAL] ;

-- Say whether density or reflectance data is to be shown

SetFeedBackModes: PUBLIC PROC [v: ViewerClasses.Viewer, in,out: FeedBackMode] ;

-- Say how to connect vertices

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.