<> <> <> <> DIRECTORY NodeStyle USING [PathType, Ref]; TAStyle: CEDAR DEFINITIONS = { PenStyle: TYPE = {Round, Square, Rectangular, Italic, Elliptical}; ShadowType: TYPE = {Drop, Offset, None}; ShadowDirection: TYPE = {UpLeft, UpRight, DownLeft, DownRight}; CaptionFormatting: TYPE = {FlushLeft, FlushRight, Centered}; CaptionAlignment: TYPE = {FlushTop, FlushBottom, Baseline, Centered}; GetLineWeight: PUBLIC PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetPenStyle: PROCEDURE[s: NodeStyle.Ref] RETURNS[PenStyle]; <> GetPenSlant: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetPenWidth: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetPenHeight: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetShadowType: PROCEDURE[s: NodeStyle.Ref] RETURNS[ShadowType]; <> GetShadowDirection: PROCEDURE[s: NodeStyle.Ref] RETURNS[ShadowDirection]; <> GetShadowAngle: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetShadowWeight: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetShadowOffsetAmount: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetShadowPathType: PROCEDURE[s: NodeStyle.Ref] RETURNS[NodeStyle.PathType]; <> GetShadowAreaHue: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetShadowAreaSaturation: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetShadowAreaBrightness: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetShadowOutlineHue: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetShadowOutlineSaturation: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetShadowOutlineBrightness: PROCEDURE[s: NodeStyle.Ref] RETURNS[REAL]; <> GetCaptionFormatting: PROCEDURE[s: NodeStyle.Ref] RETURNS[CaptionFormatting]; <> GetCaptionAlignment: PROCEDURE[s: NodeStyle.Ref] RETURNS[CaptionAlignment]; <> }. Rick Beach, November 26, 1982, add caption styles