Malcolm Wallace wrote:
> Mark P Jobes wrote:
>
> | Something like the following can be used in Hugs 98:
> |
> | f x = case x of
> | (a,b) -> case a of
> | (c,d) -> case b of
> | (e,f) -> [c,d,e,f]
>
> You can't be serious! This is a great example of mis-using layout to
> baffle and bemuse.
I belive he is as it is very similar to
{- code -} >>= \(a,b) ->
{- code -} >>= \(c,d) ->
{- code -} >>= \(e,f) ->
return [c,d,e,f]
Also how about.
mcompare x y =
do i <- x ==~ y
if i then return EQ else do
i <- x <=~ y
if i then return LT else do
return GT
with strictly increasing indentation iut would have to be something
like.
mcompare x y =
do i <- x ==~ y
if i then return EQ else do
i <- x <=~ y
if i then return LT else do
return GT
which is a bit uglier.
--
Kevin Atkinson
[EMAIL PROTECTED]
http://metalab.unc.edu/kevina/