function [x,y]=gpos0(h)

%[xy]=get(h,'CurrentPoint');

[xyf]=get(gca,'CurrentPoint');

%disp(xyf)
set(h	,'WindowButtonDownFcn','gpos1(h,a,f1,F1,L,x,y,u,v,a2);');
set(h	,'WindowButtonMotionFcn','gpos0(h);')

%xlabel(num2str(xy))
%title(num2str(xyf))
