* 4DROP ( x y z -- ) Drop the top three elements from the stack. : 4DROP 2DROP 2DROP ;
4DROP
( x y z -- )
: 4DROP 2DROP 2DROP ;
FORTH/BASE forth_usual ordinary primitive