3DROP 3DROP 3DUP
3DROP
* 3DROP ( x y z -- )

Drop the top three elements from the stack. 
 : 3DROP   DROP 2DROP ;

FORTH/DEF toolbelt ordinary primitive