(= s'(" /\\""/__\\"))(for x 2(read)(= s(+(map[+""(n-of len.s" ")_]s)(map[+ _(cut _ 0(pos ~whitec _))_]s))))(map prn s)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page