What do you think about Mercury?

Mieszko Lis elf@sandburst.com
Mon, 9 Apr 2001 22:43:48 -0400


On Tue, Apr 10, 2001 at 11:16:27AM +1000, Manuel M. T. Chakravarty wrote:
> I always knew that inside Haskell there is a Perl trying to
> get out!

import List;q _ _ 0 _=[[]];q u i r k=let{b=[x+1|x<-u,-1>x||x>0,x<k];d=i\\map abs b}in concatMap(\p->[p:x|x<-q(-p:p:b)(i\\[p])(r-1)k])d;main=print$q[][1..8]8 8

(158 chars, but the output is quite ugly)

:)

-- Mieszko