x=mod(5.5,2.2)
      print *,x
      y=mod(4,0)
      stop
      end