<> <> <> <<>> <> <<>> DIRECTORY Atom; Send: CEDAR PROGRAM IMPORTS Atom EXPORTS ~ BEGIN C: PROC [c: CARD] RETURNS [rc: REF ANY] = {rc _ NEW[CARD _ c]}; Atom.PutProp[$Simul2Sender, $PKList, LIST[ $Init, $StartStop, $Restart, LIST[$ReadMemory, C[01234567H]], LIST[$Wait, C[2]], LIST[$Jump, $Restart] ]]; END.