2015-08-17 01:21:29 +00:00
|
|
|
import data.list data.examples.vector
|
|
|
|
open nat list vector
|
|
|
|
|
2015-10-14 01:35:16 +00:00
|
|
|
check [(1:nat), 2, 3]
|
2015-08-17 01:21:29 +00:00
|
|
|
check ([1, 2, 3] : vector nat _)
|
|
|
|
check ([1, 2, 3] : list nat)
|
2015-10-14 01:35:16 +00:00
|
|
|
check (#list [(1:nat), 2, 3])
|
|
|
|
check (#vector [(1:nat), 2, 3])
|
2015-08-17 01:21:29 +00:00
|
|
|
|
2015-10-14 01:35:16 +00:00
|
|
|
example : (#vector [1, 2, 3]) = [(1:nat), 2, 3] :=
|
2015-08-17 01:21:29 +00:00
|
|
|
rfl
|
|
|
|
|
|
|
|
example : (#vector [1, 2, 3]) = ([1, 2, 3] : vector nat _) :=
|
|
|
|
rfl
|
|
|
|
|
|
|
|
example : (#list [1, 2, 3]) = ([1, 2, 3] : list nat) :=
|
|
|
|
rfl
|