Hi.<br><br><div class="gmail_quote">On 1 October 2011 11:55, Yves Parès <span dir="ltr">&lt;<a href="mailto:limestrael@gmail.com">limestrael@gmail.com</a>&gt;</span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">

<font size="2">BTW Heinrich, the </font><br>

<pre><font size="2"><code>evalState (sequence . repeat . State $ \s -&gt; (s,s+1)) 0<br><span style="font-family:arial,helvetica,sans-serif"></span></code></font><br><font><font size="2"><code>at the end doesn&#39;t work anymore. It should be replaced by :</code></font></font>
<font size="2"><code><br>evalState (sequence . repeat . StateT $ \s -&gt; Identity (s,s+1)) 0</code></font></pre></blockquote></div><div><br></div>Or equivalently:<div><br></div><div><div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">evalState (sequence . repeat . state $ \s -&gt; (s,s+1)) 0</font></div>

<div><br></div>Ozgur
</div>