「Remove-if-not」の版間の差分
(ページの作成: ; 構文 : (remove-if-not ''predicate-function'' ''list'') ; 機能 : 指定されたリストの要素の中で、テスト関数に合格したすべての要素を返す。…) |
細編集の要約なし |
||
| 1行目: | 1行目: | ||
{{GZLIB}} | |||
; 構文 | ; 構文 | ||
: (remove-if-not ''predicate-function'' ''list'') | : (remove-if-not ''predicate-function'' ''list'') | ||
| 6行目: | 8行目: | ||
: 指定されたリストの要素の中で、テスト関数に合格したすべての要素を返す。 | : 指定されたリストの要素の中で、テスト関数に合格したすべての要素を返す。 | ||
; * vl-remove-if-not と同様 | ; * vl-remove-if-not と同様 | ||
; 引数 | ; 引数 | ||
| 13行目: | 16行目: | ||
::: '(LAMBDA (A1 A2) ...) | ::: '(LAMBDA (A1 A2) ...) | ||
::: (FUNCTION (LAMBDA (A1 A2) ...)) | ::: (FUNCTION (LAMBDA (A1 A2) ...)) | ||
:* list : テストするリスト。 | :* list : テストするリスト。 | ||
; 戻り値 | ; 戻り値 | ||
| 21行目: | 24行目: | ||
; サンプル | ; サンプル | ||
: (remove-if-not 'vl-symbolp (list pi t 0 "abc")) | <pre class="brush:autolisp;"> | ||
(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) | |||
</pre> | |||
----- | ----- | ||
2015年12月11日 (金) 14:45時点における最新版
- 構文
- (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)
関連事項
- vl-remove-if-not （VisualLisp関数）