2015-04-19 21:18:49 +00:00
|
|
|
|
import data.encodable
|
|
|
|
|
open encodable decidable bool prod list nat option
|
2015-04-15 04:32:07 +00:00
|
|
|
|
variable l : list (nat × bool)
|
2015-04-19 21:18:49 +00:00
|
|
|
|
check encode l
|
|
|
|
|
eval encode [2, 1]
|
|
|
|
|
example : decode (list nat) (encode [1, 1]) = some [1, 1] :=
|
2015-04-15 04:32:07 +00:00
|
|
|
|
rfl
|