% Ce programme trace les contours des continents et les frontieres
% A appeler à la fin de votre programme
% Ajuster la fenetre spatiale au besoin avec la
%  fonction AXIS([longmin longmax latmin latmax])
%
% Ex :
%    ............ (début de votre programme)
%    cartemonde
%    axis ([40 100 0 50])
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% chargement fond carte
% (contenu : conti, npconti, fronti, npfronti)

load monde.mat


% trace fond de carte continents
[nll,ncc]=size(npconti);
aa=1;
bb=0;
hold on;
for qi=1:nll,
  aa=aa+bb;
  cc=npconti(qi)+(aa-1);
       cco=plot (conti(aa:cc,1),conti(aa:cc,2),'k');
       set (cco,'LineWidth',1);          % default=0.5;
  bb=npconti(qi);
end

 % tracage des frontieres
 %[nnl,nnc]=size(npfronti);
 %aa=1;
 %bb=0;
 %hold on;
 %for iii=1:nnl,
 %  aa=aa+bb;
 %  cc=npfronti(iii)+(aa-1);
 %       gg=plot (fronti(aa:cc,1),fronti(aa:cc,2),'k-.');
 %       set (gg,'LineWidth',0.4)
 %  bb=npfronti(iii);
 %end