title: Parse error on input "=" haskell error
body: <p>When I write only <code>main = do ...</code> block, it works perfectly. When I put only <code>stories = do...</code> block it also works. Maybe there is an indentation problem. </p>
  
  <p>Here is the code: </p>
  
  <pre><code>stories = do
  let str0 = "There once was "
  str1 &lt;- ["a princess ", "a cat ", "a little boy "]
  let str2 = "who lived in "
  return (  str0 ++ str1  )
  
  main = do
  let len = length stories
  putStrLn ("Enter a number from 0 to " ++ show (len - 1))
  n &lt;- readLn
  putStrLn ""
  putStrLn (stories !! n)
  </code></pre>
  
  <p>What is wrong with it?</p>