Lisp Scheme Part41 (809ﾚｽ)
Lisp Scheme Part41 http://mevius.5ch.net/test/read.cgi/tech/1531587928/
上
下
前次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
抽出解除
ﾚｽ栞
440: デフォルトの名無しさん [sage] 2021/07/20(火) 03:11:09.60 ID:DJlNseKm (z (pow x...)) の評価が ((zero? y) 1) の前に起きてるのが原因なんですね z に (pow x..) を束縛だけして評価しないみたいなことって出来るんですかね? (define (pow2 x y) (if (= y 0) 1 (let ((z (pow2 x (quotient y 2)))) (if (= (modulo y 2) 0) (* z z) (* x z z))))) みたいに if 文に分解して (= y 0) 1 を (let ((z (pow2 x ..) の前に出すしかないんでしょうか let と cond を一緒に使うとスッキリ書けそうなのですが… http://mevius.5ch.net/test/read.cgi/tech/1531587928/440
449: はちみつ餃子 ◆8X2XSCHEME [sage] 2021/07/20(火) 17:33:51.23 ID:BjsPOMc7 元になる数式をなるべく形式を変えずに書きたいみたいな要求はあるんじゃないの？ プログラマ的視点で見れば >>440 の形に不自然さは感じない (むしろ比較的自然だと思う) けど、 理論家がコードに書き起こすときにはコードを変形させるよりは 遅延を明示したほうがすっきりと感じることだってあるだろう。 そこらへんは何が正しいとは言えないけど、 現時点で Scheme を学習中の人みたいなので色々な方法に触れておけば どれかは役にたつこともあるかもね。 http://mevius.5ch.net/test/read.cgi/tech/1531587928/449
ﾒﾓ帳
(0/65535文字)
上
下
前次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.032s