1[(]).runstdin/s{=only 3 1]}/p{]{1 s}repeat(
)s}>>begin]ne{p{1 s{0 s}for 1 =}for}if p