お知らせ‎ > ‎

フィボナッチベンチの結果

2009/03/14 6:50 に SmalltalkUsers Admin が投稿   [ 2009/03/31 8:10 に更新しました ]

R4.1 のフィボナッチベンチの結果は極めて良好です。

下記のソースで、
Integer>>fib
    self < 2 ifTrue: [^ self].
    ^ (self - 2) fib + (self - 1) fib

ワークスペースでの実行結果は
1000 fib "=>43466557686937456435688527675040625802564660517371780402481729089536555417949051890403879840079255169295922593080322634775209689623239873322471161642996440906533187938298969649928516003704476137795166849228875"
Time millisecondsToRun:[1000 fib] "=>0"

速すぎますね。
Comments