Ranking __REVENGE__ by notogawa

import List
main=interact$unlines.(1#).groupBy(f$f.(==)).sortBy(f$f.compare).lines
f=(.(0-).read.last.words)
n#(a:x)=map(shows n" "++)a++(n+length a)#x
n#x=[]

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page