fprintf('Length of list: %d\n', length(S));

file_1 = fopen('output1.txt','w')
fprintf(file_1, 'Length of list: %d\n', length(S));
for o1 = 1:length(S),
	        lenf1 =  max (S{o1}(1,:)) -  min(S{o1}(1,:));

		axis equal;
		Z1 = S{o1};

		d1 = anti_similarity_distance (Z1', Z1');
		fprintf('\nComparing %s %d %d. \n', Snames{o1}, d1, lenf1);
		fprintf(file_1, '\nComparing %s %d %d.\n', Snames{o1}, d1, lenf1);
end
fclose(file_1);
