Function Ifix

Part of:

package f2cl-lib
( ifix < x > )