Mercurial > octave-nkf

changeset 9843:71483d19204f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix krylov
author Lukas Reichlin <lukas.reichlin@swissonline.ch>
date Fri, 20 Nov 2009 10:14:35 +0100
parents 10519b4d6507
children edf065b51fa9
files scripts/ChangeLog scripts/linear-algebra/krylov.m
diffstat 2 files changed, 12 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog	Fri Nov 20 08:19:42 2009 +0100
+++ b/scripts/ChangeLog	Fri Nov 20 10:14:35 2009 +0100
@@ -1,3 +1,7 @@
+2009-11-20  Lukas Reichlin <lukas.reichlin@swissonline.ch>
+
+	* linear-algebra/krylov.m: Add missing swap routine.
+
 2009-11-20  Jaroslav Hajek  <highegg@gmail.com>
 
 	* general/__isequal__.m: Check for isnumeric|islogical.
--- a/scripts/linear-algebra/krylov.m	Fri Nov 20 08:19:42 2009 +0100
+++ b/scripts/linear-algebra/krylov.m	Fri Nov 20 10:14:35 2009 +0100
@@ -237,3 +237,11 @@
   endif
 
 endfunction
+
+
+function [a1, b1] = swap (a, b)
+
+  a1 = b;
+  b1 = a;
+
+endfunction