2R!
* 2R! ( x y R: a b -- R: x y )

store the value as the topmost value in the returnstack.
see R@ for inverse operation ( >R'@ / R"@ / 2R@ / >2R! )

misc ordinary primitive