From 5119c2d93326a798380a57ffae65583c7de5a04d Mon Sep 17 00:00:00 2001
From: Louis Pilfold <louis@lpil.uk>
Date: Mon, 25 May 2020 11:49:08 +0100
Subject: set.intersection

---
 test/gleam/set_test.gleam | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'test')

diff --git a/test/gleam/set_test.gleam b/test/gleam/set_test.gleam
index efbdcfc..871c0b6 100644
--- a/test/gleam/set_test.gleam
+++ b/test/gleam/set_test.gleam
@@ -79,3 +79,15 @@ pub fn take_test() {
   |> set.take([1, 3, 5])
   |> should.equal(set.from_list([1, 3]))
 }
+
+pub fn union_test() {
+  set.union(set.from_list([1, 2]), set.from_list([2, 3]))
+  |> set.to_list
+  |> should.equal([1, 2, 3])
+}
+
+pub fn intersection_test() {
+  set.intersection(set.from_list([1, 2]), set.from_list([2, 3]))
+  |> set.to_list
+  |> should.equal([2])
+}
-- 
cgit v1.2.3