r=1.234321*2.0e8
      i=r
      write(6,10)r,i
  10  format(1h ,e16.10,i12)
      stop
      end