Merge branch 'rightlib' into mergelibs-241120-1113

1 files changed, 40 insertions, 0 deletions

diff --git a/yql/essentials/tests/sql/suites/expr/sets.sql b/yql/essentials/tests/sql/suites/expr/sets.sql
new file mode 100644
index 0000000000..4984941e5d
--- /dev/null
+++ b/yql/essentials/tests/sql/suites/expr/sets.sql
@@ -0,0 +1,40 @@
+/* postgres can not */
+$ns = ($set)->{return ListSort(DictKeys($set))};
+$nd = ($dict)->{return ListSort(DictItems($dict), ($z)->{return $z.0})};
+
+select $ns(ToSet(AsList(1,2,3)));
+
+select SetIsDisjoint(ToSet(AsList(1,2,3)), AsList(7,4));
+
+select SetIsDisjoint(ToSet(AsList(1,2,3)), AsList(3,4));
+
+select SetIsDisjoint(ToSet(AsList(1,2,3)), ToSet(AsList(7,4)));
+select SetIsDisjoint(ToSet(AsList(1,2,3)), ToSet(AsList(3,4)));
+
+select $ns(SetIntersection(ToSet(AsList(1,2,3)), ToSet(AsList(3,4))));
+select $nd(SetIntersection(
+    AsDict(AsTuple(1,"foo"),AsTuple(3,"bar")),
+    AsDict(AsTuple(1,"baz"),AsTuple(2,"qwe")),
+    ($_k, $a, $b)->{ return AsTuple($a, $b) }));
+
+select SetIncludes(ToSet(AsList(1,2,3)), AsList(3,4));
+
+select SetIncludes(ToSet(AsList(1,2,3)), AsList(2,3));
+
+select SetIncludes(ToSet(AsList(1,2,3)), ToSet(AsList(3,4)));
+select SetIncludes(ToSet(AsList(1,2,3)), ToSet(AsList(2,3)));
+
+select $ns(SetDifference(ToSet(AsList(1,2,3)), ToSet(AsList(3,4))));
+select $ns(SetDifference(ToSet(AsList(1,2,3)), ToSet(AsList(2,3))));
+
+select $ns(SetUnion(ToSet(AsList(1,2,3)), ToSet(AsList(3,4))));
+select $nd(SetUnion(
+    AsDict(AsTuple(1,"foo"),AsTuple(3,"bar")),
+    AsDict(AsTuple(1,"baz"),AsTuple(2,"qwe")),
+    ($_k, $a, $b)->{ return AsTuple($a, $b) }));
+
+select $ns(SetSymmetricDifference(ToSet(AsList(1,2,3)), ToSet(AsList(3,4))));
+select $nd(SetSymmetricDifference(
+    AsDict(AsTuple(1,"foo"),AsTuple(3,"bar")),
+    AsDict(AsTuple(1,"baz"),AsTuple(2,"qwe")),
+    ($_k, $a, $b)->{ return AsTuple($a, $b) }));