R>DROP ( -- )
: R>DROP R> DROP ;
: R>DROP R> R> NIP >R ;
reference: p4_r_from_drop in ../src/misc.c:0265, export CO R>DROP