function dummy = MatBench;
disp('')
disp('')
disp('')
disp('=======================================================')
disp('')

[v, d] = version;
disp( ' MatrixBenchmark test of Matlab')
disp([ ' Version : ' v  '  ' d]);
disp( ' Dell Precision 620, Pentium III Xeon, 800MHz, 640MB ram')
disp( ' Windows 2000  SP4')
disp( ' BLAS Kernel : Intel mkl_p3.dll ??')
disp( ' Written by Derek O''Connor, Dec 2004, Jan 2005')
disp( ' derekroconnor@eircom.net')
disp('')
disp( [' Run Date : ' date])
disp('=======================================================')
disp('') 
clear all;
n = input('Enter Matrix size: ');

A = 2.0*rand(n,n);  

format short;
%
%  Warmup : load dlls ??
%
 A = A*A;
 
%------------- Start Tests -------------------------------------
tic; 
A*A; 
totalT =0.0;
t1 = toc; totalT = totalT + t1;
	disp(['Multiply   ' num2str(t1)  'secs  '  num2str(n*n*n/(t1*1.0e6)) ' MFlops'])
    
tic;
[L,U,P] = lu(A);
t2 = toc; totalT = totalT + t2;
disp(['LUP Decomp ' num2str(t2) ' secs'])

tic;
inv(A);	
t3 = toc; totalT = totalT + t3;
disp(['Inv(A)     ' num2str(t3) ' secs'])

tic;
[U,S,V] = svd(A);
t4 = toc; totalT = totalT + t4;
disp(['SVD        ' num2str(t4) ' secs'])

tic;
[Q,R,P] = qr(A);
t5 = toc; totalT = totalT + t5;
disp(['QR  Decomp ' num2str(t5) ' secs'])

tic;
[v,d] = eig(A);	
t6 = toc; totalT = totalT + t6;
disp(['Eigen      ' num2str(t6) ' secs'])

tic;
d = det(A);	
t7 = toc; totalT = totalT + t7;
disp(['Det(A)     ' num2str(t7) ' secs'])

tic;
r = rank(A);
t8 = toc; totalT = totalT + t8;
disp(['Rank(A)    ' num2str(t8) ' secs'])

tic;
c = cond(A);
t9 = toc; totalT = totalT + t9;
disp(['Cond(A)    ' num2str(t9) ' secs'])

disp('--------------------------------------------');

disp(['Total Time ' num2str(totalT) ' secs']);
disp(' ');disp(' ');


disp('===============Finished SimpleBench ==================')