2! 1 2>R
2!
* 2! ( a,a addr -- )

double-cell store

FORTH/ANS core (dpANS.6.1.0310) ordinary primitive