Hatena::Groupsicp

yharaの日記

参考リンク
 | 

2007-05-03

[].2 15:24

(/ (+ 5 4 (- 2 (- 3 (+ 6 (/ 4 5)))))
   (* 3 (- 6 2) (- 2 7)))

こんな感じで。

確か、Schemeでは完全数(exact number)と不完全数(inexact number)は区別されるんだよね。

有理数(分数、誤差なし)と少数(誤差あり)ってことかな。

(/ 4 5)はどっちなんだろ。

yhara@meteor:~/src/sicp % gosh
gosh> (/ 4 5)
0.8

あれ、少数なのか。

っていうかCtrl-pが効かねぇ(^^; rlwrapしないと。

yhara@meteor:~/src/sicp % rlwrap gosh
gosh> (/ 4 5)
0.8
gosh> (/ 1 3)
0.3333333333333333
gosh> (exact? (/ 1 3))
#f
gosh> (exact? 1/3)
#f

「/」は不完全数を返すみたい。完全数の「3分の1」を求めるにはどうすればいいのかな?

http://www.shiro.dreamhost.com/scheme/gauche/man/?l=jp&p=%2f

註:0.8.8までGaucheは正確な有理数サポートしておらず、それ以前は除数と被除数がともに正確な数であっても商が整数にならなければ結果は非正確な数へと変換されていました。今のGaucheはそうではありません。

しまった、使っているGaucheが0.8.3だった。

yhara@meteor:~/src/sicp % gosh -V
Gauche scheme interpreter, version 0.8.3 [utf-8,pthreads]

ChristianaChristiana2012/01/10 09:33That's more than snebsile! That's a great post!

sgiodkkfjgssgiodkkfjgs2012/01/10 19:14Gv8tkW <a href="http://cjqpfjauqswr.com/">cjqpfjauqswr</a>

ntfhyvcwntfhyvcw2012/01/12 22:54TKFix7 <a href="http://egvshzpudncy.com/">egvshzpudncy</a>

 |