(dotimes(i 1001)(format(> i 0)"~[~A~]~@*~V@{Clap~}
"(count-if(lambda(c)(find c"369"))(format()"~A"i))i))