Acet-list-isort

提供:GizmoLabs - だいたい CAD LISP なサイト
構文
(acet-list-isort lst index )


機能
lst をインデックスで並べ替えたリストを返す。


引数
  • lst … ソートするリスト。「サブリストのリスト」。
  • index … ソートする位置の整数。最初の項目は 0


戻り値
index 位置で更新されたリスト


サンプル
数値でソート
(setq lst (list '(1 2 5) '(2 1 4) '(3 4 3) '(4 3 2) '(5 5 1)))

(acet-list-isort lst 0)
((1 2 5) (2 1 4) (3 4 3) (4 3 2) (5 5 1))

(acet-list-isort lst 1)
((2 1 4) (1 2 5) (4 3 2) (3 4 3) (5 5 1))

(acet-list-isort lst 2)
((5 5 1) (4 3 2) (3 4 3) (2 1 4) (1 2 5))


; 文字でソート
(setq lst (list '("a" 2 5) '("b" 1 4) '("d" 4 3) '("x" 3 2) '("q" 5 1)))
(acet-list-isort lst 0)
(("a" 2 5) ("b" 1 4) ("d" 4 3) ("q" 5 1) ("x" 3 2))

(setq lst (list '("あ" 2 5) '("が" 1 4) '("さ" 4 3) '("ん" 3 2) '("ご" 5 1)))
(acet-list-isort lst 0)
(("あ" 2 5) ("が" 1 4) ("ご" 5 1) ("さ" 4 3) ("ん" 3 2))


関連事項