<> <> <<>> <> DIRECTORY BiScrollers; BiScrollersExtras: CEDAR DEFINITIONS = BEGIN OPEN BiScrollers; ShowBox: PROC [bs: BiScroller, client, viewer: Rect, paint, uniformly: BOOL _ TRUE]; <> ViewerBox: PROC [bs: BiScroller] RETURNS [Rect--the viewer area, in viewer coordinates--]; ClientBox: PROC [bs: BiScroller] RETURNS [Rect--mbb of client data, in client coordinates--]; Fit: PROC [bs: BiScroller, paint, uniformly: BOOL _ TRUE]; <> END.