function [amin,amax] = showwidth(x,y)
% quick calculation of the width for good plot scaling basically this
% script gives you the point on the left and right of the plot where the
% data is the variable mf (times the maximum value)
mf = 0.01*max(y);
for i = 1:length(y)
if y(i)>mf
#amin = x(i);
amin = i;
break;
endif
endfor
for j = length(y):-1:1
if y(j)>mf
#amax = x(j);
amax = j;
break;
endif
endfor
endfunction