]> ruderich.org/simon Gitweb - config/dotfiles.git/commitdiff
maxima/maxima-init.mac: Add. Define norm_2().
authorSimon Ruderich <simon@ruderich.org>
Sat, 28 May 2011 21:07:35 +0000 (23:07 +0200)
committerSimon Ruderich <simon@ruderich.org>
Sat, 28 May 2011 21:07:35 +0000 (23:07 +0200)
maxima/maxima-init.lisp
maxima/maxima-init.mac [new file with mode: 0644]

index ec1dcf06cdd9c6da54d064bdd6532592670e7a2d..82b90d4496872321f6d4b97fa21b9fb0064d88ec 100644 (file)
@@ -1,4 +1,6 @@
 ; Maxima (computer algebra system) configuration file, lisp part.
 ; Maxima (computer algebra system) configuration file, lisp part.
+;
+; Also have a look at maxima/maxima-init.mac.
 
 
 ; Set directory for temporary files to ~/.maxima (used for plotting for
 
 
 ; Set directory for temporary files to ~/.maxima (used for plotting for
diff --git a/maxima/maxima-init.mac b/maxima/maxima-init.mac
new file mode 100644 (file)
index 0000000..438989f
--- /dev/null
@@ -0,0 +1,20 @@
+/*
+ * Maxima (computer algebra system) configuration file, maxima part.
+ *
+ * Also have a look at maxima/maxima-init.mac.
+ */
+
+
+/* PACKAGES */
+
+/* Provides maxi() and mini() (and more). */
+load (descriptive);
+
+
+/* CUSTOM FUNCTIONS */
+
+/* Maxima's norm() can't calculate the 2-norm. Only works for non-complex
+ * matrices. */
+norm_2(x) := sqrt(maxi(eigenvalues(transpose(x) . x)[1]));
+
+/* vim: ft=maxima */