「Vle-cadrassoc」の版間の差分

提供:GizmoLabs - だいたい CAD LISP なサイト
(ページの作成:「{{AutoLISP}} ; 構文 : (vle-cadrassoc ''key'' ''lst'') ; 機能 : ドットペアリスト lst から key を持つドットペアの値の(cadr)を返す。 ; 引…」)
 
編集の要約なし
 
(同じ利用者による、間の1版が非表示)
1行目: 1行目:
{{AutoLISP}}
{{BCAD_LISP}}
; 構文
; 構文
: (vle-cadrassoc ''key'' ''lst'')  
: (vle-cadrassoc ''key'' ''lst'')  
18行目: 18行目:




* エンティティリストから値を取り出すのに便利
* 配列リストから座標リストなどの値を取り出すのに便利
* (cdr (assoc key lst)) を実行したのと同じ。
* (cadr (assoc key lst)) を実行したのと同じ。


エイリアス: [[vle-get-cdrassoc]]、[[vle-get-cassoc]]、[[vle-cassoc]]
エイリアス: [[vle-get-cadrassoc]]




47行目: 47行目:


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

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

構文
(vle-cadrassoc key lst)


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


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


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


  • 配列リストから座標リストなどの値を取り出すのに便利
  • (cadr (assoc key lst)) を実行したのと同じ。

エイリアス: vle-get-cadrassoc


サンプル

<syntaxhighlight lang="lisp" line> (vle-cadrassoc 11 '((1 (0 0 0)) (2 (1 1 1)) (11 (1 2 3)))) (1 2 3)

(vle-cadrassoc 4 '((1 (0 0 0)) (2 (1 1 1)) (11 (1 2 3)))) nil

(vle-cadrassoc 4 '((1 2 3) (2 3 4) (3 4 5))) nil

</syntaxhighlight>



関連事項