Initial data commit

This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 72d218235f
commit f23f22d71c
199087 changed files with 3378941 additions and 0 deletions

View file

@ -0,0 +1,22 @@
var x = MySet(1, 2, 3)
5..7 -> each { |i| x += i }
var y = MySet(1, 2, 4, x)
say "set x is: #{x}"
say "set y is: #{y}"
[1,2,3,4,x].each { |elem|
say ("#{elem} is ", elem ∈ y ? '' : 'not', " in y")
}
var (w, z)
say ("union: ", x y)
say ("intersect: ", x ∩ y)
say ("z = x y = ", z = (x y) )
say ("y is ", x ⊆ y ? "" : "not ", "a subset of x")
say ("z is ", x ⊆ z ? "" : "not ", "a subset of x")
say ("z = (x y) (x ∩ y) = ", z = ((x y) (x ∩ y)))
say ("w = x ^ y = ", w = (x ^ y))
say ("w is ", w ≡ z ? "" : "not ", "equal to z")
say ("w is ", w ≡ x ? "" : "not ", "equal to x")