Library ExamplePrimitives; Imports $"IO"; SRHC: LAMBDA [initial: |[0..16)|] RETURN CELLTYPE AutoName PORTS [input< INT[4], clock<, output> INT[4]] InittableState latched: [0..15] _ 0 Initializer latched _ initial Expand temp: INT[4] _v |IO.PutFR["%gD", IO.card[initial]]|; CEDAR --any old Cedar code may appear here --a very dull Cedar statement: -- NULL; ; Pass: PassBlock[input: input, gate: clock, output: temp]; Inv: InvertBlock[input: temp, output: output] EvalSimple IF clock THEN latched _ input; output _ 15 - latched; ENDCELLTYPE âFILE: SRHC.rose, from [Indigo]2.6>Rosemary.DF last changed by Barth, January 4, 1983 10:44 am Last Edited by: Spreitzer, January 25, 1985 2:59:39 pm PST ... even comment nodes, with -'s and --'s as you please ÊÖ˜Jšœ7™7Jšœ/™/J™:J˜J˜Jšœ˜J˜šÐbkœÏkœžœžœ ˜:Jšžœ žœžœ˜-˜J˜—˜J˜—šœ˜Jšœžœžœžœ˜4šž˜Jšœ$˜$J™7IcodešÏc!œžœ˜'—J˜J˜9J˜-—˜ Jšžœžœ˜J˜—Jšž˜——…—Ö