Greetings! nset.lisp: (defun $num_distinct_partitions (n &optional lst) (cond ((eq n 0) 1) ... Shouldn't that be eql, or equal? Take care, -- Camm Maguire camm at maguirefamily.org ========================================================================== "The earth is but one country, and mankind its citizens." -- Baha'u'llah