Fortran Coder

标题: 如何计算每次循环所用的时间 [打印本页]

作者: zsq890830 时间: 2014-10-10 11:18
标题: 如何计算每次循环所用的时间
do 10,i=1,20,1
print*,i
10 continue
end
我想计算一个程序每次循环运行的时间，不知道该怎么弄，大神帮下忙，我是菜鸟，最好能详细点

作者: fcode 时间: 2014-10-10 11:21
通常的办法是使用 CPU_TIME，你可以看看这个函数的帮助。

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

  REAL time_begin, time_end  

  ...  

  CALL CPU_TIME ( time_begin )  !  

  

  do i=1,20,1

         print*,i

  End Do

  

  CALL CPU_TIME ( time_end )

  

  WRITE (*,*) 'Time of operation was ', time_end - time_begin, ' seconds'

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)