summaryrefslogtreecommitdiff
path: root/demos/Abhinav_Demos/test_wiener.sci
blob: 780e95713e421dd367b37e93fb2bb4a32b1fc7e5 (plain)
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