Hi all,<div><br></div><div>I&#39;m new to haskell, and I&#39;m trying to get better with it. Recently I completed one of the challenges from Programming Praxis and I was wondering if people would be willing to spend some time and tell me how I could improve my code.</div>
<div><br></div><div>Thanks in advance,</div><div>Bryce</div><div><br></div><div>Here is a link to the programming praxis: </div><div><a href="http://programmingpraxis.com/2011/07/19/sum-of-two-integers/">http://programmingpraxis.com/2011/07/19/sum-of-two-integers/</a></div>
<div><br></div><div>And here is my code:</div><div><div><br></div><div>import Data.List</div><div>import Data.Maybe</div><div><br></div><div>sumCheck :: Int -&gt; [Int] -&gt; [Int] -&gt; Maybe (Int, Int)</div><div>sumCheck _ [] _ = Nothing</div>
<div>sumCheck total (x:xs) ys = if total&#39; == Nothing </div><div>                                then sumCheck total xs ys</div><div>                                else return (x, (ys !! ( fromJust total&#39;)))</div>
<div>                           where total&#39; = (total - x) `elemIndex` ys </div></div><div><br></div>