lean4-htt/old_tests/tests/lean/run/1739.lean
2018-04-10 12:56:55 -07:00

7 lines
136 B
Text

inductive type
| bool : type
| fn : list type → type → type
def f : type → nat
| (type.bool) := 0
| (type.fn args rt) := 1