[Haskell-beginners] a parse error....i can't fix it
anyzhen
jiangzhen3s at qq.com
Fri Sep 9 17:13:13 CEST 2011
thank you
------------------ Original ------------------
From: "Luca Ciciriello";
Date: 2011年9月9日(星期五) 晚上11:12
To: "anyzhen";
Cc: "Beginners";
Subject: Re: [Haskell-beginners] a parse error....i can't fix it
Formatted in this way should be compile:
linerFind :: [Int] -> Int -> MaxSA -> MaxSA --MaxSA is MaximumSubarray
linerFind xs len ms1@(MaxSA l h m) -- (MaxSA leftPosition rightPosition maxsum)
| h<len = keepFind ms1
| otherwise = ms1
where keepFind ms'@(MaxSA l' h' m') = let ms2@(MaxSA l2 h2 m2)= find' xs l' (h'+1)
in if m < m2
then linerFind xs len ms2
else keepFind ms2
Bye
Luca.
On Sep 9, 2011, at 4:53 PM, anyzhen wrote:
sorry and please forget the name and what it is meaning for.
just look at in syntax aspect
the error : "parse error on input `|'
Failed, modules loaded: none."
linerFind :: [Int] -> Int -> MaxSA -> MaxSA --MaxSA is MaximumSubarray
linerFind xs len ms1@(MaxSA l h m) -- (MaxSA leftPosition rightPosition maxsum)
| h<len = keepFind ms1
where keepFind ms'@(MaxSA l' h' m')=
let ms2@(MaxSA l2 h2 m2)= find' xs l' (h'+1) in
if m < m2 then linerFind xs len ms2
else keepFind ms2
|otherwise = ms1 --compiler say error is in this line
_______________________________________________
Beginners mailing list
Beginners at haskell.org
http://www.haskell.org/mailman/listinfo/beginners
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.haskell.org/pipermail/beginners/attachments/20110909/f821d147/attachment-0001.htm>
More information about the Beginners
mailing list