mapcan メモ - わからん
mapcan は第一引数の戻り値をリストだと期待して、そのリストに第一引数の関数を mapcar した結果を nconc でつなげていく関数です。 (defun my-null (x) (if (null x) (list t) (list nil))) (mapcan #'my-null '(nil 1 2 nil)) ;;=> (T NIL NIL T) ;(mapcar 'null '(nil 1 2 nil)) でいいのは承知の上 (mapcar #'my-null '(nil 1 2 nil)) ;;=> ((T) (NIL) (NIL) (T)) (apply #'nconc '((t) (nil) (nil) (t))) ;;=> (T NIL NIL T) nconc を append に置きかえた mapcaappend を定義してみます。 (defun mapcaapp
なうなう：プラスチックの黄ばみを取る
９月だというのに暑い日が続きます。 学校の夏休みシーズンも終わりましたが、梅雨明けとともに草刈り機でバッサリと砂漠化させた裏の畑が既にジャングル化している様や、どことなく色白っぽかった子供達が日焼けで真っ黒になっている姿を見るに付け、日光の持つ膨大なエネルギーに畏敬の念を抱かずにはいられません。 例によって私は夏休みなど無縁の生活で今年の夏を終え、したがって日焼けなどしようもないのですが、身の回りには夏の日差しを満喫したものがいくつかあります。 それがこれ。 1990年製造の初代ゲームボーイ。 20年前のオモチャですよ！ 正面から見るとそれほどでもないように見えますが... サイドを見ると、ほら、こんがり小麦色...小麦色か？ まあ少なくとも「健康的」とは言いづらいカラーですね。 むしろ喫煙室の壁のような...まぁ一般的には「汚い」と言った方が世の共感を得られそうな色です。 もちろんヤニ汚
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
