      program time
      real*16 second,t,tps
      second=9 192 631 770.0Q00
      write(6,'("second =",1f20.2)') second
      t=300.00Q00*second
      write(6,'("time   =",1f20.2)') t
      tps=t/second
      write(6,'("t [s]  =",1f20.12)') tps
      t=t+312.0Q00
      write(6,'("time   =",1f20.2)') t
      tps=t/second
      write(6,'("t [s]  =",1f20.12)') tps
      stop
      end
