diff options
Diffstat (limited to 'plus-inc.lisp')
| -rw-r--r-- | plus-inc.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/plus-inc.lisp b/plus-inc.lisp index dbad909..cd12ce0 100644 --- a/plus-inc.lisp +++ b/plus-inc.lisp @@ -74,8 +74,8 @@ (t (plus-args-list numerals (next-list-number numerals a) (previous-list-number numerals b))))) (defun plus (numerals a b) - "Given a list of a numeral system and 2 numbers, it returns the list of it's sum." - (may-reverse (plus-args-list numerals (may-reverse (explode a)) (may-reverse (explode b))))) + "Given a list of a numeral system and 2 lists of symbols, it returns the list of it's sum." + (may-reverse (plus-args-list numerals (may-reverse a) (may-reverse b)))) (defun plus-decimal (&rest args) "Given decimal numbers, it returns the symbol it's sum." |