MODULE proc_test; PROCEDURE Calc () : CARDINAL; BEGIN RETURN 2; END Calc; BEGIN END proc_test.