Member (autolisp)

構文

(member expr lst)

機能

指定された式がリスト内に存在するかどうかを検索し、

初めに検出した式以降のリストを返す。

引数

• expr : 検索する式。
• lst : expr 引数を検索するリスト。

戻り値

リスト。

lst 内に expr が見つからなかったときは nil。

サンプル

(member 'c '(a b c d e))

(C D E)

---

(member 'q '(a b c d e))

nil

---

(setq a '(1 2 3 4 3 2 1))

(1 2 3 4 3 2 1)

(member 3 a)

(3 4 3 2 1)

(- (length a) (length (member 3 a)))

2