title: add spaces in between String: Haskell
body: <p>I am trying to add a white space in between an inputted string and, although the code works, when I try to use the map function in conjunction with the code, it gives a pattern match failure when it hits the whitespace, any way I can ignore the whitespace or improve the code?</p>
  
  <pre><code>whiteSpace xs 
      | length xs &lt;= 1        = xs
      | otherwise             = take 1 xs ++ " "++ whiteSpace (drop 1 xs)
  </code></pre>