PROC foo () INT x: x () :