G'day all. Quoting George Russell <[EMAIL PROTECTED]>:
> The following declaration for a function for converting positive > integers to Roman numerals is 181 characters long. > > Is there a shorter one? Being a judge, I can't write your obfuscated haskell contest entry for you. However, as a suggestion, you may be able to merge the if-then-else with the guard syntax. That should save a few characters. > roman=f[(i-j,i)|i<-[2,4..8],j<-[2,1]]where > f(d@((a,b):c))n|n<1=""|n>=t!!a=s!!a:f d(n-t!!a)|1>0=if n+t!!b>=t!!a then > s!!b:f d(n+t!!b)else f c n;s="mdclxvi";t=[1000,500,100,50,10,5,1] Cheers, Andrew Bromage _______________________________________________ Haskell-Cafe mailing list [EMAIL PROTECTED] http://www.haskell.org/mailman/listinfo/haskell-cafe
