NIP NEXT-WORD NO-DEBUG
NIP
* NIP ( a b -- b )

drop the value under the top of stack, inverse of >TUCK 
 simulate:        : NIP SWAP DROP ;

core ordinary primitive