main=interact$(1#).read d#n=d?"M("++show n++d?")"++"\n"++d&n 0&_="" d&n|n>100=(d-1)#(n-10)|1>0=(d+1)#(n+11) d?s=[1..d]>>s
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page