作者latinboy (昵称)
看板Fortran
标题Re: [问题] 有没有语法让程式暂停10秒钟?
时间Sun Mar 1 10:50:25 2009
※ 引述《YCTzeng (Desperate Alex)》之铭言：
: 如题，我想知道Fortran中有没有语法可以让程式先暂时休息一下，
: 然後过10秒钟後自动继续执行。
: 我用pause但是必须手动继续执行，我需要让CPU先休息几秒，然後
: 时间到再自动继续执行未完成的程式。
用 读时间 + do loop虽然程式可以看起来暂时不动
但是实际上CPU还是一直在"读时间"+"DO LOOP"
试试看非标准函数sleep sleepqq
sleep(n):程式休息n秒钟 -> gfortran、CVF、intel支援
sleepqq(n):程式休息n毫秒 -> CVF、intel支援
program test
implicit none
print *, 'Sleep 2 sec.'
call sleep(2)
print *, 'Sleep 2000 msec.'
call sleepqq(2000)
end program
执行结果:
real 0m4.005s
user 0m0.000s
sys 0m0.002s
程式跑了4秒钟 但是没有花到任合CPU效能
本文blog完整版：
http://latinboy.pixnet.net/blog/post/23286610
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 122.116.120.19
※ 编辑: latinboy 来自: 122.116.120.19 (03/01 14:29)
1F：推 YCTzeng:太感谢了，这就是我想要的。 03/01 14:45