PROGRAM FUNCDEF;
(*# E+ *)
FUNCTION TWO:INTEGER;
BEGIN
TWO:=2;
END;
BEGIN
END.