function [out1,out2]=ssort(a,b)
%SSORT Selection sort data in ascending order
%Function SSORT sorts a numeric data set into
nvals=size(a,2);
for ii=1:nvals-1
iptr=ii;
for jj=ii+1:nvals
if a(jj)<a(iptr)
iptr=jj;
end
end
if ii~=iptr
temp=a(ii);
a(ii)=a(iptr);
a(iptr)=temp;
temp2=b(ii);
b(ii)=b(iptr);
b(iptr)=temp2;
end
end
out1=a;
out2=b;
nvals=input('Enter number of values to sort:');
array1=zeros(1,nvals);
array2=zeros(1,nvals);
for ii=1:nvals
string=['Enter values ' int2str(ii) ':'];
array1(ii)=input(string);
end
for jj=1:nvals
string=['Enter values' int2str(jj) ':'];
array2(jj)=input(string);
end
[sorted1,sorted2]=ssort(array1,array2);
fprintf('\nSorted1 data :\n');
for ii=1:nvals
fprintf(' %8.4f\n',sorted1(ii));
end
fprintf('\nSorted2 data :\n');
for ii=1:nvals
fprintf(' %8.4f\n',sorted2(ii));
end
