* 3DUP ( x y z -- x y z x y z ) Copy top three elements on the stack onto top of stack. : 3DUP THIRD THIRD THIRD ; or : 3DUP 3 PICK 3 PICK 3 PICK ;
3DUP
( x y z -- x y z x y z )
: 3DUP THIRD THIRD THIRD ;
: 3DUP 3 PICK 3 PICK 3 PICK ;
FORTH/DEF toolbelt ordinary primitive