function main(ctlFile, cmpFile, samples, titleName)
%MAIN Summary of this function goes here
%   Detailed explanation goes here
disp(['Collecting', ctlFile])
[~, ~, ctlData] = xlsread(ctlFile,1);
ctlData(1,:) = [];
disp(['Collecting', cmpFile])
[~, ~, cmpData] = xlsread(cmpFile,1);
cmpData(1,:) = [];

disp('Calculating')
error = dataHandler(ctlData,cmpData,samples);

disp('Ploting')
i=1:samples;
plot(i,error(:,1),i,error(:,2));
title(titleName);
legend('arccos', 'sum of squares');
avgSST = sum(error(:,2))/samples;
avgACR = sum(error(:,1))/samples;
txt = ['Average sum of squares error = ' num2str(avgSST) ...
    char newline 'Average arccos error = ' num2str(avgACR)];
text(500, 140, txt)
end