chengx2000
发表于 2011-7-4 21:42:02
回复 198526 的帖子
请问大侠能不能具体说一说vl-sort的用法啊,我调试了一番,但是还是不知道这个函数的具体判断流程。
198526
发表于 2011-7-5 13:29:55
你是说
(setq a '((3 5 0)(3 5 0)(3 5 1)(3 2 4)(3 2 4)(3 2 3)(4 2 1)(4 2 1) (4 2 2) (6 4 3)))
(vl-sort (listxx a)
(function (lambda (e1 e2)
(cond ((/= (car e1) (car e2))(< (car e1) (car e2)))
((/= (cadr e1) (cadr e2))(< (cadr e1) (cadr e2)) )
((< (caddr e1) (caddr e2)) )
) ))
)
不能理解?
我想问你一下,有没有达到你的目的