sets equivalence

This commit is contained in:
Simon Hafner
2014-01-31 18:22:27 -06:00
parent e01fb17d02
commit 2c5a2d07fb
2 changed files with 33 additions and 0 deletions

View File

@@ -0,0 +1,16 @@
import unittest
import sets
suite "sets":
test "equivalent or subset":
check toSet(@[1,2,3]) <= toSet(@[1,2,3,4])
check toSet(@[1,2,3]) <= toSet(@[1,2,3])
check(not(toSet(@[1,2,3]) <= toSet(@[1,2])))
test "strict subset":
check toSet(@[1,2,3]) <= toSet(@[1,2,3,4])
check(not(toSet(@[1,2,3]) < toSet(@[1,2,3])))
check(not(toSet(@[1,2,3]) < toSet(@[1,2])))
test "==":
check(not(toSet(@[1,2,3]) == toSet(@[1,2,3,4])))
check toSet(@[1,2,3]) == toSet(@[1,2,3])
check(not(toSet(@[1,2,3]) == toSet(@[1,2])))