Memoize

factor_tuck

! ( a b -- b a b )
USE: shuffle
tuck

http://hyperpolyglot.org/stack