function checkuncheck(tog,item)
%CHECKUNCHECK Check or uncheck a menu item
%
%	CHECKUNCHECK(TOG,ITEM)
%
%       if the value of TOG is 1, check the menu item
%	if the value of TOG is 0, uncheck the menu item
%
%	M. Young 6 February, 1995
%

%
% Copyright (c) 1995 by Claudio Rivetti and Mark Young
% claudio@alice.uoregon.edu,    mark@alice.uoregon.edu
%

if get(tog,'value')==0
	set(item,'Checked','off');
else
	set(item,'Checked','on');
end
return