From 341edd8afe9f1e88c578a8a34f258b761db4b079 Mon Sep 17 00:00:00 2001
From: Luci Phillips <104490260+scorpi4n@users.noreply.github.com>
Date: Wed, 15 May 2024 17:30:32 -0500
Subject: Implement and test set.is_subset

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

(limited to 'test')

diff --git a/test/gleam/set_test.gleam b/test/gleam/set_test.gleam
index 06af5dc..e9c24ca 100644
--- a/test/gleam/set_test.gleam
+++ b/test/gleam/set_test.gleam
@@ -107,3 +107,17 @@ pub fn difference_test() {
   |> set.to_list
   |> should.equal([1])
 }
+
+pub fn is_subset_test() {
+  set.is_subset(set.from_list([1, 2, 3, 4]), set.from_list([2, 4]))
+  |> should.be_false()
+
+  set.is_subset(set.from_list([2, 4]), set.from_list([1, 2, 3, 4]))
+  |> should.be_true()
+
+  set.is_subset(set.from_list([1, 2, 3]), set.from_list([4, 5, 6]))
+  |> should.be_false()
+
+  set.is_subset(set.from_list([1, 2]), set.from_list([2, 3, 4]))
+  |> should.be_false()
+}
-- 
cgit v1.2.3