lean2/tests/lean/tst13.lean
Leonardo de Moura 048151487e feat(kernel): use Pi as forall/implication
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-01-08 00:38:39 -08:00

8 lines
267 B
Text

print fun x : Bool, (fun x : Bool, x).
print let x := true,
y := true
in (let z := x /\ y,
f := (fun x y : Bool, x /\ y =
y /\ x =
x \/ y \/ y)
in (f x y) \/ z)