FNIP
* FNIP ( x1 x2 -- x2 )

EXTENSIONS fpnostack ordinary primitive