1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
// Test file for "Column" function for the data types double, float, double complex, string , uint16.
// All the below statements are added to initialize variables in different data types
//The function written doesn't work for string or character scalar as of now.
function test_wiener()
disp(" ** WIENER ** ")
disp('Double')
y=[1 2 ; 3 4]
x0=[1 4; 3 6 ]
p0=[4 1 ; 27 8]
f=[22 0;1 3]
g= [10.1 2 ; 3 42]
h=[ 5 23 ;2 1]
q= [2 3 ; 12 3]
rr= [ 21 2 ; 100 91]
[xs,ps,xf,pf]= wiener(y,x0,p0,f,g,h,q,rr)
//disp(x1)
//disp(p1)
//disp(x)
//disp(p)
endfunction
|