作者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