Skip to content

Instantly share code, notes, and snippets.

@Tomren3000
Tomren3000 / printLines.hs
Created June 3, 2015 18:03
printLines.hs
import Data.Char
navne :: [String]
navne = ["Morten", "Thomas", "Trine"]
buildString :: String -> [String] -> String
buildString a [x] = a ++ x ++ "\n"
buildString a xs = buildString (a ++ head xs ++ "\n") (tail xs)
buildString' :: String -> [String] -> String