%   This odd "function" is to be left lying around as it is nominated by GnashPlot.m
%to be invoked when the plot's window is being resized. Its purpose is to specify
%smaller borders on plots, because matlab's default arrangements are profligate.
%The fiddles are odd and the context unclear, but it is better than nothing.
%   Concocted by R.N.McLean (whom God preserve), April MMX.

function GnashPlotReSqueeze
 lines = 1;	%This should be a parameter, as to whether xlabel has been invoked.
 set(gcf,'Units','points'); hf = get(gcf,'Position');
 set(gca,'Units','points'); %ha = get(gca,'Position');
 xbase = 16*lines;		%The x-axis base position.
 xtop = hf(4) - xbase - 20;	%The x-axis top, up from the x-axis base level.
 set(gca,'Position',[40 xbase (hf(3) - 66) xtop]);	%[lmargin ybase rmargin +ytop].
%END;
