hhqwerty · September 16, 2021 18:21
diff --git a/speller_haskell.txt b/speller_haskell.txt
 speller ::[String] -> String
 speller [] = ""
 speller (x:xs)  | xs==[] = "and " ++ helper x 
                | otherwise = (helper x) ++", " ++ speller xs 


 helper :: String -> String
 helper word = (head word) : (" " ++ "is for " ++ word)
	speller ::[String] -> String
	speller [] = ""
	speller (x:xs) \| xs==[] = "and " ++ helper x
	\| otherwise = (helper x) ++", " ++ speller xs


	helper :: String -> String
	helper word = (head word) : (" " ++ "is for " ++ word)