test(tests/lean/run): add basic tests for finset module
This commit is contained in:
parent
2ab2f7dc9d
commit
4416d9b2c5
1 changed files with 17 additions and 0 deletions
17
tests/lean/run/finset1.lean
Normal file
17
tests/lean/run/finset1.lean
Normal file
|
@ -0,0 +1,17 @@
|
||||||
|
import data.finset
|
||||||
|
open nat list finset
|
||||||
|
|
||||||
|
example : to_finset [1, 3, 1] = to_finset [3, 3, 3, 1] :=
|
||||||
|
dec_trivial
|
||||||
|
|
||||||
|
example : to_finset [1, 2] ∪ to_finset [1, 3] = to_finset [3, 2, 1] :=
|
||||||
|
dec_trivial
|
||||||
|
|
||||||
|
example : 1 ∈ to_finset [3, 2, 1] :=
|
||||||
|
dec_trivial
|
||||||
|
|
||||||
|
example : bigsum (to_finset [3, 2, 2]) (λ x, x*x) = 13 :=
|
||||||
|
rfl
|
||||||
|
|
||||||
|
example : bigprod (to_finset [1, 2]) (λ x, x+1) = 6 :=
|
||||||
|
rfl
|
Loading…
Reference in a new issue