Counting Adventure 10 by xsd

(define(l s a)(if(= a 0)(print s)(list(l #`",|s|."(- a 1))(l #`",|s|#"(- a 1)))))(l""(read))

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

download

return to the top page