blob: 84e42d4712fde3abf8ef6841fefbd9afd5edba29 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
function b = polystab(a)
//This function stabilizes the polynomial transfer function.
//Calling Sequence
//b = polystab(a)
//Parameters
//a:
//Description
//This is an Octave function.
//This function stabilizes the polynomial transfer function by replacing all roots outside the unit circle with their reflection inside the unit circle.
//Examples
//polystab([1,3,5])
//ans =
// 1. 0.6 0.2
funcprot(0);
rhs = argn(2)
if(rhs~=1)
error("Wrong number of input arguments.")
end
b = callOctave("polystab",a)
endfunction
|