たらい回しをracketで動かしてみた ― 2011/07/31 15:48
macBookPro(2009) 2.53mHz
memory 8GB
racket 5.1.1
(define (tak x y z)
(if (> x y)
(tak (tak (- x 1) y z)
(tak (- y 1) z x)
(tak (- z 1) x y))
y))
> (time (tak 12 6 0))
cpu time: 1657 real time: 1658 gc time: 66
12
> (time (tak 13 7 0))
cpu time: 11923 real time: 11920 gc time: 0
13
> (time (tak 14 8 0))
cpu time: 89862 real time: 90156 gc time: 0
14
>
memory 8GB
racket 5.1.1
(define (tak x y z)
(if (> x y)
(tak (tak (- x 1) y z)
(tak (- y 1) z x)
(tak (- z 1) x y))
y))
> (time (tak 12 6 0))
cpu time: 1657 real time: 1658 gc time: 66
12
> (time (tak 13 7 0))
cpu time: 11923 real time: 11920 gc time: 0
13
> (time (tak 14 8 0))
cpu time: 89862 real time: 90156 gc time: 0
14
>
Racket 5.1.1のmac intel バイナリーはLionでは動かない ― 2011/07/31 16:56
Racket 5.1.1を落として Lionに入れたのだが 落ちる
不具合は把握しているみたい。
もうすぐupdateするのかな？
最近のコメント