source: trunk/src/mode_sahelien/cartemonde.m @ 10

Last change on this file since 10 was 10, checked in by pinsard, 16 years ago

first commit with original work of Sebastien Gervois

File size: 1.0 KB
Line 
1% Ce programme trace les contours des continents et les frontieres
2% A appeler à la fin de votre programme
3% Ajuster la fenetre spatiale au besoin avec la
4%  fonction AXIS([longmin longmax latmin latmax])
5%
6% Ex :
7%    ............ (début de votre programme)
8%    cartemonde
9%    axis ([40 100 0 50])
10%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
11
12% chargement fond carte
13% (contenu : conti, npconti, fronti, npfronti)
14
15load monde.mat
16
17
18% trace fond de carte continents
19[nll,ncc]=size(npconti);
20aa=1;
21bb=0;
22hold on;
23for qi=1:nll,
24  aa=aa+bb;
25  cc=npconti(qi)+(aa-1);
26       cco=plot (conti(aa:cc,1),conti(aa:cc,2),'k');
27       set (cco,'LineWidth',1);          % default=0.5;
28  bb=npconti(qi);
29end
30
31 % tracage des frontieres
32 %[nnl,nnc]=size(npfronti);
33 %aa=1;
34 %bb=0;
35 %hold on;
36 %for iii=1:nnl,
37 %  aa=aa+bb;
38 %  cc=npfronti(iii)+(aa-1);
39 %       gg=plot (fronti(aa:cc,1),fronti(aa:cc,2),'k-.');
40 %       set (gg,'LineWidth',0.4)
41 %  bb=npfronti(iii);
42 %end
43
Note: See TracBrowser for help on using the repository browser.