Church Numerals in ski by flagitious

alias l proc
def a
[l{|x|x},0,l{|x|l{|y|x}},l{|x|l{|y|l{|z|x[z][y[z]]}}}][$<.getc%7]||a[a]end
loop{p a[l &:succ][0];gets}

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

download

return top