Mercurial > repos > public > sbplib

comparison minors.m @ 427:a613960a157b feature/quantumTriangles

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merged with feature/beams
author Ylva Rydin <ylva.rydin@telia.com>
date Thu, 26 Jan 2017 15:59:25 +0100
parents eaf557023fbe
children
comparison
equal deleted inserted replaced
426:29944ea7674b 427:a613960a157b
1 function [minor, sub] = minors(A) 1 function [minor, sub] = minors(A, verbose)
2 default_arg('verbose', true);
2 [n, m] = size(A); 3 [n, m] = size(A);
3 4
4 if n ~= m 5 if n ~= m
5 error('A must be square'); 6 error('A must be square');
6 end 7 end
16 sub{end + 1} = A(C(i,:),C(i,:)); 17 sub{end + 1} = A(C(i,:),C(i,:));
17 end 18 end
18 end 19 end
19 20
20 for i = 1:length(sub) 21 for i = 1:length(sub)
21 fprintf('%d:\n', ks{i}); 22 if verbose
22 disp(sub{i}) 23 fprintf('%d:\n', ks{i});
24 disp(sub{i})
25 end
23 26
24 minor(i) = det(sub{i}); 27 minor(i) = det(sub{i});
25 end 28 end
26 end 29 end
27 30