          DOUBLE PRECISION x
          x = 0.2
          y = (0.5/3.0*x)-(0.5/3.0*x)
          if (y .ne. 0.0d0) print*, y
          END
