Lisp@UNIX版 (585ﾚｽ)

Lisp@UNIX版 http://mevius.5ch.net/test/read.cgi/unix/1019926525/

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

---

332: 名無しさん＠お腹いっぱい。 [sage] 03/07/03 10:49 どうして append 使わないで再帰で書きたいのかも教えてほしいけど… とりあえず、その条件だけならこんな感じでいけそう。 (defun test (list1 list2) (test1 list1 list2 ())) (defun test1 (l1 l2 lst) (if (null l1) (nreverse lst) (test1 (cdr l1) l2 (test2 (car l1) l2 lst)))) (defun test2 (s l r) (if (null l) r (test2 s (cdr l) (cons (concat s (car l)) r)))) http://mevius.5ch.net/test/read.cgi/unix/1019926525/332

335: 332 [sage] 03/07/03 11:15 >>332,333 普段はあまり再帰とか意識しないで作ってるんで再帰したらどうなるのかなーって思っ て。 んで、なんとなく append を使わないで書いてみたくなったんですが、うまい書き方が 思い浮かばなかったんで聞いてみました。 最初に作ったのは、>>333 さんの後ろのやつと同じ感じになってました。 ありがとうございますです。 http://mevius.5ch.net/test/read.cgi/unix/1019926525/335

---

ﾒﾓ帳

(0/65535文字)

---

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

---

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

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.022s