function varargout=_gcf(varargin)

varargout(1)=mlist(['pltlibH','handle'],get('current_figure'));

endfunction
