summaryrefslogtreecommitdiff
path: root/2048/DEPENDENCIES/polsize.sci
blob: 7c0c8a463f5b6d084cdb8f6dcbf780620a39b5d6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
// function [rQ,cQ] = polsize(Q,degQ)
// FUNCTION polsize TO DETERMINE THE DIMENSIONS
// OF A POLYNOMIAL MATRIX
//
// H. Kwakernaak, August, 1990

function [rQ,cQ] = polsize(Q,degQ)

[rQ,cQ] = size(Q); cQ = cQ/(degQ+1);
if abs(round(cQ)-cQ) > 1e-6
   error('polsize: Degree of input inconsistent with number of columns');
else
   cQ = round(cQ);
end
endfunction