ExamplePrimitives.Rose
Last Edited by: Spreitzer, March 19, 1983 12:18 pm
PassBlock: CELL [input < INT[4], gate < INT, output> INT[4]]
Eval
IF gate THEN output ← input;
ENDCELL;
InvertBlock: CELL [input< INT[4], output> INT[4]]
Eval
output ← IntNot[4, input];
ENDCELL