Gz:assocd

提供:GizmoLabs - だいたい CAD LISP なサイト
2020年8月29日 (土) 09:13時点におけるGizmon (トーク | 投稿記録)による版 (ページの作成:「{{AutoLISP}} ; 構文 : (gz:assocd ''element'' ''alist'') ; 機能 : 連想リストの要素を検索し、指定された要素が含まれる連想リスト項目…」)
(差分) ← 古い版 | 最新版 (差分) | 新しい版 → (差分)
構文
(gz:assocd element alist)


機能
連想リストの要素を検索し、指定された要素が含まれる連想リスト項目の cdr を返す。


引数
  • element : 連想リストの要素のキー。
  • alist : 検索対象の連想リスト。


戻り値
成功した場合は、alist の cdr 項目。
キーである element が alist 内に見つからなかった場合は、nil を返す。


サンプル
 (setq al '((name box) (width 3) (size 4.7263) (depth 5))) 
 ((NAME BOX) (WIDTH 3) (SIZE 4.7263) (DEPTH 5))
 (assocd 'size al) 
 (4.7263)

 (assoc 'weight al) 
 nil

 (setq bigl '((a b c)(d)(e f g)))
 (gz:assocd 'e bigl)
 (F G)

 (setq elist (entget (car (entsel "図形選択:"))))
 (princ (strcat "\n選択図形は、" (gz:assocd 0 elist))))
 選択図形は、*選んだ図形タイプ名*

関連項目