1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
try
load test_write_sparse_complex.mat
expdata = zeros(5,10);
expdata(1:4:end,1:2:end) = 1;
expdata(2:4,2:2:end) = 1;
expdata = expdata.*reshape((1:50) + j*(51:100),5,10);
pass = true;
pass = pass && isa(sparse_matrix,class(expdata));
pass = pass && issparse(sparse_matrix);
pass = pass && all(size(sparse_matrix)==size(expdata));
pass = pass && all(sparse_matrix(:)==expdata(:));
catch me
pass = false;
end
if pass
fprintf('PASSED\n');
else
fprintf('FAILED\n');
end
exit;
|
