「Vle-cdrassoc」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
編集の要約なし
編集の要約なし
 
(同じ利用者による、間の5版が非表示)
1行目: 1行目:
{{AutoLISP}}
{{BCAD_LISP}}
; 構文
; 構文
: (vle-cdrassoc  ''key'' ''lst'')  
: (vle-cdrassoc  ''key'' ''lst'')  
21行目: 21行目:
* (cdr (assoc key lst)) を実行したのと同じ。
* (cdr (assoc key lst)) を実行したのと同じ。


* 関数エイリアス: vle-get-cdrassoc, vle-get-cassoc, vle-cassoc  
エイリアス: [[vle-get-cdrassoc]]、[[vle-get-cassoc]]、[[vle-cassoc]]
 


;サンプル
;サンプル
45行目: 46行目:
関連事項
関連事項
* [[VLE-関数]]
* [[VLE-関数]]
* [[accoc]]
* [[assoc]]
* [[cdr]]
* [[cdr]]




[[Category:AutoLISP]]
[[Category:AutoLISP]]
[[Category:BricsCADのLISP]]

2023年1月28日 (土) 07:48時点における最新版

構文
(vle-cdrassoc key lst)


機能
ドットペアリスト lst から key を持つドットペアの値を返す。


引数
  • key : 検索するドットペアのキー値。
  • lst : 検索されるドットペアリスト。


戻り値
'lst' のドットペア(key value)に key が存在する場合はその value値。
存在しない場合は nil。


  • エンティティリストから値を取り出すのに便利
  • (cdr (assoc key lst)) を実行したのと同じ。

エイリアス: vle-get-cdrassocvle-get-cassocvle-cassoc


サンプル

<syntaxhighlight lang="lisp" line> (vle-cdrassoc 11 '((1 . "a")(2 . "b")(11 . "xx")(22 . "yy"))) returns "xx"

(vle-cdrassoc 0 '((1 . "a")(2 . "b")(11 . "xx")(22 . "yy")))

nil

(vle-cdrassoc 22 '((1 . "a")(2 . "b")(11 . "xx")(22 . 123) (22 . 345))) 123

(vle-cdrassoc 0 '(1 2 3)) エラー

(vle-cassoc 11 '((1 . "a")(2 . "b")(11 . "xx")(22 . "yy"))) returns "xx" </syntaxhighlight>



関連事項