FORTH/BASE floating_misc ordinary primitive