求助，表的问题。

wujin · 发表于 2003-6-22 13:36:00

我把所有文字组合成一个表aa(如：aa=("5.00A55.00" "5.00A55.00 A (=)")这样的点对.       该如何判断:如果另一个表b里面有这个点对就把表aa里面相同的点对("5.00A55.00" "5.00A55.00 A (=)")点对取消，没有值的话添加这个值到另一个表b。
我用member做判断时调试失败，提示--------函数错误: ("5.00A55.00" "5.00A55.00 A (=)")
      (setq eee (car aa)
      (if
         (not (member eee
               b
               )
                        (setq b (append b (list eee)))
         )

陈伯雄 · 发表于 2003-6-22 13:48:00

(SetQ a '("5.00A55.00" "5.00A55.00 A (=)")
   b '("5.00A55.00" "234")
   c '("123" "345")
)
(setq eee (car a))
(SetQ key1 (member eee b)
   key2 (member eee c)
)
(PrinC "\nKey1=")(PrinC key1)
(PrinC "\nKey2=")(PrinC key2)
(PrinC)
结果：
Key1=(5.00A55.00 234)
Key2=nil

求助，表的问题。

发表回复

精选推荐