test(tests/lean/run/pickle1): add unpickle/pickle test
This commit is contained in:
parent
039f1de524
commit
f16eaf8f0f
1 changed files with 7 additions and 0 deletions
7
tests/lean/run/pickle1.lean
Normal file
7
tests/lean/run/pickle1.lean
Normal file
|
@ -0,0 +1,7 @@
|
|||
import data.countable
|
||||
open countable decidable bool prod list nat option
|
||||
variable l : list (nat × bool)
|
||||
check pickle l
|
||||
eval pickle [2, 1]
|
||||
example : unpickle (list nat) (pickle [1, 1]) = some [1, 1] :=
|
||||
rfl
|
Loading…
Reference in a new issue