90a79a0b06
Now, `universe` may declare many universes. The goal is to make it consistent with the `variable` command
9 lines
163 B
Text
9 lines
163 B
Text
|
||
universe u
|
||
|
||
def len {α : Type u} : List α → List α → Nat
|
||
| [], bs => bs.length
|
||
| a::as, bs => len as bs + 1
|
||
|
||
theorem ex1 : len [1, 2] [3, 4] = 4 :=
|
||
rfl
|