I&#39;m finding it really hard to grok what this is even supposed to do but you have:<div><br></div><div>eval1(If t1 t2 t3) =  case (If t1 t2 t3) of  <br>                    eval1(If t1 t2 t3) -&gt;  Just t1</div><div><br>
</div><div><br></div><div>Case doesn&#39;t work that way. It would be something like:</div><div><br></div><div>eval1 (If t1 t2 t3) = case (some expression) of</div><div>                             pattern1 -&gt; somevalue</div>
<div>                             pattern2 -&gt; anothervalue</div><div><br></div><div>I don&#39;t see the intent of pattern matching the exact argument to eval1.</div><div><br></div><div>What is the type of eval1?</div><div>
<br></div><div>Also, your filename is homework2.hs. Please read this page on the Haskell wiki:</div><div><br></div><div><a href="http://www.haskell.org/haskellwiki/Homework_help">http://www.haskell.org/haskellwiki/Homework_help</a></div>
<div><br></div><div>That&#39;s not to say you shouldn&#39;t ask these questions here but note that most of us will not do your homework for you. We will provide hints, but you should be doing your due diligence to try to understand what your code is doing and possible reasons why it isn&#39;t working.<br>
-- <br>Michael Xavier<br><a href="http://www.michaelxavier.net" target="_blank">http://www.michaelxavier.net</a><div><a href="http://www.linkedin.com/pub/michael-xavier/13/b02/a26" target="_blank">LinkedIn</a></div><br>
</div>