(* can you recover from syntax errors? *)
(* This a fairly easy test *)
(* No procs, no units *)
(* No arrays  -- lots of expressions *)

program no_units;

const f1 = 57;
      f2 := 5 ;
      f3 = 6;
      true = 1;;
      false = 0 ;

var i1, i2, i3: (*unit *)number;
    b1,					(* just for fun *)
    b2,
    b3,

      : number;

begin (* main part of no_units
	test *)

	i1 := 10+1x5*5/4 - (16 - 2);
	i2 := *10;
	i3 := f1 % (i2 * (true - false);
	b1 := true
	b3 := b1 * ;
	
	i1 := i2 + 15 * i3 / 4 - 16 - 2);
	f1 := 6;
	i1 := 7;

end.  (* no_units *)