This is a bit tricky.<div><br></div><div>The type of &#39;f&#39; is &#39;[Int] -&gt; IO [Int]&#39;, which means that the type of &#39;lst&#39; is &#39;IO [Int]&#39;.</div><div><br></div><div>So fmap (+1) tries to add one to the [Int] underneath the &#39;IO&#39; type constructor.</div>
<div><br></div><div>You can either use two &#39;fmap&#39;s, the first to lift up to IO and the second to lift into the list, or you can use monad notation:</div><div><br></div><div>&gt; do</div><div>&gt;   lst &lt;- f [1,2,3,4]</div>
<div>&gt;   return $ fmap (+1) lst</div><div><br></div><div>Does that make sense?</div><div><br></div><div>Take care,</div><div>Antoine</div><div><br><div class="gmail_quote">On Fri, Dec 17, 2010 at 11:04 AM, michael rice <span dir="ltr">&lt;<a href="mailto:nowgate@yahoo.com">nowgate@yahoo.com</a>&gt;</span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"><table cellspacing="0" cellpadding="0" border="0"><tbody><tr><td valign="top" style="font:inherit"><span style="font-family:courier,monaco,monospace,sans-serif">I don&#39;t understand this error message. Haskell appears not to understand that 1 is a Num.<br>
<br>Prelude&gt; :t 1<br>1 :: (Num t) =&gt; t<br>Prelude&gt; :t [1,2,3,4,5]<br>[1,2,3,4,5] :: (Num t) =&gt; [t]<br>Prelude&gt; <br><br>Michael<br><br>===================<br><br>f :: [Int] -&gt; IO [Int]</span><br style="font-family:courier,monaco,monospace,sans-serif">
<span style="font-family:courier,monaco,monospace,sans-serif">f lst = do return lst</span><br style="font-family:courier,monaco,monospace,sans-serif"><br style="font-family:courier,monaco,monospace,sans-serif"><span style="font-family:courier,monaco,monospace,sans-serif">main = do let lst = f [1,2,3,4,5]</span><br style="font-family:courier,monaco,monospace,sans-serif">
<span style="font-family:courier,monaco,monospace,sans-serif">          fmap (+1) lst</span><br style="font-family:courier,monaco,monospace,sans-serif"><br>===============================<br><br>Prelude&gt; :l test<br>[1 of 1] Compiling Main             ( test.hs, interpreted )<br>
<br>test.hs:5:17:<br>    No instance for (Num [Int])<br>      arising from the literal `1&#39; at test.hs:5:17<br>    Possible fix: add an instance declaration for (Num [Int])<br>    In the second argument of `(+)&#39;, namely `1&#39;<br>
    In the first argument of `fmap&#39;, namely `(+ 1)&#39;<br>    In the expression: fmap (+ 1) lst<br>Failed, modules loaded: none.<br>Prelude&gt; <br></td></tr></tbody></table><br>

      <br>_______________________________________________<br>
Haskell-Cafe mailing list<br>
<a href="mailto:Haskell-Cafe@haskell.org">Haskell-Cafe@haskell.org</a><br>
<a href="http://www.haskell.org/mailman/listinfo/haskell-cafe" target="_blank">http://www.haskell.org/mailman/listinfo/haskell-cafe</a><br>
<br></blockquote></div><br></div>