Mercurial > repos > public > sbplib

diff minors.m @ 886:8894e9c49e40 feature/timesteppers

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge with default for latest changes
author Vidar Stiernström <vidar.stiernstrom@it.uu.se>
date Thu, 15 Nov 2018 16:36:21 -0800
parents eaf557023fbe
children
line wrap: on
line diff
--- a/minors.m	Mon Sep 10 16:19:16 2018 +0200
+++ b/minors.m	Thu Nov 15 16:36:21 2018 -0800
@@ -1,4 +1,5 @@
-function [minor, sub] = minors(A)
+function [minor, sub] = minors(A, verbose)
+    default_arg('verbose', true);
     [n, m] = size(A);
 
     if n ~= m
@@ -18,8 +19,10 @@
     end
 
     for i = 1:length(sub)
-        fprintf('%d:\n', ks{i});
-        disp(sub{i})
+        if verbose
+            fprintf('%d:\n', ks{i});
+            disp(sub{i})
+        end
 
         minor(i) = det(sub{i});
     end