On Tue, Nov 03, 2009 at 12:30:48PM -0800, Ryan Ingram wrote:
> ] prtSol i n1 arr
> ]    | i < 1     = return ()
> ]    | otherwise = do
> ]       b <- readArray arr (i, n1)
> ]       putStr ((show b)++" ")
> ]       prtSol (i-1) n1 arr

Which is just

> prtSol i n1 arr = unless (i < 1) $ do
>                     b <- readArray arr (i, n1)
>                     putStr ((show b)++" ")
>                     prtSol (i-1) n1 arr

--
Felipe.
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to