Recent

• Simple Particle Engine for a shooter game
• Snake / Nibbles clone in C and Ncurses
• Please improve
• Parsing of XML data has high CPU usage
• Convert simple Javascript to jQuery plugin
• Active Record getting unique records
• List the files in a directory without the directory name or the extension
• clean the code
• ohs system, recruitment software, hr software, oh&s software, human resources software, ohs software
• Array parsing in a block

Popular

• Parsing of XML data has high CPU usage
• Please improve
• Snake / Nibbles clone in C and Ncurses
• List the files in a directory without the directory name or the extension
• Convert simple Javascript to jQuery plugin
• Simple Particle Engine for a shooter game
• Active Record getting unique records
• Breadth first cartesian product iterator
• php refactoring
• first BST

Pastable version of Cat90

<pre class='prettyprint' language='haskell'>main = do s &lt;- getContents putStr (unlines (reverse (rotate (lines s)))) rotate ls = if (maxLength ls) &gt; 0 then (column ls) : (rotate (dropColumn ls)) else [] maxLength ls = (maximum (map length ls)) column ls = map wholeHead ls dropColumn ls = map (drop 1) ls wholeHead cs = if (null cs) then ' ' else (head cs)</pre> <a href="http://www.refactormycode.com/codes/602-cat90" style="color:#fff" title="As seen on RefactorMyCode.com"><img alt="Small_logo" src="http://www.refactormycode.com/images/small_logo.gif" style="border:0" /></a>