<> <> <> <> <<>> DIRECTORY Icons USING [IconFlavor], Rope USING [ROPE], SampleArrays USING [SampleArray]; SampleArrayIcons: CEDAR DEFINITIONS = BEGIN IconFlavor: TYPE ~ Icons.IconFlavor; ROPE: TYPE ~ Rope.ROPE; NewIcon: PROC [sa: SampleArrays.SampleArray, layer: NAT _ 0] RETURNS [newFlavor: IconFlavor]; NewIconFromFilename: PROC [file: ROPE] RETURNS [newFlavor: IconFlavor]; END.