关于文件读写速度的问题

珊瑚虫

今天运行一个程序，发现如果一个文件是已经存在的文件，要给里面写东西，要比这个文件原来不存在写东西要快，各位同仁有没有遇到过类似的问题。

[Fortran] 纯文本查看 复制代码

      program main
      implicit none 
      real*16::x=1.0/3.0q0
      real*16::y=1.0/5.0q0
      integer i
      REAL*4 :: T1,T2
      CALL TTIME(T1)
      open(unit=10,file='xx.dat')
      do i=1,1000000
      write(10,*)x
      enddo 
      CLOSE(10)
      CALL TTIME(T2)
      WRITE(*,*)'写文件耗时:',T2-T1
      CALL TTIME(T1)
      open(unit=10,file='xx.dat')
      do i=1,1000000
      write(10,*)y
      enddo  
      CLOSE(10)
      CALL TTIME(T2)
      WRITE(*,*)'写文件耗时:',T2-T1
      pause 
      end 
      
	SUBROUTINE TTIME(T)
	REAL(4) T,TA(2)
	T=ETIME(TA)
      END SUBROUTINE 

珊瑚虫

chuxf 发表于 2014-2-26 22:23
我倒不觉得是因为文件里是否存在内容而引起的效率差别。
个人认为是硬盘缓存惹的祸。（这个取决于操作系统 ...

原来如此，我早上遇到的是写已经有的文件比较慢，但是晚上试的时候发现新文件慢，