lean4-htt/tests/lean/run/def7.lean
2016-08-23 21:13:54 -07:00

21 lines
428 B
Text

set_option new_elaborator true
definition f : bool → bool → nat
| _ _ := 10
example : f tt tt = 10 :=
rfl
definition ex1 (a : nat) : nat.succ a = 0 → false
[none]
definition g : bool → bool → bool → nat
| tt _ tt := 1
| _ ff ff := 2
| _ _ _ := 3
example : g tt tt tt = 1 := rfl
example : g tt ff tt = 1 := rfl
example : g tt ff ff = 2 := rfl
example : g ff ff ff = 2 := rfl
example : g ff tt tt = 3 := rfl