<> <> <> DIRECTORY Histograms, IO, Rope, ViewerClasses; HistogramsViewingExtras: CEDAR DEFINITIONS = {OPEN Histograms; Viewer: TYPE ~ ViewerClasses.Viewer; ViewerWriteToFile: PROC [v: Viewer, fileName: ROPE, create, show, data: BOOL _ TRUE]; ViewerWriteToRope: PROC [v: Viewer, create, show, data: BOOL _ TRUE] RETURNS [ROPE]; }.