Remove-if-not

提供:GizmoLabs - だいたい CAD LISP なサイト
2015年12月11日 (金) 14:45時点におけるGizmon (トーク | 投稿記録)による版
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(remove-if-not predicate-function list)


機能
指定されたリストの要素の中で、テスト関数に合格したすべての要素を返す。
* vl-remove-if-not と同様


引数
  • predicate-function : テスト関数。 単一の引数を受け入れユーザが指定した任意の条件で T を返す任意の関数が指定できる。
predicate-function 引数の値は、次の形式のいずれかが指定可能。
シンボル(関数名)
'(LAMBDA (A1 A2) ...)
(FUNCTION (LAMBDA (A1 A2) ...))
  • list : テストするリスト。


戻り値
list 引数の要素の中で、predicate-function が nil でない値を返したすべての要素を含んだリスト。


サンプル
(remove-if-not 'vl-symbolp (list pi t 0 "abc")) 
 (T)
; ---
 (remove-if-not '[[evenp]] '(1 2 3 4 5 6 7 8)) 
(1 3 5 7)

関連事項