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