Hi Chris.&nbsp; I don&#39;t think that version could type-check.&nbsp; Try it out.&nbsp; - Conal<br><br><div class="gmail_quote">On Dec 3, 2007 8:52 AM, Chris Kuklewicz &lt;<a href="mailto:chrisk@mightyreason.com">chrisk@mightyreason.com
</a>&gt; wrote:<br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">In State, the tuple order that is use is<br>&gt; newtype State s a = State {
<br>&gt; runState :: (s -&gt; (a, s))<br>&gt; }<br><br>So I would expect you to use the same order for writer. &nbsp; This only changes (&gt;&gt;)<br>below:<br><div class="Ih2E3d"><br>&gt; instance Monoid o =&gt; Monad ((,) o) where
<br></div>&gt; &nbsp; &nbsp; return = (a,mempty)<br>&gt; &nbsp; &nbsp; (a,o) &gt;&gt;= f = (a&#39;,o `mappend` o&#39;) where (a&#39;,o&#39;) = f a<br><br>--<br><font color="#888888">Chris<br><br></font></blockquote></div><br>