Lisp Scheme Part41 (809ﾚｽ)

Lisp Scheme Part41 http://mevius.5ch.net/test/read.cgi/tech/1531587928/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 ﾚｽ栞

---

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

---

443: デフォルトの名無しさん [sage] 2021/07/20(火) 11:23:57.77 ID:0xL9gg55 (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))))) http://mevius.5ch.net/test/read.cgi/tech/1531587928/443

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

---

ﾒﾓ帳

(0/65535文字)

---

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

---

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

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.032s