function ed_toggl

%   Copyright 2003
%   Centre for Nonlinear Dynamics in Physiology and Medicine

%obj = gco;
%obj=get(gcf,'currentobject');

figure(gcf);
cmap = [0 0 0; 1 1 1];
colormap(cmap);
caxis([1 2]);

x=colormap;

c = get(gco, 'cdata');
c = ~(c - 1) + 1;
set(gco, 'cdata',c);
rc = get(gco, 'user');
rc(3) = c - 1;
set(gco, 'user', rc);
set(gco,'facecolor',x(c,:),'edgecolor',[0 0 0]);




