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 |
|
---|
15 | load monde.mat
|
---|
16 |
|
---|
17 |
|
---|
18 | % trace fond de carte continents
|
---|
19 | [nll,ncc]=size(npconti);
|
---|
20 | aa=1;
|
---|
21 | bb=0;
|
---|
22 | hold on;
|
---|
23 | for 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);
|
---|
29 | end
|
---|
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.