PROC P () INT x: BYTE b: x := b :