rot13 by ksk

let rec f?(c=input_byte stdin)_=f(output_byte stdout(c+c/64*(13-c mod 32/14*26)));;f()

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

download

return to the top page