FP@ FP! FREE
FP@ ( -- addr )  
<PFE-MISC>
returns the floating point stack pointer

reference: p4_f_p_fetch in ../src/misc.c:0505, export CO FP@