@@ -0,0 +1,15 @@
+-- Exercise 5.4
+-- George C. Privon
+-- 2024-07-20
+
+repeatInt :: Int -> [Int]
+repeatInt n = n:n:n:[]
+-- `repeatInt` takes an input integer and returns a list of three copies of
+-- that integer.
+tripleString :: String -> [String]
+tripleString stng = stng:stng:stng:[]
+-- `tripleString` takes an input string and returns a list of three copies of
+-- that string.