|
|
@@ -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.
|