F^N F^N F~
F^N
* F^N ( x u -- x^u )

For large exponents, use F** instead. Of course u=-1 is large.

EXTENSIONS fpnostack ordinary primitive