#include "std.alpha"
type rec: [character: x; integer: y]

type T2: rec -> integer

type main: string -> integer
function entry: main
                (*
function bar: T2

bar (r,s) := {
    return 0;
}

                *)
entry (arg) := {
 	[ Boolean:x ; Boolean:y ; Boolean:z ; Boolean:t; integer: c]
        x := false;
        y := false;
        if ( (x | y) | !( y = x ) ) then {

                (*
                 if ( x<y & !(x=y) ) then {
                        t := 8;
                } else {
                }
                *)

                z := 1 < 2;
                c := printBoolean(z);
        } else {
                y := false; (* bar('c', 7); *)
                c := printBoolean(y);
        }
	return 0;
}