Lisp Scheme Part41 (856ﾚｽ)
上下前次1-新
抽出解除 ﾚｽ栞

---

443(1): デフォルトの名無しさん [sage] 2021/07/20(火) 11:23:57.77 ID:0xL9gg55(2/2) AAS
(define (pow x y)
　　(let ((z (lambda()(pow x (quotient y 2)))))
　　　　 (cond ((zero? y) 1)
　　　　　　　 ((zero? (modulo y 2)) (set! z (z)) (* z z))
　　　　　　　 (else (set! z (z)) (* x z z)))))

---

445: デフォルトの名無しさん [sage] 2021/07/20(火) 12:42:50.05 ID:DJlNseKm(3/4) AAS
>>443
なるほどアリティ0の無名関数として束縛してやれば定義時に評価されずに済むんですね
評価したいときはリストにすれば評価されると
めちゃくちゃ為になりました
ありがとうございます

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 1.383s*