Re: unable to find the error

Mon, 31 Jan 2000 16:34:18 -0800 

Krishnendu Kar wrote:
> 
> This is a multi-part message in MIME format.
> 
> ------=_NextPart_000_0005_01BF6C14.8D98A480
> Content-Type: text/plain;
>       charset="iso-8859-1"
> Content-Transfer-Encoding: quoted-printable
> 
> Hi!
> Please tell me whats wrong in this-
> 
> module  EvenSumOddProd where
> 
>         evenSumOddProd :: [Int] -> (Int, Int)
>  evenSumOddProd(s:t) =3D (s + (even(a)), t * (odd(b)))
>   where (a,b) =3D evenSumOddProd t
> 
> output wanted is
> evenSumOddProd[1,2,3,4,5] returns (6, 15)
> 
> thanks in advance=20
> Annie
> 
> 
> ------=_NextPart_000_0005_01BF6C14.8D98A480
> Content-Type: text/html;
>       charset="iso-8859-1"
> Content-Transfer-Encoding: quoted-printable
> 
> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
> <HTML><HEAD>
> <META content=3D"text/html; charset=3Diso-8859-1" =
> http-equiv=3DContent-Type>
> <META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR>
> <STYLE></STYLE>
> </HEAD>
> <BODY bgColor=3D#ffffff>
> <DIV><FONT size=3D2>Hi!</FONT></DIV>
> <DIV><FONT size=3D2>Please tell me whats wrong in this-</FONT></DIV>
> <DIV>&nbsp;</DIV>
> <DIV><FONT size=3D2>module&nbsp; EvenSumOddProd where</FONT></DIV>
> <DIV>&nbsp;</DIV>
> <DIV><FONT size=3D2>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; =
> evenSumOddProd ::=20
> [Int] -&gt; (Int, Int)<BR>&nbsp;evenSumOddProd(s:t) =3D (s + (even(a)), =
> t&nbsp;*=20
> (odd(b)))<BR>&nbsp;&nbsp;where (a,b) =3D evenSumOddProd t</FONT></DIV>
> <DIV>&nbsp;</DIV>
> <DIV><FONT size=3D2>output wanted is</FONT></DIV>
> <DIV><FONT size=3D2>evenSumOddProd[1,2,3,4,5] returns (6, =
> 15)</FONT></DIV>

 
Have a look thru the Prelude; especially lines 189, 1149, and 1292.

Hope this helps,


John Atwood



> <DIV>&nbsp;</DIV>
> <DIV><FONT size=3D2>thanks in advance </FONT></DIV>
> <DIV><FONT size=3D2>Annie</FONT></DIV>
> <DIV>&nbsp;</DIV></BODY></HTML>
> 
> ------=_NextPart_000_0005_01BF6C14.8D98A480--
> 
> 
>

Reply via email to