line up repl commands

This commit is contained in:
mehbark 2023-01-13 15:01:14 -05:00
parent 54b9f3bfed
commit e500d7bd5a

View file

@ -134,10 +134,11 @@
((comp println #(pretty-matrix % add-bar)) m)
m))
(defn swap [n m] #(swap-rows % n m))
(defn add [from to] #(add-rows % from to))
;; repl commands
(defn swap [n m] #(swap-rows % n m))
(defn add [from to] #(add-rows % from to))
(defn add-mul [n from to] #(add-rows-with-mul % n from to))
(defn mul [n at] #(mul-row % n at))
(defn mul [n at] #(mul-row % n at))
(defn apply-input
[m]