unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
blob 5123c176bbedb3a9a7f748acf145bf71423c9470 640 bytes (raw)
name: gnu/packages/patches/maxima-matrixexp.patch 	 # note: path name is non-authoritative(*)

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
 
Taken from sagemath 9.8

diff --git a/share/linearalgebra/matrixexp.lisp b/share/linearalgebra/matrixexp.lisp
index 218bf35..f2fd468 100644
--- a/share/linearalgebra/matrixexp.lisp
+++ b/share/linearalgebra/matrixexp.lisp
@@ -138,8 +138,8 @@
 	   (print `(ratvars = ,$ratvars gcd = '$gcd algebraic = ,$algebraic))
 	   (print `(ratfac = ,$ratfac))
 	   (merror "Unable to find the spectrum")))
-   
-    (setq res ($fullratsimp (ncpower (sub (mult z ($ident n)) mat) -1) z))
+
+    (setq res ($fullratsimp ($invert_by_lu (sub (mult z ($ident n)) mat) '$crering) z))
     (setq m (length sp))
     (dotimes (i m)
       (setq zi (nth i sp))

debug log:

solving 5123c176bb ...
found 5123c176bb in https://yhetil.org/guix-patches/9d296c6fb9a698883b4bed351def073c51f4e33d.1685391448.git.guix@ikherbers.com/

applying [1/1] https://yhetil.org/guix-patches/9d296c6fb9a698883b4bed351def073c51f4e33d.1685391448.git.guix@ikherbers.com/
diff --git a/gnu/packages/patches/maxima-matrixexp.patch b/gnu/packages/patches/maxima-matrixexp.patch
new file mode 100644
index 0000000000..5123c176bb

1:14: space before tab in indent.
 	   (print `(ratvars = ,$ratvars gcd = '$gcd algebraic = ,$algebraic))
1:15: space before tab in indent.
 	   (print `(ratfac = ,$ratfac))
1:16: space before tab in indent.
 	   (merror "Unable to find the spectrum")))
1:17: trailing whitespace.
-   
Checking patch gnu/packages/patches/maxima-matrixexp.patch...
Applied patch gnu/packages/patches/maxima-matrixexp.patch cleanly.
warning: 4 lines add whitespace errors.

index at:
100644 5123c176bbedb3a9a7f748acf145bf71423c9470	gnu/packages/patches/maxima-matrixexp.patch

(*) Git path names are given by the tree(s) the blob belongs to.
    Blobs themselves have no identifier aside from the hash of its contents.^

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).