floating point in forth