Public feed #2048266

Unnamed

public text v1 · immutable
Raw Edit
·published 2011-04-19 14:15 UTC
rendered paste body
 (defun mimember (x l) 
                  (cond (NULL x) NIL)  
                       (equal (x l) (cons (first l) (mimember(rest l)
                       (T (mimember (x rest l)))
)
)
)
)