0 doWhile: [ 1+ dup . dup 6 rem 0 <> ] drop