about summary refs log tree commit diff
path: root/users/wpcarro/emacs/.emacs.d/wpc/math.el
diff options
context:
space:
mode:
Diffstat (limited to 'users/wpcarro/emacs/.emacs.d/wpc/math.el')
-rw-r--r--users/wpcarro/emacs/.emacs.d/wpc/math.el9
1 files changed, 5 insertions, 4 deletions
diff --git a/users/wpcarro/emacs/.emacs.d/wpc/math.el b/users/wpcarro/emacs/.emacs.d/wpc/math.el
index 4013ce3be2..dbc527928a 100644
--- a/users/wpcarro/emacs/.emacs.d/wpc/math.el
+++ b/users/wpcarro/emacs/.emacs.d/wpc/math.el
@@ -13,6 +13,7 @@
 ;; Dependencies
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
+(require 'dash)
 (require 'maybe)
 (require 'cl-lib)
 
@@ -31,13 +32,13 @@
 ;; Int -> Int -> Int -> Boolean
 (cl-defun math-triangle-of-power (&key base power result)
   (cond
-   ((maybe-somes? base power result)
+   ((-all? #'maybe-some? (list base power result))
     (error "All three arguments should not be set"))
-   ((maybe-somes? power result)
+   ((-all? #'maybe-some? (list power result))
     (message "power and result"))
-   ((maybe-somes? base result)
+   ((-all? #'maybe-some? (list base result))
     (log result base))
-   ((maybe-somes? base power)
+   ((-all? #'maybe-some? (list base power))
     (expt base power))
    (t
     (error "Two of the three arguments must be set"))))