请教很简单的问题从一组数中选一个与已知数比较

流_星

（= 5 （5，6，7））返回T如何修改谢谢大家

mmmmmm

参考member函数

流_星

这只是返回第一组数以后得都返回加啥命令呢

山人就是画坑的

2. ;;;判断item是否在列表内
   
3. ;;;item 原子类型
   
4. ;;;lst 列表
   
5. ;;;在列表内 t，不在 nil
   
6. (defun vic-inlst (item lst / tmp)
   
7.         (if (setq tmp (car lst))
   
8.                 (if (atom tmp)
   
9.                         (or (= item (car lst)) (vic-inlst item (cdr lst)))
   
10.                         (vic-inlst item tmp)
    
11.                 )
    
12.         )
    
13. )

;;;判断item是否在列表内<br /> ;;;item 原子类型<br /> ;;;lst 列表<br /> ;;;在列表内 t，不在 nil<br /> (defun vic-inlst (item lst / tmp)<br />         (if (setq tmp (car lst))<br />                 (if (atom tmp)<br />                         (or (= item (car lst)) (vic-inlst item (cdr lst)))<br />                         (vic-inlst item tmp)<br />                 )<br />         )<br /> )

流_星

手机上的不好复制不好意思

cable2004

(apply 'or (mapcar ' lambda (x) (equal 5 x)) (list 5 6 7)))

流_星

（setq dw 200）
(if （= dw (180，200，300，350)）(setq dw(+ dw 50))）

流_星

大神们如何修改急用