\ http://c...content-available-to-author-only...e.com/a/87303/34718 : f >r 1 1 r@ 0 DO 2dup + LOOP 2drop 1 r> 0 DO * LOOP ; : p 12 1 DO I f . LOOP ; p