ad_file = input ('corr filename (without .out): ', 's');
eval(['load ' ad_file '.out;']);
eval(['a = ' ad_file ';']);
o = gcf;
h = figure;
clf;
plot(a(:,1), a(:,2)/a(1,2), '-');
input ('Is this the one? (if not press Ctrl-c): ');
close(h);
figure(o);
hold on;
plot(a(:,1), a(:,2)/a(1,2), '-.');
