function  wrlddemo

%WRLDDEMO  Demo:  Display of a world map and an associated query
%
%  Synposis:     wrlddemo

%  Copyright 1996-1998 by Systems Planning and Analysis, Inc. and The MathWorks, Inc.
% $Revision: 1.7 $
%  Written by:  E. Byrns, E. Brown


load worldmtx
figure;
axesm robinson;  colormap(clrmap)
meshm(map,maplegend);

% disable uimaptbx interactions in demos

huimaptbx = findobj(gcf,'buttondownfcn','uimaptbx'); 
set(huimaptbx,'buttondownfcn','')


qrydata(gca,'Data Query',...
            {'Country:','mapvector',map,maplegend,strvcat(nations(:).name)});
