wave line by Rune Kaagaard

<?while("\n"!=$a=fgetc(STDIN)){$d+=$a<$b^-($a>$b);$r[$d].=' ';$r[$d][$k++]=$b=$a;}ksort($r);echo join("\n",$r);

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

download

return to the top page