[.runstdin]{9{dup 2 idiv or}repeat 1 add =}forall