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,6 +134,7 @@
((comp println #(pretty-matrix % add-bar)) m) ((comp println #(pretty-matrix % add-bar)) m)
m)) m))
;; repl commands
(defn swap [n m] #(swap-rows % n m)) (defn swap [n m] #(swap-rows % n m))
(defn add [from to] #(add-rows % from to)) (defn add [from to] #(add-rows % from to))
(defn add-mul [n from to] #(add-rows-with-mul % n from to)) (defn add-mul [n from to] #(add-rows-with-mul % n from to))