From fc441a4bb98add59d111aae4de21f508d8fe38ee Mon Sep 17 00:00:00 2001
From: Daniel Santos <dacs.git@brilhante.top>
Date: Wed, 11 Jan 2023 16:43:32 +0000
Subject: plus-earth returns a number

---
 cl-math.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/cl-math.lisp b/cl-math.lisp
index b0272db..da572de 100644
--- a/cl-math.lisp
+++ b/cl-math.lisp
@@ -87,4 +87,4 @@
 
 (defun plus-earth (&rest args)
   "Give earthal numbers, it returns it's sum."
-  (nth-value 0 (implode (reduce (lambda (a b) (plus '(|1| |2| |3| |4| |5|) a b)) args))))
+  (symbol-to-number (nth-value 0 (implode (reduce (lambda (a b) (plus '(|1| |2| |3| |4| |5|) a b)) args)))))
-- 
cgit 1.4.1-2-gfad0