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
メモ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 253 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.024s