DIRECTORY ViewerClasses USING [Viewer, ViewerRec]; CIETriangle: CEDAR DEFINITIONS = BEGIN Viewer: TYPE = ViewerClasses.Viewer; -- Just a viewer CIETriangleProc: TYPE = PROCEDURE[self: Viewer, x,y: REAL]; Create: PUBLIC PROCEDURE [info: ViewerClasses.ViewerRec _ [], xr,yr,xg,yg,xb,yb,xw,yw, scale: REAL, proc: CIETriangleProc] RETURNS [cieTriangle: Viewer]; Reinitialize: PUBLIC PROCEDURE [cieTriangle: Viewer, xr,yr,xg,yg,xb,yb,xw,yw: REAL]; GetContents: PUBLIC PROCEDURE [cieTriangle: Viewer] RETURNS [x,y: REAL]; SetContents: PUBLIC PROCEDURE [cieTriangle: Viewer, x,y: REAL]; END. vCIETriangle.mesa Written by Maureen Stone on August 31, 1983 10:57 am reinitializes the phosphor chromaticities Ęë˜Jšœ™Jšœ4™4šĎk ˜ Jšœœ˜(J˜—Jšœ œ˜!J˜Jš˜J˜JšœœĎc˜6JšĎnœœ œœ˜;Jš Ÿœœ œFœœ˜™šŸ œœ œ0œ˜TJšœ)™)—Jš Ÿ œœ œœœ˜HJšŸ œœ œœ˜?Jšœ˜J˜—…—Pą