function xax=xaxis(x)
% set x axis to span given range
ax=axis;
if nargin==0,
	xax=ax(1:2);
else
	axis([x(1) x(end) ax(3) ax(4)]);
end

