chapter04testruntime1.pro

idl 可视化分析与应用（随书程序）

; Chapter04TestRunTime1.pro
PRO Chapter04TestRunTime1
　　MyVariable = DIST(1000, 1000)
　　Sum = 0.0
　　StartTime = SYSTIME(/SECONDS)
　　FOR i = 0, 999 DO BEGIN
　　　　FOR j = 0, 999 DO BEGIN
　　　　　　Sum = Sum + MyVariable[i,j]
　　　　ENDFOR
　　ENDFOR
　　EndTime = SYSTIME(/SECONDS)
　　PRINT, '数组的和：', Sum
　　PRINT, '使用时间：' , EndTime - StartTime
END