summaryrefslogtreecommitdiff
path: root/2.3-1/demos/Abhinav_Demos/test_faurre.sci
blob: 4c32354b4b0fa4a8b42646d91bf5897e2255824e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
// 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_faurre()	
	disp(" ** faurre ** ")
	disp('Double')
	n=3
	H= [ 2 1 1 ; 12 3 7; 5 1 2 ]
	F=[ 0 2 21 ; 2 5.1 1; 5 6 1]
	G=[ 1 2 21 ; 3 20 6; 5 6 7 ]
	R0=[6 7 2; 51 1 2; 1 2 3]
	[P R T]= faurre(n,H,F,G,R0)
	disp(P)
	disp('')
	disp(R)
	disp('')
	disp(T) 
	disp('')  
	
endfunction