MODULE  'fpu/68881_single','fpu/68881_test'

PROC main()
  IF ftestiffpu()
    WriteF('(6*2)/4=\d\n',ftointeger(fdiv(fmul(6.0,2.0),4.0)))
  ELSE
    WriteF('Sorry, FPU is needed to calculate (6*2)/4 ! ;-)\n')
  ENDIF
ENDPROC