1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
{ setq a ( func (operand1 ...) { setq a operand1; while (!= nil _args_) { setq a (- a (car _args_)); setq _args_ (cdr _args_); }; return a; } ); a 5 1 1 1; }