% A script that demonstrates the use of save and load 
% and compares the accuracy of the ascii with the raw versions

A = rand(5);
save('Arand.mat','A')
save('Arandascii','A','-ascii');
B = A*A';
A=0;
load('Arand.mat');
C = A*A';
fprintf('Error in raw  version %e\n',norm(B-C));
A=0;
A = load('Arandascii');
D = A*A';
fprintf('Error in ascii version %e\n',norm(B-D));
