2014-01-05 11:03:35 -08:00
|
|
|
print fun x : Bool, (fun x : Bool, x).
|
|
|
|
|
print let x := true,
|
2013-08-18 15:23:01 -07:00
|
|
|
y := true
|
|
|
|
|
in (let z := x /\ y,
|
2014-01-08 00:38:39 -08:00
|
|
|
f := (fun x y : Bool, x /\ y =
|
|
|
|
|
y /\ x =
|
2013-08-18 15:23:01 -07:00
|
|
|
x \/ y \/ y)
|
|
|
|
|
in (f x y) \/ z)
|
