[Haskell-beginners] a parse error....i can't fix it

[anyzhen]

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
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.haskell.org/pipermail/beginners/attachments/20110909/b5f7dfe5/attachment.htm>