Module triple added with Type Triple.

2 files changed, 40 insertions, 0 deletions

diff --git a/test/gleam/pair_test.gleam b/test/gleam/pair_test.gleam
index d8cb324..54a12af 100644
--- a/test/gleam/pair_test.gleam
+++ b/test/gleam/pair_test.gleam
@@ -5,12 +5,20 @@ pub fn first_test() {
   pair.Pair(1, 2)
   |> pair.first
   |> expect.equal(_, 1)
+
+  pair.Pair("abc", [])
+  |> pair.first
+  |> expect.equal(_, "abc")
 }
 
 pub fn second_test() {
   pair.Pair(1, 2)
   |> pair.second
   |> expect.equal(_, 2)
+
+  pair.Pair("abc", [])
+  |> pair.second
+  |> expect.equal(_,[])
 }
 
 pub fn swap_test() {
diff --git a/test/gleam/triple_test.gleam b/test/gleam/triple_test.gleam
new file mode 100644
index 0000000..1684cca
--- /dev/null
+++ b/test/gleam/triple_test.gleam
@@ -0,0 +1,32 @@
+import gleam/expect
+import gleam/triple
+
+pub fn first_test() {
+  triple.Triple(1, 2, 3)
+  |> triple.first
+  |> expect.equal(_, 1)
+
+  triple.Triple([], "abc", 3)
+  |> triple.first
+  |> expect.equal(_, [])
+}
+
+pub fn second_test() {
+  triple.Triple(1, 2, 3)
+  |> triple.second
+  |> expect.equal(_, 2)
+
+  triple.Triple([], "abc", 3)
+  |> triple.second
+  |> expect.equal(_, "abc")
+}
+
+pub fn third_test() {
+  triple.Triple(1, 2, 3)
+  |> triple.third
+  |> expect.equal(_, 3)
+
+  triple.Triple([], "abc", 3)
+  |> triple.third
+  |> expect.equal(_, 3)
+}