Changeset 16 for trunk/src/SIMULS_IRCAAM


Ignore:
Timestamp:
01/06/09 10:53:18 (16 years ago)
Author:
pinsard
Message:

remove trailing blanks, split lines with multiple statements

Location:
trunk/src/SIMULS_IRCAAM
Files:
81 edited

Legend:

Unmodified
Added
Removed

  • trunk/src/SIMULS_IRCAAM/anomalies_olr_AFR_1979_2000.m

    r15 r16  
     1% 
    12 
    23% ncload('rlut_d.AfNQIVIV.197106-09.nc') 
    … …  
    45% Name        Size                  Bytes  Class     Attributes 
    56% 
    6 % ans         1x4                     268  cell                 
    7 % lat        64x1                     512  double               
    8 % lon       128x1                    1024  double               
    9 % rlut      122x64x128            7995392  double               
    10 % time      122x1                     976  double               
     7% ans         1x4                     268  cell 
     8% lat        64x1                     512  double 
     9% lon       128x1                    1024  double 
     10% rlut      122x64x128            7995392  double 
     11% time      122x1                     976  double 
    1112% 
    1213 
    … …  
    112113olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    113114clear olr 
    114 olr=olr1; clear olr1; 
     115olr=olr1; 
     116clear olr1; 
    115117olr=olr(:,:,29:43,54:77); 
    116118taille=(43-29+1)*(77-54+1); 
    … …  
    118120% taille de OLR 
    119121% 122 30 15 24 
    120 olr1=olr(31:122,:,:,:); clear olr 
    121 olr(:,:,:)=mean(olr1); clear olr1; 
     122olr1=olr(31:122,:,:,:); 
     123clear olr 
     124olr(:,:,:)=mean(olr1); 
     125clear olr1; 
    122126moyenne_olr(:,:)=mean(olr); 
    123127olr_centre=zeros(30,15,24); 
    … …  
    130134end; 
    131135 
    132 figure(1); orient('landscape'); 
    133 figure(2); orient('landscape'); 
    134 lon=lon(54:77); lon=lon-180; 
    135 lat=lat(29:43); lat=lat'; 
     136figure(1); 
     137orient('landscape'); 
     138figure(2); 
     139orient('landscape'); 
     140lon=lon(54:77); 
     141lon=lon-180; 
     142lat=lat(29:43); 
     143lat=lat'; 
    136144for a=1:22; 
    137145     clear kara; 
    … …  
    139147     kara(:,:)=olr_centre(a+8,:,:); 
    140148     if a<13; 
    141          figure(1); subplot(3,4,a); 
     149         figure(1); 
     150         subplot(3,4,a); 
    142151     else 
    143          figure(2); subplot(3,4,a-12); 
     152         figure(2); 
     153         subplot(3,4,a-12); 
    144154     end 
    145155     for b=1:15; 
    … …  
    167177end; 
    168178 
    169 figure(1); print -depsc2 anomalies_OLR_1979_2000_simulAFR_part1.eps; 
    170 figure(2); print -depsc2 anomalies_OLR_1979_2000_simulAFR_part2.eps; 
     179figure(1); 
     180print -depsc2 anomalies_OLR_1979_2000_simulAFR_part1.eps; 
     181figure(2); 
     182print -depsc2 anomalies_OLR_1979_2000_simulAFR_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/carte_eof_AFR_annuel.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_annuel_AFR.mat; 
    … …  
    1315lat=lat(29:43)'; 
    1416 
    15 figure(1); orient('landscape'); 
     17figure(1); 
     18orient('landscape'); 
    1619subplot(3,2,1); 
    1720palette; 
    … …  
    3134colorbar; 
    3235title('EOF1 OLR AFR annuel','Fontsize',8); 
    33 hold on; cartemonde; 
     36hold on; 
     37cartemonde; 
    3438set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3539set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3640set (gca,'tickDir','out'); 
    37 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3841 
    39 clear carte1 x y a b carte coco;  
     42clear carte1 x y a b carte coco; 
    4043carte1=C(:,359); 
    4144carte=reshape(carte1,24,15); 
    … …  
    6265 
    6366title('EOF2 OLR AFR annuel','Fontsize',8); 
    64 hold on; cartemonde; 
     67hold on; 
     68cartemonde; 
    6569set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6670set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6771set (gca,'tickDir','out'); 
    6872 
    69 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7073clear carte1 x y a b carte coco; 
    7174carte1=C(:,358); 
    … …  
    9194colorbar; 
    9295title('EOF3 OLR AFR annuel','Fontsize',8); 
    93 hold on; cartemonde; 
     96hold on; 
     97cartemonde; 
    9498set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    9599set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    … …  
    98102 
    99103 
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101104clear carte1 x y a b carte coco; 
    102105carte1=C(:,357); 
    … …  
    122125colorbar; 
    123126title('EOF4 OLR AFR annuel','Fontsize',8); 
    124 hold on; cartemonde; 
     127hold on; 
     128cartemonde; 
    125129set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    126130set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    127131set (gca,'tickDir','out'); 
    128  
    129 %%%%%%%%%% 
    130132 
    131133subplot(3,2,4); 
    … …  
    142144 
    143145bar(x,vecteurs,'LineStyle','none') 
    144 axis([0.5 20.5 0 25]);  
     146axis([0.5 20.5 0 25]); 
    145147set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    146148set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 
    147149set (gca,'tickDir','out'); 
    148150 
    149  
    150  
    151  
    152  
    153151print -depsc2 resultats_eof_AFR_annuel.eps; 

  • trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_1030_ircaam.mat 
    … …  
    1315lat=lat(29:43)'; 
    1416 
    15 figure(1); orient('landscape'); 
     17figure(1); 
     18orient('landscape'); 
    1619subplot(3,2,1); 
    1720palette; 
    … …  
    3134colorbar; 
    3235title('OLR EOF1','Fontsize',8); 
    33 hold on; cartemonde; 
     36hold on; 
     37cartemonde; 
    3438set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3539set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3640set (gca,'tickDir','out'); 
    37 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3841 
    39 clear carte1 x y a b carte coco;  
     42clear carte1 x y a b carte coco; 
    4043carte1=C(:,359); 
    4144carte=reshape(carte1,24,15); 
    … …  
    6265 
    6366title('OLR EOF2','Fontsize',8); 
    64 hold on; cartemonde; 
     67hold on; 
     68cartemonde; 
    6569set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6670set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6771set (gca,'tickDir','out'); 
    6872 
    69 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7073clear carte1 x y a b carte coco; 
    7174carte1=C(:,358); 
    … …  
    9194colorbar; 
    9295title('OLR EOF3','Fontsize',8); 
    93 hold on; cartemonde; 
     96hold on; 
     97cartemonde; 
    9498set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    9599set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    96100set (gca,'tickDir','out'); 
    97101 
    98  
    99  
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101102clear carte1 x y a b carte coco; 
    102103carte1=C(:,357); 
    … …  
    122123colorbar; 
    123124title('OLR EOF4','Fontsize',8); 
    124 hold on; cartemonde; 
     125hold on; 
     126cartemonde; 
    125127set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    126128set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    127129set (gca,'tickDir','out'); 
    128  
    129 %%%%%%%%%% 
    130130 
    131131subplot(3,2,4); 
    … …  
    142142 
    143143bar(x,vecteurs,'LineStyle','none') 
    144 axis([0.5 20.5 0 25]);  
     144axis([0.5 20.5 0 25]); 
    145145set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    146146set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 
    147147set (gca,'tickDir','out'); 
    148148 
    149  
    150  
    151  
    152  
    153149print -depsc2 resultats_eof_jjas_2006_1030.eps; 

  • trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_as.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_1030_ircaam_as.mat 
    … …  
    1315lat=lat(29:43)'; 
    1416 
    15 figure(1); orient('landscape'); 
     17figure(1); 
     18orient('landscape'); 
    1619subplot(3,2,1); 
    1720palette; 
    … …  
    3134colorbar; 
    3235title('OLR EOF1','Fontsize',8); 
    33 hold on; cartemonde; 
     36hold on; 
     37cartemonde; 
    3438set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3539set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3640set (gca,'tickDir','out'); 
    37 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3841 
    39 clear carte1 x y a b carte coco;  
     42clear carte1 x y a b carte coco; 
    4043carte1=C(:,359); 
    4144carte=reshape(carte1,24,15); 
    … …  
    6265 
    6366title('OLR EOF2','Fontsize',8); 
    64 hold on; cartemonde; 
     67hold on; 
     68cartemonde; 
    6569set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6670set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6771set (gca,'tickDir','out'); 
    6872 
    69 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7073clear carte1 x y a b carte coco; 
    7174carte1=C(:,358); 
    … …  
    9194colorbar; 
    9295title('OLR EOF3','Fontsize',8); 
    93 hold on; cartemonde; 
     96hold on; 
     97cartemonde; 
    9498set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    9599set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    … …  
    98102 
    99103 
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101104clear carte1 x y a b carte coco; 
    102105carte1=C(:,357); 
    … …  
    122125colorbar; 
    123126title('OLR EOF4','Fontsize',8); 
    124 hold on; cartemonde; 
     127hold on; 
     128cartemonde; 
    125129set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    126130set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    127131set (gca,'tickDir','out'); 
    128  
    129 %%%%%%%%%% 
    130132 
    131133subplot(3,2,4); 
    … …  
    142144 
    143145bar(x,vecteurs,'LineStyle','none') 
    144 axis([0.5 20.5 0 25]);  
     146axis([0.5 20.5 0 25]); 
    145147set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    146148set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 

  • trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_ctl.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_1030_ircaam_ctl.mat 
    … …  
    1517lat=lat(29:43)'; 
    1618 
    17 figure(1); orient('landscape'); 
     19figure(1); 
     20orient('landscape'); 
    1821subplot(3,2,1); 
    1922palette; 
    … …  
    3336colorbar; 
    3437title('OLR EOF1','Fontsize',8); 
    35 hold on; cartemonde; 
     38hold on; 
     39cartemonde; 
    3640set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3741set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3842set (gca,'tickDir','out'); 
    39 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    4043 
    41 clear carte1 x y a b carte coco;  
     44clear carte1 x y a b carte coco; 
    4245carte1=C(:,359); 
    4346carte=reshape(carte1,24,15); 
    … …  
    6467 
    6568title('OLR EOF2','Fontsize',8); 
    66 hold on; cartemonde; 
     69hold on; 
     70cartemonde; 
    6771set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6872set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6973set (gca,'tickDir','out'); 
    7074 
    71 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7275clear carte1 x y a b carte coco; 
    7376carte1=C(:,358); 
    … …  
    9396colorbar; 
    9497title('OLR EOF3','Fontsize',8); 
    95 hold on; cartemonde; 
     98hold on; 
     99cartemonde; 
    96100set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    97101set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    … …  
    100104 
    101105 
    102 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    103106clear carte1 x y a b carte coco; 
    104107carte1=C(:,357); 
    … …  
    124127colorbar; 
    125128title('OLR EOF4','Fontsize',8); 
    126 hold on; cartemonde; 
     129hold on; 
     130cartemonde; 
    127131set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    128132set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    129133set (gca,'tickDir','out'); 
    130  
    131 %%%%%%%%%% 
    132134 
    133135subplot(3,2,4); 
    … …  
    144146 
    145147bar(x,vecteurs,'LineStyle','none') 
    146 axis([0.5 20.5 0 25]);  
     148axis([0.5 20.5 0 25]); 
    147149set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    148150set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 
    149151set (gca,'tickDir','out'); 
    150152 
    151  
    152  
    153  
    154  
    155153print -depsc2 eof_ircaam_1030_ctl.eps; 

  • trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_ctl_clim.m

    r15 r16  
     1% 
    12clear; 
    23load eof_1030_ircaam_ctl_clim.mat 
    … …  
    1516lat=lat(29:43)'; 
    1617 
    17 figure(1); orient('landscape'); 
     18figure(1); 
     19orient('landscape'); 
    1820subplot(3,2,1); 
    1921palette; 
    … …  
    3335colorbar; 
    3436title('OLR EOF1','Fontsize',8); 
    35 hold on; cartemonde; 
     37hold on; 
     38cartemonde; 
    3639set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3740set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3841set (gca,'tickDir','out'); 
    39 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    4042 
    41 clear carte1 x y a b carte coco;  
     43clear carte1 x y a b carte coco; 
    4244carte1=C(:,359); 
    4345carte=reshape(carte1,24,15); 
    … …  
    6466 
    6567title('OLR EOF2','Fontsize',8); 
    66 hold on; cartemonde; 
     68hold on; 
     69cartemonde; 
    6770set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6871set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6972set (gca,'tickDir','out'); 
    7073 
    71 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7274clear carte1 x y a b carte coco; 
    7375carte1=C(:,358); 
    … …  
    9395colorbar; 
    9496title('OLR EOF3','Fontsize',8); 
    95 hold on; cartemonde; 
     97hold on; 
     98cartemonde; 
    9699set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    97100set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    98101set (gca,'tickDir','out'); 
    99102 
    100  
    101  
    102 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    103103clear carte1 x y a b carte coco; 
    104104carte1=C(:,357); 
    … …  
    124124colorbar; 
    125125title('OLR EOF4','Fontsize',8); 
    126 hold on; cartemonde; 
     126hold on; 
     127cartemonde; 
    127128set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    128129set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    129130set (gca,'tickDir','out'); 
    130  
    131 %%%%%%%%%% 
    132131 
    133132subplot(3,2,4); 
    … …  
    144143 
    145144bar(x,vecteurs,'LineStyle','none') 
    146 axis([0.5 20.5 0 25]);  
     145axis([0.5 20.5 0 25]); 
    147146set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    148147set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 
    149148set (gca,'tickDir','out'); 
    150149 
    151  
    152  
    153  
    154  
    155150print -depsc2 eof_ircaam_1030_ctl_clim.eps; 

  • trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_tr.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_1030_ircaam_tr.mat 
    … …  
    1315lat=lat(29:43)'; 
    1416 
    15 figure(1); orient('landscape'); 
     17figure(1); 
     18orient('landscape'); 
    1619subplot(3,2,1); 
    1720palette; 
    … …  
    3134colorbar; 
    3235title('OLR EOF1','Fontsize',8); 
    33 hold on; cartemonde; 
     36hold on; 
     37cartemonde; 
    3438set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3539set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3640set (gca,'tickDir','out'); 
    37 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3841 
    39 clear carte1 x y a b carte coco;  
     42clear carte1 x y a b carte coco; 
    4043carte1=C(:,359); 
    4144carte=reshape(carte1,24,15); 
    … …  
    6265 
    6366title('OLR EOF2','Fontsize',8); 
    64 hold on; cartemonde; 
     67hold on; 
     68cartemonde; 
    6569set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6670set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6771set (gca,'tickDir','out'); 
    6872 
    69 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7073clear carte1 x y a b carte coco; 
    7174carte1=C(:,358); 
    … …  
    9194colorbar; 
    9295title('OLR EOF3','Fontsize',8); 
    93 hold on; cartemonde; 
     96hold on; 
     97cartemonde; 
    9498set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    9599set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    … …  
    98102 
    99103 
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101104clear carte1 x y a b carte coco; 
    102105carte1=C(:,357); 
    … …  
    122125colorbar; 
    123126title('OLR EOF4','Fontsize',8); 
    124 hold on; cartemonde; 
     127hold on; 
     128cartemonde; 
    125129set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    126130set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    127131set (gca,'tickDir','out'); 
    128  
    129 %%%%%%%%%% 
    130132 
    131133subplot(3,2,4); 
    … …  
    142144 
    143145bar(x,vecteurs,'LineStyle','none') 
    144 axis([0.5 20.5 0 25]);  
     146axis([0.5 20.5 0 25]); 
    145147set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    146148set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 

  • trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_30100_ircaam.mat 
    … …  
    1315lat=lat(29:43)'; 
    1416 
    15 figure(1); orient('landscape'); 
     17figure(1); 
     18orient('landscape'); 
    1619subplot(3,2,1); 
    1720palette; 
    … …  
    3134colorbar; 
    3235title('OLR EOF1','Fontsize',8); 
    33 hold on; cartemonde; 
     36hold on; 
     37cartemonde; 
    3438set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3539set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3640set (gca,'tickDir','out'); 
    37 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3841 
    39 clear carte1 x y a b carte coco;  
     42clear carte1 x y a b carte coco; 
    4043carte1=C(:,359); 
    4144carte=reshape(carte1,24,15); 
    … …  
    6265 
    6366title('OLR EOF2','Fontsize',8); 
    64 hold on; cartemonde; 
     67hold on; 
     68cartemonde; 
    6569set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6670set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6771set (gca,'tickDir','out'); 
    6872 
    69 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7073clear carte1 x y a b carte coco; 
    7174carte1=C(:,358); 
    … …  
    9194colorbar; 
    9295title('OLR EOF3','Fontsize',8); 
    93 hold on; cartemonde; 
     96hold on; 
     97cartemonde; 
    9498set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    9599set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    96100set (gca,'tickDir','out'); 
    97101 
    98  
    99  
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101102clear carte1 x y a b carte coco; 
    102103carte1=C(:,357); 
    … …  
    122123colorbar; 
    123124title('OLR EOF4','Fontsize',8); 
    124 hold on; cartemonde; 
     125hold on; 
     126cartemonde; 
    125127set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    126128set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    127129set (gca,'tickDir','out'); 
    128  
    129 %%%%%%%%%% 
    130130 
    131131subplot(3,2,4); 
    … …  
    142142 
    143143bar(x,vecteurs,'LineStyle','none') 
    144 axis([0.5 20.5 0 25]);  
     144axis([0.5 20.5 0 25]); 
    145145set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    146146set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 
    147147set (gca,'tickDir','out'); 
    148148 
    149  
    150  
    151  
    152  
    153149print -depsc2 resultats_eof_jjas_2006_30100.eps; 

  • trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_as.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_30100_ircaam_as.mat 
    … …  
    1315lat=lat(29:43)'; 
    1416 
    15 figure(1); orient('landscape'); 
     17figure(1); 
     18orient('landscape'); 
    1619subplot(3,2,1); 
    1720palette; 
    … …  
    3134colorbar; 
    3235title('OLR EOF1','Fontsize',8); 
    33 hold on; cartemonde; 
     36hold on; 
     37cartemonde; 
    3438set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3539set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3640set (gca,'tickDir','out'); 
    37 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3841 
    39 clear carte1 x y a b carte coco;  
     42clear carte1 x y a b carte coco; 
    4043carte1=C(:,359); 
    4144carte=reshape(carte1,24,15); 
    … …  
    6265 
    6366title('OLR EOF2','Fontsize',8); 
    64 hold on; cartemonde; 
     67hold on; 
     68cartemonde; 
    6569set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6670set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6771set (gca,'tickDir','out'); 
    6872 
    69 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7073clear carte1 x y a b carte coco; 
    7174carte1=C(:,358); 
    … …  
    9194colorbar; 
    9295title('OLR EOF3','Fontsize',8); 
    93 hold on; cartemonde; 
     96hold on; 
     97cartemonde; 
    9498set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    9599set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    96100set (gca,'tickDir','out'); 
    97101 
    98  
    99  
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101102clear carte1 x y a b carte coco; 
    102103carte1=C(:,357); 
    … …  
    122123colorbar; 
    123124title('OLR EOF4','Fontsize',8); 
    124 hold on; cartemonde; 
     125hold on; 
     126cartemonde; 
    125127set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    126128set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    127129set (gca,'tickDir','out'); 
    128  
    129 %%%%%%%%%% 
    130130 
    131131subplot(3,2,4); 
    … …  
    142142 
    143143bar(x,vecteurs,'LineStyle','none') 
    144 axis([0.5 20.5 0 25]);  
     144axis([0.5 20.5 0 25]); 
    145145set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    146146set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 
    147147set (gca,'tickDir','out'); 
    148148 
    149  
    150149print -depsc2 carte_eof_simuls_AS_30100.eps; 

  • trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_ctl.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_30100_ircaam_ctl.mat 
    … …  
    1517lat=lat(29:43)'; 
    1618 
    17 figure(1); orient('landscape'); 
     19figure(1); 
     20orient('landscape'); 
    1821subplot(3,2,1); 
    1922palette; 
    … …  
    3336colorbar; 
    3437title('OLR EOF1','Fontsize',8); 
    35 hold on; cartemonde; 
     38hold on; 
     39cartemonde; 
    3640set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3741set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3842set (gca,'tickDir','out'); 
    39 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    4043 
    41 clear carte1 x y a b carte coco;  
     44clear carte1 x y a b carte coco; 
    4245carte1=C(:,359); 
    4346carte=reshape(carte1,24,15); 
    … …  
    6467 
    6568title('OLR EOF2','Fontsize',8); 
    66 hold on; cartemonde; 
     69hold on; 
     70cartemonde; 
    6771set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6872set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6973set (gca,'tickDir','out'); 
    7074 
    71 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7275clear carte1 x y a b carte coco; 
    7376carte1=C(:,358); 
    … …  
    9396colorbar; 
    9497title('OLR EOF3','Fontsize',8); 
    95 hold on; cartemonde; 
     98hold on; 
     99cartemonde; 
    96100set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    97101set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    98102set (gca,'tickDir','out'); 
    99103 
    100  
    101  
    102 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    103104clear carte1 x y a b carte coco; 
    104105carte1=C(:,357); 
    … …  
    124125colorbar; 
    125126title('OLR EOF4','Fontsize',8); 
    126 hold on; cartemonde; 
     127hold on; 
     128cartemonde; 
    127129set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    128130set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    129131set (gca,'tickDir','out'); 
    130  
    131 %%%%%%%%%% 
    132132 
    133133subplot(3,2,4); 
    … …  
    144144 
    145145bar(x,vecteurs,'LineStyle','none') 
    146 axis([0.5 20.5 0 25]);  
     146axis([0.5 20.5 0 25]); 
    147147set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    148148set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 
    149149set (gca,'tickDir','out'); 
    150150 
    151  
    152  
    153  
    154  
    155151print -depsc2 eof_ircaam_30100_ctl.eps; 

  • trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_tr.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_30100_ircaam_tr.mat 
    … …  
    1315lat=lat(29:43)'; 
    1416 
    15 figure(1); orient('landscape'); 
     17figure(1); 
     18orient('landscape'); 
    1619subplot(3,2,1); 
    1720palette; 
    … …  
    3134colorbar; 
    3235title('OLR EOF1','Fontsize',8); 
    33 hold on; cartemonde; 
     36hold on; 
     37cartemonde; 
    3438set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3539set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3640set (gca,'tickDir','out'); 
    37 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3841 
    39 clear carte1 x y a b carte coco;  
     42clear carte1 x y a b carte coco; 
    4043carte1=C(:,359); 
    4144carte=reshape(carte1,24,15); 
    … …  
    6265 
    6366title('OLR EOF2','Fontsize',8); 
    64 hold on; cartemonde; 
     67hold on; 
     68cartemonde; 
    6569set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6670set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6771set (gca,'tickDir','out'); 
    6872 
    69 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7073clear carte1 x y a b carte coco; 
    7174carte1=C(:,358); 
    … …  
    9194colorbar; 
    9295title('OLR EOF3','Fontsize',8); 
    93 hold on; cartemonde; 
     96hold on; 
     97cartemonde; 
    9498set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    9599set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    96100set (gca,'tickDir','out'); 
    97101 
    98  
    99  
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101102clear carte1 x y a b carte coco; 
    102103carte1=C(:,357); 
    … …  
    122123colorbar; 
    123124title('OLR EOF4','Fontsize',8); 
    124 hold on; cartemonde; 
     125hold on; 
     126cartemonde; 
    125127set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    126128set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    127129set (gca,'tickDir','out'); 
    128  
    129 %%%%%%%%%% 
    130130 
    131131subplot(3,2,4); 
    … …  
    142142 
    143143bar(x,vecteurs,'LineStyle','none') 
    144 axis([0.5 20.5 0 25]);  
     144axis([0.5 20.5 0 25]); 
    145145set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    146146set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 
    … …  
    148148 
    149149print -depsc2 carte_eof_simuls_TR_30100.eps; 
    150  
    151  
    152  

  • trunk/src/SIMULS_IRCAAM/carte_eof_noaa_1_8.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_noaa_annuel_1_8.mat; 
    … …  
    1113lat=[-10:2.5:30]; 
    1214 
    13 figure(1); orient('landscape'); 
     15figure(1); 
     16orient('landscape'); 
    1417subplot(3,2,1); 
    1518palette; 
    … …  
    3033colorbar; 
    3134title('OLR EOF1','Fontsize',8); 
    32 hold on; cartemonde; 
     35hold on; 
     36cartemonde; 
    3337set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    3438set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3539set (gca,'tickDir','out'); 
    36 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3740 
    38 clear carte1 x y a b carte coco;  
     41clear carte1 x y a b carte coco; 
    3942carte1=C(:,424); 
    4043carte=reshape(carte1,25,17); 
    … …  
    4245 
    4346clear carte1; 
    44 lon=[-30:2.5:30]';  
     47lon=[-30:2.5:30]'; 
    4548lat=[-10:2.5:30]; 
    4649 
    … …  
    6063 
    6164contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none'); 
    62 colorbar;  
     65colorbar; 
    6366axis([-30 30 -10 30]); 
    6467title('OLR EOF2','Fontsize',8); 
    65 hold on; cartemonde; 
     68hold on; 
     69cartemonde; 
    6670set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    6771set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6872set (gca,'tickDir','out'); 
    6973 
    70 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7174clear carte1 x y a b carte coco; 
    7275carte1=C(:,423); 
    … …  
    7679 
    7780% defintion des lat et lon 
    78 lon=[-30:2.5:30]';  
     81lon=[-30:2.5:30]'; 
    7982lat=[-10:2.5:30]; 
    8083 
    … …  
    98101colorbar; 
    99102title('OLR EOF3','Fontsize',8); 
    100 hold on; cartemonde; 
     103hold on; 
     104cartemonde; 
    101105set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    102106set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    103107set (gca,'tickDir','out'); 
    104  
    105 %%%%%%%%%%%%%%%%%%%%%%%% 
    106108 
    107109clear carte1 x y a b carte coco; 
    … …  
    112114 
    113115% defintion des lat et lon 
    114 lon=[-30:2.5:30]';  
     116lon=[-30:2.5:30]'; 
    115117lat=[-10:2.5:30]; 
    116118 
    … …  
    133135colorbar; 
    134136title('OLR EOF4','Fontsize',8); 
    135 hold on; cartemonde; 
     137hold on; 
     138cartemonde; 
    136139set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    137140set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    … …  
    156159bar(x,vecteurs,'LineStyle','none') 
    157160 
    158 axis([0.5 20.5 0 50]);  
     161axis([0.5 20.5 0 50]); 
    159162set (gca,'YTick',[0:10:50],'YTickLabel',[0:10:50],'fontname','Arial','fontsize',6); 
    160163set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 

  • trunk/src/SIMULS_IRCAAM/carte_eof_noaa_8_28.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_noaa_annuel_8_28.mat; 
    … …  
    1113lat=[-10:2.5:30]; 
    1214 
    13 figure(1); orient('landscape'); 
     15figure(1); 
     16orient('landscape'); 
    1417subplot(3,2,1); 
    1518palette; 
    … …  
    3033colorbar; 
    3134title('OLR EOF1','Fontsize',8); 
    32 hold on; cartemonde; 
     35hold on; 
     36cartemonde; 
    3337set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    3438set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3539set (gca,'tickDir','out'); 
    36 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3740 
    38 clear carte1 x y a b carte coco;  
     41clear carte1 x y a b carte coco; 
    3942carte1=C(:,424); 
    4043carte=reshape(carte1,25,17); 
    … …  
    6063 
    6164contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none'); 
    62 colorbar;  
     65colorbar; 
    6366axis([-30 30 -10 30]); 
    6467title('OLR EOF2','Fontsize',8); 
    65 hold on; cartemonde; 
     68hold on; 
     69cartemonde; 
    6670set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    6771set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6872set (gca,'tickDir','out'); 
    6973 
    70 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7174clear carte1 x y a b carte coco; 
    7275carte1=C(:,423); 
    … …  
    7679 
    7780% defintion des lat et lon 
    78 lon=[-30:2.5:30]';  
     81lon=[-30:2.5:30]'; 
    7982lat=[-10:2.5:30]; 
    8083 
    … …  
    98101colorbar; 
    99102title('OLR EOF3','Fontsize',8); 
    100 hold on; cartemonde; 
     103hold on; 
     104cartemonde; 
    101105set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    102106set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    103107set (gca,'tickDir','out'); 
    104  
    105 %%%%%%%%%%%%%%%%%%%%%%%% 
    106108 
    107109clear carte1 x y a b carte coco; 
    … …  
    112114 
    113115% defintion des lat et lon 
    114 lon=[-30:2.5:30]';  
     116lon=[-30:2.5:30]'; 
    115117lat=[-10:2.5:30]; 
    116118 
    … …  
    133135colorbar; 
    134136title('OLR EOF4','Fontsize',8); 
    135 hold on; cartemonde; 
     137hold on; 
     138cartemonde; 
    136139set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    137140set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    … …  
    156159bar(x,vecteurs,'LineStyle','none') 
    157160 
    158 axis([0.5 20.5 0 70]);  
     161axis([0.5 20.5 0 70]); 
    159162set (gca,'YTick',[0:10:50],'YTickLabel',[0:10:50],'fontname','Arial','fontsize',6); 
    160163set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 

  • trunk/src/SIMULS_IRCAAM/carte_eof_olr_noaa_jas.m

    r15 r16  
     1% 
     2 
    13clear; 
    24cd('/usr/temp/seglod/mode_sahelien/') 
    … …  
    1315lat=[-10:2.5:30]; 
    1416 
    15 figure(1); orient('landscape'); 
     17figure(1); 
     18orient('landscape'); 
    1619subplot(3,2,1); 
    1720palette; 
    … …  
    3235colorbar; 
    3336title('OLR EOF1','Fontsize',8); 
    34 hold on; cartemonde; 
     37hold on; 
     38cartemonde; 
    3539set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3640set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3741set (gca,'tickDir','out'); 
    38 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3942 
    40 clear carte1 x y a b carte coco;  
     43clear carte1 x y a b carte coco; 
    4144carte1=C(:,424); 
    4245carte=reshape(carte1,25,17); 
    … …  
    6265 
    6366contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none'); 
    64 colorbar;  
     67colorbar; 
    6568 
    6669title('OLR EOF2','Fontsize',8); 
    67 hold on; cartemonde; 
     70hold on; 
     71cartemonde; 
    6872set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6973set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    7074set (gca,'tickDir','out'); 
    7175 
    72 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7376clear carte1 x y a b carte coco; 
    7477carte1=C(:,423); 
    … …  
    7881 
    7982% defintion des lat et lon 
    80 lon=[-30:2.5:30]';  
     83lon=[-30:2.5:30]'; 
    8184lat=[-10:2.5:30]; 
    8285 
    … …  
    99102colorbar; 
    100103title('OLR EOF3','Fontsize',8); 
    101 hold on; cartemonde; 
     104hold on; 
     105cartemonde; 
    102106set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    103107set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    104108set (gca,'tickDir','out'); 
    105  
    106 %%%%%%%%%%%%%%%%%%%%%%%% 
    107109 
    108110clear carte1 x y a b carte coco; 
    … …  
    113115 
    114116% defintion des lat et lon 
    115 lon=[-30:2.5:30]';  
     117lon=[-30:2.5:30]'; 
    116118lat=[-10:2.5:30]; 
    117119 
    … …  
    134136colorbar; 
    135137title('OLR EOF4','Fontsize',8); 
    136 hold on; cartemonde; 
     138hold on; 
     139cartemonde; 
    137140set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    138141set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    … …  
    142145 
    143146 
    144 %******************** 
    145147subplot(3,2,4); 
    146148vaude=0; 
    … …  
    156158 
    157159bar(x,vecteurs,'LineStyle','none') 
    158 axis([0.5 20.5 0 50]);  
     160axis([0.5 20.5 0 50]); 
    159161set (gca,'YTick',[0:10:50],'YTickLabel',[0:10:50],'fontname','Arial','fontsize',6); 
    160162set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 

  • trunk/src/SIMULS_IRCAAM/carte_eof_olr_noaa_jas_20.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_olr_noaa_annuel_jas_1020.mat; 
    … …  
    1113lat=[-10:2.5:20]; 
    1214 
    13 figure(1); orient('landscape'); 
     15figure(1); 
     16orient('landscape'); 
    1417subplot(3,2,1); 
    1518palette; 
    … …  
    3033colorbar; 
    3134title('OLR EOF1','Fontsize',8); 
    32 hold on; cartemonde; 
     35hold on; 
     36cartemonde; 
    3337set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    3438set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3539set (gca,'tickDir','out'); 
    36 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3740 
    38 clear carte1 x y a b carte coco;  
     41clear carte1 x y a b carte coco; 
    3942carte1=C(:,324); 
    4043carte=reshape(carte1,25,13); 
    … …  
    4245 
    4346clear carte1; 
    44 lon=[-30:2.5:30]';  
     47lon=[-30:2.5:30]'; 
    4548lat=[-10:2.5:20]; 
    4649 
    … …  
    6063 
    6164contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none'); 
    62 colorbar;  
     65colorbar; 
    6366axis([-30 30 -10 30]); 
    6467title('OLR EOF2','Fontsize',8); 
    65 hold on; cartemonde; 
     68hold on; 
     69cartemonde; 
    6670set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    6771set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6872set (gca,'tickDir','out'); 
    6973 
    70 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7174clear carte1 x y a b carte coco; 
    7275carte1=C(:,323); 
    … …  
    7679 
    7780% defintion des lat et lon 
    78 lon=[-30:2.5:30]';  
     81lon=[-30:2.5:30]'; 
    7982lat=[-10:2.5:20]; 
    8083 
    … …  
    98101colorbar; 
    99102title('OLR EOF3','Fontsize',8); 
    100 hold on; cartemonde; 
     103hold on; 
     104cartemonde; 
    101105set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    102106set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    103107set (gca,'tickDir','out'); 
    104  
    105 %%%%%%%%%%%%%%%%%%%%%%%% 
    106108 
    107109clear carte1 x y a b carte coco; 
    … …  
    112114 
    113115% defintion des lat et lon 
    114 lon=[-30:2.5:30]';  
     116lon=[-30:2.5:30]'; 
    115117lat=[-10:2.5:20]; 
    116118 
    … …  
    133135colorbar; 
    134136title('OLR EOF4','Fontsize',8); 
    135 hold on; cartemonde; 
     137hold on; 
     138cartemonde; 
    136139set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6); 
    137140set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    … …  
    156159bar(x,vecteurs,'LineStyle','none') 
    157160 
    158 axis([0.5 20.5 0 50]);  
     161axis([0.5 20.5 0 50]); 
    159162set (gca,'YTick',[0:10:50],'YTickLabel',[0:10:50],'fontname','Arial','fontsize',6); 
    160163set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 

  • trunk/src/SIMULS_IRCAAM/carte_eof_pluie_AFR_annuel.m

    r15 r16  
     1% 
     2 
    13clear; 
    24load eof_pluie_annuel_AFR.mat; 
    … …  
    1315lat=lat(29:43)'; 
    1416 
    15 figure(1); orient('landscape'); 
     17figure(1); 
     18orient('landscape'); 
    1619subplot(3,2,1); 
    1720palette; 
    … …  
    3134colorbar; 
    3235title('EOF1 OLR AFR annuel','Fontsize',8); 
    33 hold on; cartemonde; 
     36hold on; 
     37cartemonde; 
    3438set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    3539set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    3640set (gca,'tickDir','out'); 
    37 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3841 
    39 clear carte1 x y a b carte coco;  
     42clear carte1 x y a b carte coco; 
    4043carte1=C(:,359); 
    4144carte=reshape(carte1,24,15); 
    … …  
    6265 
    6366title('EOF2 OLR AFR annuel','Fontsize',8); 
    64 hold on; cartemonde; 
     67hold on; 
     68cartemonde; 
    6569set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    6670set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    6771set (gca,'tickDir','out'); 
    6872 
    69 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    7073clear carte1 x y a b carte coco; 
    7174carte1=C(:,358); 
    … …  
    9194colorbar; 
    9295title('EOF3 OLR AFR annuel','Fontsize',8); 
    93 hold on; cartemonde; 
     96hold on; 
     97cartemonde; 
    9498set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    9599set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    96100set (gca,'tickDir','out'); 
    97101 
    98  
    99  
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101102clear carte1 x y a b carte coco; 
    102103carte1=C(:,357); 
    … …  
    122123colorbar; 
    123124title('EOF4 OLR AFR annuel','Fontsize',8); 
    124 hold on; cartemonde; 
     125hold on; 
     126cartemonde; 
    125127set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    126128set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    127129set (gca,'tickDir','out'); 
    128  
    129 %%%%%%%%%% 
    130130 
    131131subplot(3,2,4); 
    … …  
    142142 
    143143bar(x,vecteurs,'LineStyle','none') 
    144 axis([0.5 20.5 0 25]);  
     144axis([0.5 20.5 0 25]); 
    145145set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6); 
    146146set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6); 
    147147set (gca,'tickDir','out'); 
    148148 
    149  
    150  
    151  
    152  
    153149print -depsc2 resultats_eof_AFR_annuel.eps; 

  • trunk/src/SIMULS_IRCAAM/climato_olr_AFR.m

    r15 r16  
     1% 
     2 
    13close all; 
    24clear; 
    35 
    46olr=zeros(122,29,64,128); 
    5  
    67 
    78ncload('rlut_d.AfNQIVIV.197106-09.nc','rlut'); 
    … …  
    9798olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    9899clear olr 
    99 olr=olr1; clear olr1; 
     100olr=olr1; 
     101clear olr1; 
    100102olr=olr(:,:,29:43,54:77); 
    101 olr1(:,:,:)=mean(olr); clear olr; 
    102 olr2(:,:)=mean(olr1); clear olr1; 
     103olr1(:,:,:)=mean(olr); 
     104clear olr; 
     105olr2(:,:)=mean(olr1); 
     106clear olr1; 
    103107 
    104108ncload('rlut_d.AfNQIVIV.199606-09.nc','lat','lon') 
    … …  
    106110lon=lon(54:77); 
    107111lat=lat(29:43)'; 
    108 figure(1); orient('landscape'); subplot(3,2,1); 
     112figure(1); 
     113orient('landscape'); 
     114subplot(3,2,1); 
    109115palette; 
    110116olr2(1,1)=149.999; 
    … …  
    114120colorbar; 
    115121title('OLR mean JJAS AFR nudging','Fontsize',8); 
    116 hold on; cartemonde; 
     122hold on; 
     123cartemonde; 
    117124set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    118125set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    119126set (gca,'tickDir','out'); 
    120 axis equal; axis([-30 30 -10 30]); 
     127axis equal; 
     128axis([-30 30 -10 30]); 
    121129climato_olr_CTL; 
    122130title('OLR mean JJAS no nudging','Fontsize',8); 
    123 axis equal; axis([-30 30 -10 30]); 
     131axis equal; 
     132axis([-30 30 -10 30]); 
    124133climato_olr_noaa; 
    125134title('OLR mean JJAS NOAA','Fontsize',8); 
    126 axis equal; axis([-30 30 -10 30]); 
     135axis equal; 
     136axis([-30 30 -10 30]); 
    127137 
    128138print -depsc2 planel_climato_olr.eps 

  • trunk/src/SIMULS_IRCAAM/climato_olr_CTL.m

    r15 r16  
     1% 
    12 
    23clear; 
    … …  
    9899olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    99100clear olr 
    100 olr=olr1; clear olr1; 
     101olr=olr1; 
     102clear olr1; 
    101103olr=olr(:,:,29:43,54:77); 
    102 olr1(:,:,:)=mean(olr); clear olr; 
    103 olr2(:,:)=mean(olr1); clear olr1; 
     104olr1(:,:,:)=mean(olr); 
     105clear olr; 
     106olr2(:,:)=mean(olr1); 
     107clear olr1; 
    104108 
    105109ncload('rlut_d.AfNQIVIV.199606-09.nc','lat','lon') 
    … …  
    114118colorbar; 
    115119 
    116 hold on; cartemonde; 
     120hold on; 
     121cartemonde; 
    117122set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    118123set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    119124set (gca,'tickDir','out'); 
    120  

  • trunk/src/SIMULS_IRCAAM/climato_olr_noaa.m

    r15 r16  
     1% 
    12 
    23% initialisation 
    3 clear;  
     4clear; 
    45 
    56cd('..'); 
    … …  
    2627olr1=zeros(siz,25,144); 
    2728olr1(:,:,1:72)=olr(:,:,73:144); 
    28 olr1(:,:,73:144)=olr(:,:,1:72); clear olr; 
     29olr1(:,:,73:144)=olr(:,:,1:72); 
     30clear olr; 
    2931 
    3032% on permture le temps et l'espce 
    … …  
    3335olr1=permute(olr1, [2 3 1]); 
    3436 
    35  
    36 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    3737% on met sous la forme longitude latitude jour 
    38  
    3938 
    4039% on selectionne les mois d ete (attention aux annees bixestiles!) 
    … …  
    137136olr=permute(olr,[3 4 1 2]); 
    138137clear olr1 
    139 olr1(:,:,:)=mean(olr); clear olr; 
    140 olr2(:,:)=mean(olr1); clear olr1; 
     138olr1(:,:,:)=mean(olr); 
     139clear olr; 
     140olr2(:,:)=mean(olr1); 
     141clear olr1; 
    141142cd('..'); 
    142143ncload('olr.day.mean.nc','lon','lat'); 
    … …  
    151152olr2(1,2)=350.001; 
    152153 
    153  
    154154contourf(lon,lat,olr2,[150:10:350],'LineStyle','none'); 
    155155colorbar; 
    156 hold on; cartemonde; 
     156hold on; 
     157cartemonde; 
    157158set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    158159set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6); 
    159160set (gca,'tickDir','out'); 
    160  

  • trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof1_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36 
    47load hgt500_afr.mat 
    … …  
    1215hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128); 
    1316hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64); 
    14 clear hgt500;  hgt500=hgt500b; clear hgt500b 
     17clear hgt500; 
     18hgt500=hgt500b; 
     19clear hgt500b 
    1520 
    1621% on desaisonalise 
    1722hgt1=permute(hgt500,[2 1 3 4]); 
    18 hgt2(:,:,:)=nanmean(hgt1); clear hgt1; 
     23hgt2(:,:,:)=nanmean(hgt1); 
     24clear hgt1; 
    1925hgt3=reshape(hgt500, 3538,64,128); 
    20 hgt4(:,:)=nanmean(hgt3); clear hgt3; 
     26hgt4(:,:)=nanmean(hgt3); 
     27clear hgt3; 
    2128 
    2229for a=1:122; 
    2330   for b=1:28; 
    2431      for c=1:37; 
    25          for d=1:128;  
    26              hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                 
     32         for d=1:128; 
     33             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d)); 
    2734         end; 
    2835      end; 
    … …  
    3138clear hgt2 hgt4; 
    3239 
    33  
    34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    35  
    3640load eof1_AFR_1030.txt 
    3741 
    3842% on met sous la forme annee mois 
    39 hgt500_eof=reshape(eof1_AFR_1030,122,29); clear eof1_AFR_1030; 
     43hgt500_eof=reshape(eof1_AFR_1030,122,29); 
     44clear eof1_AFR_1030; 
    4045 
    4146% on calcule l ecart type sur la serie temporelle de l HGT500 
    42 k=122*29;  
     47k=122*29; 
    4348hgt500bis=reshape(hgt500_eof,k,1); 
    44 hgt500bis=std(hgt500bis);  
     49hgt500bis=std(hgt500bis); 
    4550 
    4651% intialisation des tableaux 
    47 hgt500_filtre_compomax=NaN*ones(50,31,64,128);  
     52hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
    4853hgt500_filtre_compomin=NaN*ones(50,31,64,128); 
    4954 
    50 compteurmax=0;  
     55compteurmax=0; 
    5156compteurmin=0; 
    5257 
    53 for a=1:29; % boucle sur les annees 
    54    clear delta;  
     58% boucle sur les annees 
     59for a=1:29; 
     60   clear delta; 
    5561   delta=zeros(122,1); 
    56    for b=1:122; % boucle sur les jours : on prepare avant    
     62   % boucle sur les jours : on prepare avant 
     63   for b=1:122; 
    5764        if b>1; 
    5865            delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a); 
    5966        end; 
    6067   end; 
    61    for b=1:122; % boucle sur les jours 
    62       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    63 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    64          if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));  
     68   % boucle sur les jours 
     69   for b=1:122; 
     70      % 1ere condition (laisser une marge de 10) 
     71      if (b>20 && b<112); 
     72% cas 1 : max deltas apres negetifs et deltas avant postifs 
     73         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
    6574            compteurmax=compteurmax+1; 
    6675          hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:); 
    … …  
    97106            hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:); 
    98107            hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:); 
    99 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     108% cas 2 : min deltas apres positifs et deltas avant negatifs 
    100109         elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(hgt500bis)); 
    101110            compteurmin=compteurmin+1; 
    … …  
    136145         end; 
    137146      end; 
    138    end;          
     147   end; 
    139148end; 
    140149hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:); 
    … …  
    143152% on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences 
    144153% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    145 hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin; 
    146 hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax; 
    147  
    148 x=[-10:1:10]'; %' 
    149  
    150 figure(1); orient('landscape'); 
    151  
    152 lat=lat';  
     154hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); 
     155clear hgt500_filtre_compomin; 
     156hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); 
     157clear hgt500_filtre_compomax; 
     158 
     159x=[-10:1:10]'; 
     160 
     161figure(1); 
     162orient('landscape'); 
     163 
     164lat=lat'; 
    153165lon=lon-180; 
    154166for e=1:7; 
    … …  
    176188       delta_hgt500_filtre_min(1,2)=100.0001; 
    177189       fin=-30+24*2.5; 
    178         
     190 
    179191       clear fin 
    180192       fin=-10+16*2.5; 
    … …  
    184196       else 
    185197      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    186        end        
     198       end 
    187199       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    188200       if e==4; 
    189           co=colorbar;             
     201          co=colorbar; 
    190202          set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5); 
    191203       end; 
    192        hold on; cartemonde1; 
     204       hold on; 
     205       cartemonde1; 
    193206       set (gca,'tickDir','out'); 
    194207       axis equal 
    195208       axis([-180 180 20 80]); 
    196        if e==7;       
    197       title('HGT500 composite EOF1 1030j simulation AFR ','fontsize',8) ; 
     209       if e==7; 
     210          title('HGT500 composite EOF1 1030j simulation AFR ','fontsize',8) ; 
    198211       end 
    199212       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    200213       pos_vert=e/10; 
    201        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     214       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    202215end; 
    203216print -depsc2 composite_hgt500_afr_eof1_1030a.eps 
    204217 
    205 figure(2); orient('landscape'); 
     218figure(2); 
     219orient('landscape'); 
    206220 
    207221for e=1:7; 
    … …  
    229243       delta_hgt500_filtre_min(1,2)=100.0001; 
    230244       fin=-30+24*2.5; 
    231         
     245 
    232246       clear fin 
    233247       fin=-10+16*2.5; 
    … …  
    237251       else 
    238252      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    239        end        
     253       end 
    240254       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    241255       if e==4; 
    242           co=colorbar;             
     256          co=colorbar; 
    243257          set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5); 
    244258       end; 
    245        hold on; cartemonde1; 
     259       hold on; 
     260       cartemonde1; 
    246261       set (gca,'tickDir','out'); 
    247262       axis equal 
    … …  
    252267       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    253268       pos_vert=e/10; 
    254        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     269       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    255270end; 
    256271print -depsc2 composite_hgt500_afr_eof1_1030b.eps 
    257  
    258  
    259  

  • trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof1_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36 
    47load hgt500_afr.mat 
    … …  
    1215hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128); 
    1316hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64); 
    14 clear hgt500;  hgt500=hgt500b; clear hgt500b 
     17clear hgt500; 
     18hgt500=hgt500b; 
     19clear hgt500b 
    1520 
    1621% on desaisonalise 
    1722hgt1=permute(hgt500,[2 1 3 4]); 
    18 hgt2(:,:,:)=nanmean(hgt1); clear hgt1; 
     23hgt2(:,:,:)=nanmean(hgt1); 
     24clear hgt1; 
    1925hgt3=reshape(hgt500, 3538,64,128); 
    20 hgt4(:,:)=nanmean(hgt3); clear hgt3; 
     26hgt4(:,:)=nanmean(hgt3); 
     27clear hgt3; 
    2128 
    2229for a=1:122; 
    2330   for b=1:28; 
    2431      for c=1:37; 
    25          for d=1:128;  
    26              hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                 
     32         for d=1:128; 
     33             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d)); 
    2734         end; 
    2835      end; 
    … …  
    3138clear hgt2 hgt4; 
    3239 
    33  
    34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    35  
    3640load eof1_AFR_30100.txt 
    3741 
    3842% on met sous la forme annee mois 
    39 hgt500_eof=reshape(eof1_AFR_30100,122,29); clear eof1_AFR_30100; 
     43hgt500_eof=reshape(eof1_AFR_30100,122,29); 
     44clear eof1_AFR_30100; 
    4045 
    4146% on calcule l ecart type sur la serie temporelle de l HGT500 
    42 k=122*29;  
     47k=122*29; 
    4348hgt500bis=reshape(hgt500_eof,k,1); 
    44 hgt500bis=std(hgt500bis);  
     49hgt500bis=std(hgt500bis); 
    4550 
    4651% intialisation des tableaux 
    47 hgt500_filtre_compomax=NaN*ones(50,31,64,128);  
     52hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
    4853hgt500_filtre_compomin=NaN*ones(50,31,64,128); 
    4954 
    50 compteurmax=0;  
     55compteurmax=0; 
    5156compteurmin=0; 
    5257 
    53 for a=1:29; % boucle sur les annees 
    54    clear delta;  
     58% boucle sur les annees 
     59for a=1:29; 
     60   clear delta; 
    5561   delta=zeros(122,1); 
    56    for b=1:122; % boucle sur les jours : on prepare avant    
     62   % boucle sur les jours : on prepare avant 
     63   for b=1:122; 
    5764        if b>1; 
    5865            delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a); 
    5966        end; 
    6067   end; 
    61    for b=1:122; % boucle sur les jours 
    62       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    63 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    64          if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));  
     68   % boucle sur les jours 
     69   for b=1:122; 
     70      % 1ere condition (laisser une marge de 10) 
     71      if (b>20 && b<112); 
     72% cas 1 : max deltas apres negetifs et deltas avant postifs 
     73         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
    6574            compteurmax=compteurmax+1; 
    6675          hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:); 
    … …  
    97106            hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:); 
    98107            hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:); 
    99 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     108% cas 2 : min deltas apres positifs et deltas avant negatifs 
    100109         elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(hgt500bis)); 
    101110            compteurmin=compteurmin+1; 
    … …  
    136145         end; 
    137146      end; 
    138    end;          
     147   end; 
    139148end; 
    140149hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:); 
    … …  
    143152% on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences 
    144153% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    145 hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin; 
    146 hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax; 
    147  
    148 x=[-10:1:10]'; %' 
    149  
    150 figure(1); orient('landscape'); 
    151  
    152 lat=lat';  
     154hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); 
     155clear hgt500_filtre_compomin; 
     156hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); 
     157clear hgt500_filtre_compomax; 
     158 
     159x=[-10:1:10]'; 
     160 
     161figure(1); 
     162orient('landscape'); 
     163 
     164lat=lat'; 
    153165lon=lon-180; 
    154166for e=1:7; 
    … …  
    176188       delta_hgt500_filtre_min(1,2)=100.0001; 
    177189       fin=-30+24*2.5; 
    178         
     190 
    179191       clear fin 
    180192       fin=-10+16*2.5; 
    … …  
    184196       else 
    185197      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    186        end        
     198       end 
    187199       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    188200       if e==4; 
    189           co=colorbar;             
     201          co=colorbar; 
    190202          set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5); 
    191203       end; 
    192        hold on; cartemonde1; 
     204       hold on; 
     205       cartemonde1; 
    193206       set (gca,'tickDir','out'); 
    194207       axis equal 
    195208       axis([-180 180 20 80]); 
    196        if e==7;       
    197       title('HGT500 composite EOF1 30100j simulation AFR ','fontsize',8) ; 
     209       if e==7; 
     210          title('HGT500 composite EOF1 30100j simulation AFR ','fontsize',8) ; 
    198211       end 
    199212       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    200213       pos_vert=e/10; 
    201        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     214       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    202215end; 
    203216print -depsc2 composite_hgt500_afr_eof1_30100a.eps 
    204217 
    205 figure(2); orient('landscape'); 
     218figure(2); 
     219orient('landscape'); 
    206220 
    207221for e=1:7; 
    … …  
    229243       delta_hgt500_filtre_min(1,2)=100.0001; 
    230244       fin=-30+24*2.5; 
    231         
     245 
    232246       clear fin 
    233247       fin=-10+16*2.5; 
    … …  
    237251       else 
    238252      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    239        end        
     253       end 
    240254       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    241255       if e==4; 
    242           co=colorbar;             
     256          co=colorbar; 
    243257          set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5); 
    244258       end; 
    245        hold on; cartemonde1; 
     259       hold on; 
     260       cartemonde1; 
    246261       set (gca,'tickDir','out'); 
    247262       axis equal 
    … …  
    252267       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    253268       pos_vert=e/10; 
    254        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     269       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    255270end; 
    256271print -depsc2 composite_hgt500_afr_eof1_30100b.eps 
    257  
    258  
    259  

  • trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36 
    47load hgt500_afr.mat; 
    … …  
    1215hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128); 
    1316hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64); 
    14 clear hgt500;  hgt500=hgt500b; clear hgt500b; 
     17clear hgt500; 
     18hgt500=hgt500b; 
     19clear hgt500b; 
    1520 
    1621% on desaisonalise 
    1722hgt1=permute(hgt500,[2 1 3 4]); 
    18 hgt2(:,:,:)=nanmean(hgt1); clear hgt1; 
     23hgt2(:,:,:)=nanmean(hgt1); 
     24clear hgt1; 
    1925hgt3=reshape(hgt500, 3538,64,128); 
    20 hgt4(:,:)=nanmean(hgt3); clear hgt3; 
     26hgt4(:,:)=nanmean(hgt3); 
     27clear hgt3; 
    2128 
    2229for a=1:122; 
    2330   for b=1:28; 
    2431      for c=1:37; 
    25          for d=1:128;  
    26              hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                 
     32         for d=1:128; 
     33             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d)); 
    2734         end; 
    2835      end; 
    … …  
    3138clear hgt2 hgt4; 
    3239 
    33  
    34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    35  
    3640load eof2_AFR_1030.txt 
    3741 
    3842% on met sous la forme annee mois 
    39 hgt500_eof=reshape(eof2_AFR_1030,122,29); clear eof2_AFR_1030; 
     43hgt500_eof=reshape(eof2_AFR_1030,122,29); 
     44clear eof2_AFR_1030; 
    4045 
    4146% on calcule l ecart type sur la serie temporelle de l HGT500 
    42 k=122*29;  
     47k=122*29; 
    4348hgt500bis=reshape(hgt500_eof,k,1); 
    44 hgt500bis=1.25*std(hgt500bis);  
     49hgt500bis=1.25*std(hgt500bis); 
    4550 
    4651% intialisation des tableaux 
    47 hgt500_filtre_compomax=NaN*ones(50,31,64,128);  
     52hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
    4853hgt500_filtre_compomin=NaN*ones(50,31,64,128); 
    4954 
    50 compteurmax=0;  
     55compteurmax=0; 
    5156compteurmin=0; 
    5257 
    53 for a=1:29; % boucle sur les annees 
    54    clear delta;  
     58% boucle sur les annees 
     59for a=1:29; 
     60   clear delta; 
    5561   delta=zeros(122,1); 
    56    for b=1:122; % boucle sur les jours : on prepare avant    
     62   % boucle sur les jours : on prepare avant 
     63   for b=1:122; 
    5764        if b>1; 
    5865            delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a); 
    5966        end; 
    6067   end; 
    61    for b=1:122; % boucle sur les jours 
    62       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    63 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    64          if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis));  
     68   % boucle sur les jours 
     69   for b=1:122; 
     70      % 1ere condition (laisser une marge de 10) 
     71      if (b>20 && b<112); 
     72% cas 1 : max deltas apres negetifs et deltas avant postifs 
     73         if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis)); 
    6574            compteurmax=compteurmax+1; 
    6675          hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:); 
    … …  
    97106            hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:); 
    98107            hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:); 
    99 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     108% cas 2 : min deltas apres positifs et deltas avant negatifs 
    100109         elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(-hgt500bis)); 
    101110            compteurmin=compteurmin+1; 
    … …  
    136145         end; 
    137146      end; 
    138    end;          
     147   end; 
    139148end; 
    140149 
    … …  
    158167% on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences 
    159168% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    160 hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin; 
    161 hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax; 
    162  
    163 x=[-10:1:10]'; %' 
    164  
    165 figure(1); orient('landscape'); 
    166  
    167 lat=lat';  
     169hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); 
     170clear hgt500_filtre_compomin; 
     171hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); 
     172clear hgt500_filtre_compomax; 
     173 
     174x=[-10:1:10]'; 
     175 
     176figure(1); 
     177orient('landscape'); 
     178 
     179lat=lat'; 
    168180lon=lon-180; 
    169181for e=1:7; 
    … …  
    196208       delta_hgt500_filtre_min(1,2)=50.0001; 
    197209       fin=-30+24*2.5; 
    198         
     210 
    199211       clear fin 
    200212       fin=-10+16*2.5; 
    … …  
    204216       else 
    205217      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    206        end        
     218       end 
    207219       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    208220       if e==4; 
    209           co=colorbar;             
     221          co=colorbar; 
    210222          set(co,'ytick',[-50:5:50],'yticklabel',[-50:5:50],'fontname','Arial','fontsize',5); 
    211223       end; 
    212        hold on; cartemonde1; 
     224       hold on; 
     225       cartemonde1; 
    213226       set (gca,'tickDir','out'); 
    214227       axis equal 
    215228       axis([-180 180 20 80]); 
    216        if e==7;       
    217       title('HGT500 composite EOF2 1030j simulation AFR ','fontsize',8) ; 
     229       if e==7; 
     230          title('HGT500 composite EOF2 1030j simulation AFR ','fontsize',8) ; 
    218231       end 
    219232       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    220233       pos_vert=e/10; 
    221        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     234       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    222235end; 
    223236print -depsc2 composite_hgt500_afr_eof2_1030a.eps 
    224237 
    225 figure(2); orient('landscape'); 
     238figure(2); 
     239orient('landscape'); 
    226240 
    227241for e=1:7; 
    … …  
    254268       delta_hgt500_filtre_min(1,2)=50.0001; 
    255269       fin=-30+24*2.5; 
    256         
     270 
    257271       clear fin 
    258272       fin=-10+16*2.5; 
    … …  
    262276       else 
    263277      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    264        end        
     278       end 
    265279       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    266280       if e==4; 
    267           co=colorbar;             
     281          co=colorbar; 
    268282          set(co,'ytick',[-40:20:40],'yticklabel',[-40:20:40],'fontname','Arial','fontsize',5); 
    269283       end; 
    270        hold on; cartemonde1; 
     284       hold on; 
     285       cartemonde1; 
    271286       set (gca,'tickDir','out'); 
    272287       axis equal 
    … …  
    277292       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    278293       pos_vert=e/10; 
    279        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     294       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    280295end; 
    281296print -depsc2 composite_hgt500_afr_eof2_1030b.eps 
    282  
    283  
    284  

  • trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_1030_min.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36 
    47load hgt500_afr.mat; 
    … …  
    1215hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128); 
    1316hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64); 
    14 clear hgt500;  hgt500=hgt500b; clear hgt500b; 
     17clear hgt500; 
     18hgt500=hgt500b; 
     19clear hgt500b; 
    1520 
    1621% on desaisonalise 
    1722hgt1=permute(hgt500,[2 1 3 4]); 
    18 hgt2(:,:,:)=nanmean(hgt1); clear hgt1; 
     23hgt2(:,:,:)=nanmean(hgt1); 
     24clear hgt1; 
    1925hgt3=reshape(hgt500, 3538,64,128); 
    20 hgt4(:,:)=nanmean(hgt3); clear hgt3; 
     26hgt4(:,:)=nanmean(hgt3); 
     27clear hgt3; 
    2128 
    2229for a=1:122; 
    2330   for b=1:29; 
    2431      for c=1:37; 
    25          for d=1:128;  
    26              hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                 
     32         for d=1:128; 
     33             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d)); 
    2734         end; 
    2835      end; 
    … …  
    3138clear hgt2 hgt4; 
    3239 
    33  
    34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    35  
    3640load eof2_AFR_1030.txt 
    3741 
    3842% on met sous la forme annee mois 
    39 hgt500_eof=reshape(eof2_AFR_1030,122,29); clear eof2_AFR_1030; 
     43hgt500_eof=reshape(eof2_AFR_1030,122,29); 
     44clear eof2_AFR_1030; 
    4045 
    4146% on calcule l ecart type sur la serie temporelle de l HGT500 
    42 k=122*29;  
     47k=122*29; 
    4348hgt500bis=reshape(hgt500_eof,k,1); 
    44 hgt500bis=1.25*std(hgt500bis);  
     49hgt500bis=1.25*std(hgt500bis); 
    4550 
    4651% intialisation des tableaux 
    47 hgt500_filtre_compomax=NaN*ones(50,31,64,128);  
     52hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
    4853hgt500_filtre_compomin=NaN*ones(50,31,64,128); 
    4954 
    50 compteurmax=0;  
     55compteurmax=0; 
    5156compteurmin=0; 
    5257 
    53 for a=1:29; % boucle sur les annees 
    54    clear delta;  
     58% boucle sur les annees 
     59for a=1:29; 
     60   clear delta; 
    5561   delta=zeros(122,1); 
    56    for b=1:122; % boucle sur les jours : on prepare avant    
     62   % boucle sur les jours : on prepare avant 
     63   for b=1:122; 
    5764        if b>1; 
    5865            delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a); 
    5966        end; 
    6067   end; 
    61    for b=1:122; % boucle sur les jours 
    62       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    63 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    64          if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));  
     68   % boucle sur les jours 
     69   for b=1:122; 
     70      % 1ere condition (laisser une marge de 10) 
     71      if (b>20 && b<112); 
     72% cas 1 : max deltas apres negetifs et deltas avant postifs 
     73         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
    6574            compteurmax=compteurmax+1; 
    6675            hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:); 
    … …  
    97106            hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:); 
    98107            hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:); 
    99 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     108% cas 2 : min deltas apres positifs et deltas avant negatifs 
    100109         elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(-hgt500bis)); 
    101110            compteurmin=compteurmin+1; 
    … …  
    136145         end; 
    137146      end; 
    138    end;          
     147   end; 
    139148end; 
    140149siz=122*29; 
    … …  
    162171% on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences 
    163172% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    164 hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin; 
    165 hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax; 
    166  
    167 x=[-10:1:10]'; %' 
    168  
    169 figure(1); orient('landscape'); 
    170  
    171 lat=lat';  
     173hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); 
     174clear hgt500_filtre_compomin; 
     175hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); 
     176clear hgt500_filtre_compomax; 
     177 
     178x=[-10:1:10]'; 
     179 
     180figure(1); 
     181orient('landscape'); 
     182 
     183lat=lat'; 
    172184lon=lon-180; 
    173185for e=1:7; 
    … …  
    202214       delta_hgt500_filtre_min(1,2)=50.0001; 
    203215       fin=-30+24*2.5; 
    204         
     216 
    205217       clear fin 
    206218       fin=-10+16*2.5; 
    … …  
    210222       else 
    211223      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    212        end        
     224       end 
    213225       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    214226       if e==4; 
    215           co=colorbar;             
     227          co=colorbar; 
    216228          set(co,'ytick',[-50:5:50],'yticklabel',[-50:5:50],'fontname','Arial','fontsize',5); 
    217229       end; 
    218        hold on; cartemonde1; 
     230       hold on; 
     231       cartemonde1; 
    219232       set (gca,'tickDir','out'); 
    220233       axis equal 
    221234       axis([-180 180 20 80]); 
    222        if e==7;       
    223       title('HGT500 composite EOF2 1030j simulation AFR ','fontsize',8) ; 
     235       if e==7; 
     236          title('HGT500 composite EOF2 1030j simulation AFR ','fontsize',8) ; 
    224237       end 
    225238       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    226239       pos_vert=e/10; 
    227        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     240       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    228241end; 
    229242print -depsc2 composite_hgt500_afr_eof2_1030a.eps 
    230243 
    231 figure(2); orient('landscape'); 
     244figure(2); 
     245orient('landscape'); 
    232246 
    233247for e=1:7; 
    … …  
    262276       delta_hgt500_filtre_min(1,2)=50.0001; 
    263277       fin=-30+24*2.5; 
    264         
     278 
    265279       clear fin 
    266280       fin=-10+16*2.5; 
    … …  
    270284       else 
    271285      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    272        end        
     286       end 
    273287       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    274288       if e==4; 
    275           co=colorbar;             
     289          co=colorbar; 
    276290          set(co,'ytick',[-40:20:40],'yticklabel',[-40:20:40],'fontname','Arial','fontsize',5); 
    277291       end; 
    278        hold on; cartemonde1; 
     292       hold on; 
     293       cartemonde1; 
    279294       set (gca,'tickDir','out'); 
    280295       axis equal 
    … …  
    285300       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    286301       pos_vert=e/10; 
    287        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     302       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    288303end; 
    289304print -depsc2 composite_hgt500_afr_eof2_1030b.eps 
    290  
    291  
    292  

  • trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36 
    47load hgt500_afr.mat 
    … …  
    1215hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128); 
    1316hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64); 
    14 clear hgt500;  hgt500=hgt500b; clear hgt500b 
     17clear hgt500; 
     18hgt500=hgt500b; 
     19clear hgt500b 
    1520 
    1621% on desaisonalise 
    1722hgt1=permute(hgt500,[2 1 3 4]); 
    18 hgt2(:,:,:)=nanmean(hgt1); clear hgt1; 
     23hgt2(:,:,:)=nanmean(hgt1); 
     24clear hgt1; 
    1925hgt3=reshape(hgt500, 3538,64,128); 
    20 hgt4(:,:)=nanmean(hgt3); clear hgt3; 
     26hgt4(:,:)=nanmean(hgt3); 
     27clear hgt3; 
    2128 
    2229for a=1:122; 
    2330   for b=1:28; 
    2431      for c=1:37; 
    25          for d=1:128;  
    26              hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                 
     32         for d=1:128; 
     33             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d)); 
    2734         end; 
    2835      end; 
    … …  
    3138clear hgt2 hgt4; 
    3239 
    33  
    34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    35  
    3640load eof2_AFR_30100.txt 
    3741 
    3842% on met sous la forme annee mois 
    39 hgt500_eof=reshape(eof2_AFR_30100,122,29); clear eof2_AFR_30100; 
     43hgt500_eof=reshape(eof2_AFR_30100,122,29); 
     44clear eof2_AFR_30100; 
    4045 
    4146% on calcule l ecart type sur la serie temporelle de l HGT500 
    42 k=122*29;  
     47k=122*29; 
    4348hgt500bis=reshape(hgt500_eof,k,1); 
    44 hgt500bis=std(hgt500bis);  
     49hgt500bis=std(hgt500bis); 
    4550 
    4651% intialisation des tableaux 
    47 hgt500_filtre_compomax=NaN*ones(50,31,64,128);  
     52hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
    4853hgt500_filtre_compomin=NaN*ones(50,31,64,128); 
    4954 
    50 compteurmax=0;  
     55compteurmax=0; 
    5156compteurmin=0; 
    5257 
    53 for a=1:29; % boucle sur les annees 
    54    clear delta;  
     58% boucle sur les annees 
     59for a=1:29; 
     60   clear delta; 
    5561   delta=zeros(122,1); 
    56    for b=1:122; % boucle sur les jours : on prepare avant    
     62   % boucle sur les jours : on prepare avant 
     63   for b=1:122; 
    5764        if b>1; 
    5865            delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a); 
    5966        end; 
    6067   end; 
    61    for b=1:122; % boucle sur les jours 
    62       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    63 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    64          if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));  
     68   % boucle sur les jours 
     69   for b=1:122; 
     70      % 1ere condition (laisser une marge de 10) 
     71      if (b>20 && b<112); 
     72% cas 1 : max deltas apres negetifs et deltas avant postifs 
     73         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
    6574            compteurmax=compteurmax+1; 
    6675          hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:); 
    … …  
    97106            hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:); 
    98107            hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:); 
    99 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     108% cas 2 : min deltas apres positifs et deltas avant negatifs 
    100109         elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(hgt500bis)); 
    101110            compteurmin=compteurmin+1; 
    … …  
    136145         end; 
    137146      end; 
    138    end;          
     147   end; 
    139148end; 
    140149hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:); 
    … …  
    143152% on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences 
    144153% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    145 hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin; 
    146 hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax; 
    147  
    148 x=[-10:1:10]'; %' 
    149  
    150 figure(1); orient('landscape'); 
    151  
    152 lat=lat';  
     154hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); 
     155clear hgt500_filtre_compomin; 
     156hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); 
     157clear hgt500_filtre_compomax; 
     158 
     159x=[-10:1:10]'; 
     160 
     161figure(1); 
     162orient('landscape'); 
     163 
     164lat=lat'; 
    153165lon=lon-180; 
    154166for e=1:7; 
    … …  
    176188       delta_hgt500_filtre_min(1,2)=100.0001; 
    177189       fin=-30+24*2.5; 
    178         
     190 
    179191       clear fin 
    180192       fin=-10+16*2.5; 
    … …  
    184196       else 
    185197      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    186        end        
     198       end 
    187199       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    188200       if e==4; 
    189           co=colorbar;             
     201          co=colorbar; 
    190202          set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5); 
    191203       end; 
    192        hold on; cartemonde1; 
     204       hold on; 
     205       cartemonde1; 
    193206       set (gca,'tickDir','out'); 
    194207       axis equal 
    195208       axis([-180 180 20 80]); 
    196        if e==7;       
     209       if e==7; 
    197210      title('HGT500 composite EOF2 30100j simulation AFR ','fontsize',8) ; 
    198211       end 
    199212       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    200213       pos_vert=e/10; 
    201        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     214       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    202215end; 
    203216print -depsc2 composite_hgt500_afr_eof2_30100a.eps 
    204217 
    205 figure(2); orient('landscape'); 
     218figure(2); 
     219orient('landscape'); 
    206220 
    207221for e=1:7; 
    … …  
    229243       delta_hgt500_filtre_min(1,2)=100.0001; 
    230244       fin=-30+24*2.5; 
    231         
     245 
    232246       clear fin 
    233247       fin=-10+16*2.5; 
    … …  
    237251       else 
    238252      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    239        end        
     253       end 
    240254       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    241255       if e==4; 
    242           co=colorbar;             
     256          co=colorbar; 
    243257          set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5); 
    244258       end; 
    245        hold on; cartemonde1; 
     259       hold on; 
     260       cartemonde1; 
    246261       set (gca,'tickDir','out'); 
    247262       axis equal 
    … …  
    252267       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    253268       pos_vert=e/10; 
    254        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     269       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    255270end; 
    256271print -depsc2 composite_hgt500_afr_eof2_30100b.eps 
    257  
    258  
    259  

  • trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof1_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36 
    47load hgt500_trop.mat 
    … …  
    1215hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128); 
    1316hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64); 
    14 clear hgt500;  hgt500=hgt500b; clear hgt500b 
    15  
     17clear hgt500; 
     18hgt500=hgt500b; 
     19clear hgt500b; 
    1620 
    1721% on desaisonalise 
    1822hgt1=permute(hgt500,[2 1 3 4]); 
    19 hgt2(:,:,:)=nanmean(hgt1); clear hgt1; 
     23hgt2(:,:,:)=nanmean(hgt1); 
     24clear hgt1; 
    2025hgt3=reshape(hgt500, 3538,64,128); 
    21 hgt4(:,:)=nanmean(hgt3); clear hgt3; 
     26hgt4(:,:)=nanmean(hgt3); 
     27clear hgt3; 
    2228 
    2329for a=1:122; 
    2430   for b=1:28; 
    2531      for c=1:37; 
    26          for d=1:128;  
    27              hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                 
     32         for d=1:128; 
     33             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d)); 
    2834         end; 
    2935      end; 
    … …  
    3238clear hgt2 hgt4; 
    3339 
    34  
    35 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    36  
    3740load eof1_TR_1030.txt 
    3841 
    3942% on met sous la forme annee mois 
    40 hgt500_eof=reshape(eof1_TR_1030,122,29); clear eof1_TR_1030; 
     43hgt500_eof=reshape(eof1_TR_1030,122,29); 
     44clear eof1_TR_1030; 
    4145 
    4246% on calcule l ecart type sur la serie temporelle de l HGT500 
    43 k=122*29;  
     47k=122*29; 
    4448hgt500bis=reshape(hgt500_eof,k,1); 
    45 hgt500bis=std(hgt500bis);  
     49hgt500bis=std(hgt500bis); 
    4650 
    4751% intialisation des tableaux 
    48 hgt500_filtre_compomax=NaN*ones(50,31,64,128);  
     52hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
    4953hgt500_filtre_compomin=NaN*ones(50,31,64,128); 
    5054 
    51 compteurmax=0;  
     55compteurmax=0; 
    5256compteurmin=0; 
    5357 
    54 for a=1:29; % boucle sur les annees 
    55    clear delta;  
     58% boucle sur les annees 
     59for a=1:29; 
     60   clear delta; 
    5661   delta=zeros(122,1); 
    57    for b=1:122; % boucle sur les jours : on prepare avant    
     62   % boucle sur les jours : on prepare avant 
     63   for b=1:122; 
    5864        if b>1; 
    5965            delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a); 
    6066        end; 
    6167   end; 
    62    for b=1:122; % boucle sur les jours 
    63       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    64 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    65          if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));  
     68   % boucle sur les jours 
     69   for b=1:122; 
     70      % 1ere condition (laisser une marge de 10) 
     71      if (b>20 && b<112); 
     72% cas 1 : max deltas apres negetifs et deltas avant postifs 
     73         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
    6674            compteurmax=compteurmax+1; 
    6775          hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:); 
    … …  
    98106            hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:); 
    99107            hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:); 
    100 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     108% cas 2 : min deltas apres positifs et deltas avant negatifs 
    101109         elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(hgt500bis)); 
    102110            compteurmin=compteurmin+1; 
    … …  
    137145         end; 
    138146      end; 
    139    end;          
     147   end; 
    140148end; 
    141149hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:); 
    … …  
    144152% on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences 
    145153% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    146 hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin; 
    147 hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax; 
    148  
    149 x=[-10:1:10]'; %' 
    150  
    151 figure(1); orient('landscape'); 
    152  
    153 lat=lat';  
     154hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); 
     155clear hgt500_filtre_compomin; 
     156hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); 
     157clear hgt500_filtre_compomax; 
     158 
     159x=[-10:1:10]'; 
     160 
     161figure(1); 
     162orient('landscape'); 
     163 
     164lat=lat'; 
    154165lon=lon-180; 
    155166for e=1:7; 
    … …  
    177188       delta_hgt500_filtre_min(1,2)=50.0001; 
    178189       fin=-30+24*2.5; 
    179         
     190 
    180191       clear fin 
    181192       fin=-10+16*2.5; 
    … …  
    185196       else 
    186197      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    187        end        
     198       end 
    188199       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    189200       if e==4; 
    190           co=colorbar;             
     201          co=colorbar; 
    191202          set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    192203       end; 
    193        hold on; cartemonde1; 
     204       hold on; 
     205       cartemonde1; 
    194206       set (gca,'tickDir','out'); 
    195207       axis equal 
    196208       axis([-180 180 20 80]); 
    197        if e==7;       
     209       if e==7; 
    198210      title('HGT500 composite EOF1 1030j simulation TROP ','fontsize',8) ; 
    199211       end 
    200212       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    201213       pos_vert=e/10; 
    202        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     214       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    203215end; 
    204216print -depsc2 composite_hgt500_trop_eof1_1030a.eps 
    205217 
    206 figure(2); orient('landscape'); 
     218figure(2); 
     219orient('landscape'); 
    207220 
    208221for e=1:7; 
    … …  
    230243       delta_hgt500_filtre_min(1,2)=50.0001; 
    231244       fin=-30+24*2.5; 
    232         
     245 
    233246       clear fin 
    234247       fin=-10+16*2.5; 
    … …  
    238251       else 
    239252      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    240        end        
     253       end 
    241254       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    242255       if e==4; 
    243           co=colorbar;             
     256          co=colorbar; 
    244257          set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    245258       end; 
    246        hold on; cartemonde1; 
     259       hold on; 
     260       cartemonde1; 
    247261       set (gca,'tickDir','out'); 
    248262       axis equal 
    … …  
    253267       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    254268       pos_vert=e/10; 
    255        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     269       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    256270end; 
    257271print -depsc2 composite_hgt500_trop_eof1_1030b.eps 
    258  
    259  
    260  

  • trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof1_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36 
    47load hgt500_trop.mat 
    … …  
    1215hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128); 
    1316hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64); 
    14 clear hgt500;  hgt500=hgt500b; clear hgt500b 
     17clear hgt500; 
     18hgt500=hgt500b; 
     19clear hgt500b; 
    1520 
    1621% on desaisonalise 
    1722hgt1=permute(hgt500,[2 1 3 4]); 
    18 hgt2(:,:,:)=nanmean(hgt1); clear hgt1; 
     23hgt2(:,:,:)=nanmean(hgt1); 
     24clear hgt1; 
    1925hgt3=reshape(hgt500, 3538,64,128); 
    20 hgt4(:,:)=nanmean(hgt3); clear hgt3; 
     26hgt4(:,:)=nanmean(hgt3); 
     27clear hgt3; 
    2128 
    2229for a=1:122; 
    2330   for b=1:28; 
    2431      for c=1:37; 
    25          for d=1:128;  
    26              hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                 
     32         for d=1:128; 
     33             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d)); 
    2734         end; 
    2835      end; 
    … …  
    3138clear hgt2 hgt4; 
    3239 
    33 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    34  
    3540load eof1_TR_30100.txt 
    3641 
    3742% on met sous la forme annee mois 
    38 hgt500_eof=reshape(eof1_TR_30100,122,29); clear eof1_TR_30100; 
     43hgt500_eof=reshape(eof1_TR_30100,122,29); 
     44clear eof1_TR_30100; 
    3945 
    4046% on calcule l ecart type sur la serie temporelle de l HGT500 
    41 k=122*29;  
     47k=122*29; 
    4248hgt500bis=reshape(hgt500_eof,k,1); 
    43 hgt500bis=std(hgt500bis);  
     49hgt500bis=std(hgt500bis); 
    4450 
    4551% intialisation des tableaux 
    46 hgt500_filtre_compomax=NaN*ones(50,31,64,128);  
     52hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
    4753hgt500_filtre_compomin=NaN*ones(50,31,64,128); 
    4854 
    49 compteurmax=0;  
     55compteurmax=0; 
    5056compteurmin=0; 
    5157 
    52 for a=1:29; % boucle sur les annees 
    53    clear delta;  
     58% boucle sur les annees 
     59for a=1:29; 
     60   clear delta; 
    5461   delta=zeros(122,1); 
    55    for b=1:122; % boucle sur les jours : on prepare avant    
     62   % boucle sur les jours : on prepare avant 
     63   for b=1:122; 
    5664        if b>1; 
    5765            delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a); 
    5866        end; 
    5967   end; 
    60    for b=1:122; % boucle sur les jours 
    61       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    62 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    63          if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));  
     68   % boucle sur les jours 
     69   for b=1:122; 
     70      % 1ere condition (laisser une marge de 10) 
     71      if (b>20 && b<112); 
     72% cas 1 : max deltas apres negetifs et deltas avant postifs 
     73         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
    6474            compteurmax=compteurmax+1; 
    6575          hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:); 
    … …  
    96106            hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:); 
    97107            hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:); 
    98 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     108% cas 2 : min deltas apres positifs et deltas avant negatifs 
    99109         elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(hgt500bis)); 
    100110            compteurmin=compteurmin+1; 
    … …  
    135145         end; 
    136146      end; 
    137    end;          
     147   end; 
    138148end; 
    139149hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:); 
    … …  
    142152% on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences 
    143153% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    144 hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin; 
    145 hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax; 
    146  
    147 x=[-10:1:10]'; %' 
    148  
    149 figure(1); orient('landscape'); 
    150  
    151 lat=lat';  
     154hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); 
     155clear hgt500_filtre_compomin; 
     156hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); 
     157clear hgt500_filtre_compomax; 
     158 
     159x=[-10:1:10]'; 
     160 
     161figure(1); 
     162orient('landscape'); 
     163 
     164lat=lat'; 
    152165lon=lon-180; 
    153166for e=1:7; 
    … …  
    175188       delta_hgt500_filtre_min(1,2)=100.0001; 
    176189       fin=-30+24*2.5; 
    177         
     190 
    178191       clear fin 
    179192       fin=-10+16*2.5; 
    … …  
    183196       else 
    184197      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    185        end        
     198       end 
    186199       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    187200       if e==4; 
    188           co=colorbar;             
     201          co=colorbar; 
    189202          set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5); 
    190203       end; 
    191        hold on; cartemonde1; 
     204       hold on; 
     205       cartemonde1; 
    192206       set (gca,'tickDir','out'); 
    193207       axis equal 
    194208       axis([-180 180 20 80]); 
    195        if e==7;       
     209       if e==7; 
    196210      title('HGT500 composite EOF1 30100j simulation TROP ','fontsize',8) ; 
    197211       end 
    198212       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    199213       pos_vert=e/10; 
    200        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     214       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    201215end; 
    202216print -depsc2 composite_hgt500_trop_eof1_30100a.eps 
    203217 
    204 figure(2); orient('landscape'); 
     218figure(2); 
     219orient('landscape'); 
    205220 
    206221for e=1:7; 
    … …  
    228243       delta_hgt500_filtre_min(1,2)=100.0001; 
    229244       fin=-30+24*2.5; 
    230         
     245 
    231246       clear fin 
    232247       fin=-10+16*2.5; 
    … …  
    236251       else 
    237252      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    238        end        
     253       end 
    239254       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    240255       if e==4; 
    241           co=colorbar;             
     256          co=colorbar; 
    242257          set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5); 
    243258       end; 
    244        hold on; cartemonde1; 
     259       hold on; 
     260       cartemonde1; 
    245261       set (gca,'tickDir','out'); 
    246262       axis equal 
    … …  
    251267       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    252268       pos_vert=e/10; 
    253        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     269       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    254270end; 
    255271print -depsc2 composite_hgt500_trop_eof1_30100b.eps 
    256  
    257  
    258  

  • trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof2_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36 
    47load hgt500_trop.mat 
    … …  
    1215hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128); 
    1316hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64); 
    14 clear hgt500;  hgt500=hgt500b; clear hgt500b 
    15  
     17clear hgt500; 
     18hgt500=hgt500b; 
     19clear hgt500b; 
    1620 
    1721% on desaisonalise 
    1822hgt1=permute(hgt500,[2 1 3 4]); 
    19 hgt2(:,:,:)=nanmean(hgt1); clear hgt1; 
     23hgt2(:,:,:)=nanmean(hgt1); 
     24clear hgt1; 
    2025hgt3=reshape(hgt500, 3538,64,128); 
    21 hgt4(:,:)=nanmean(hgt3); clear hgt3; 
     26hgt4(:,:)=nanmean(hgt3); 
     27clear hgt3; 
    2228 
    2329for a=1:122; 
    2430   for b=1:28; 
    2531      for c=1:37; 
    26          for d=1:128;  
    27              hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                 
     32         for d=1:128; 
     33             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d)); 
    2834         end; 
    2935      end; 
    … …  
    3238clear hgt2 hgt4; 
    3339 
    34  
    35 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    36  
    3740load eof2_TR_1030.txt 
    3841 
    3942% on met sous la forme annee mois 
    40 hgt500_eof=reshape(eof2_TR_1030,122,29); clear eof2_TR_1030; 
     43hgt500_eof=reshape(eof2_TR_1030,122,29); 
     44clear eof2_TR_1030; 
    4145 
    4246% on calcule l ecart type sur la serie temporelle de l HGT500 
    43 k=122*29;  
     47k=122*29; 
    4448hgt500bis=reshape(hgt500_eof,k,1); 
    45 hgt500bis=std(hgt500bis);  
     49hgt500bis=std(hgt500bis); 
    4650 
    4751% intialisation des tableaux 
    48 hgt500_filtre_compomax=NaN*ones(50,31,64,128);  
     52hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
    4953hgt500_filtre_compomin=NaN*ones(50,31,64,128); 
    5054 
    51 compteurmax=0;  
     55compteurmax=0; 
    5256compteurmin=0; 
    5357 
    54 for a=1:29; % boucle sur les annees 
    55    clear delta;  
     58% boucle sur les annees 
     59for a=1:29; 
     60   clear delta; 
    5661   delta=zeros(122,1); 
    57    for b=1:122; % boucle sur les jours : on prepare avant    
     62   % boucle sur les jours : on prepare avant 
     63   for b=1:122; 
    5864        if b>1; 
    5965            delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a); 
    6066        end; 
    6167   end; 
    62    for b=1:122; % boucle sur les jours 
    63       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    64 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    65          if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis));  
     68   % boucle sur les jours 
     69   for b=1:122; 
     70      % 1ere condition (laisser une marge de 10) 
     71      if (b>20 && b<112); 
     72% cas 1 : max deltas apres negetifs et deltas avant postifs 
     73         if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis)); 
    6674            compteurmax=compteurmax+1; 
    6775          hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:); 
    … …  
    98106            hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:); 
    99107            hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:); 
    100 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     108% cas 2 : min deltas apres positifs et deltas avant negatifs 
    101109         elseif (delta(b+1)>0 && delta(b)<0 && hgt500_eof(b,a)<(hgt500bis)); 
    102110            compteurmin=compteurmin+1; 
    … …  
    137145         end; 
    138146      end; 
    139    end;          
     147   end; 
    140148end; 
    141149hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:); 
    … …  
    144152% on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences 
    145153% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    146 hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin; 
    147 hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax; 
    148  
    149 x=[-10:1:10]'; %' 
    150  
    151 figure(1); orient('landscape'); 
    152  
    153 lat=lat';  
     154hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); 
     155clear hgt500_filtre_compomin; 
     156hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); 
     157clear hgt500_filtre_compomax; 
     158 
     159x=[-10:1:10]'; 
     160 
     161figure(1); 
     162orient('landscape'); 
     163 
     164lat=lat'; 
    154165lon=lon-180; 
    155166for e=1:7; 
    … …  
    177188       delta_hgt500_filtre_min(1,2)=50.0001; 
    178189       fin=-30+24*2.5; 
    179         
     190 
    180191       clear fin 
    181192       fin=-10+16*2.5; 
    … …  
    185196       else 
    186197      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    187        end        
     198       end 
    188199       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    189200       if e==4; 
    190           co=colorbar;             
     201          co=colorbar; 
    191202          set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    192203       end; 
    193        hold on; cartemonde1; 
     204       hold on; 
     205       cartemonde1; 
    194206       set (gca,'tickDir','out'); 
    195207       axis equal 
    196208       axis([-180 180 20 80]); 
    197        if e==7;       
     209       if e==7; 
    198210      title('HGT500 composite EOF2 1030j simulation TROP ','fontsize',8) ; 
    199211       end 
    200212       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    201213       pos_vert=e/10; 
    202        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     214       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    203215end; 
    204216print -depsc2 composite_hgt500_trop_eof2_1030a.eps 
    205217 
    206 figure(2); orient('landscape'); 
     218figure(2); 
     219orient('landscape'); 
    207220 
    208221for e=1:7; 
    … …  
    230243       delta_hgt500_filtre_min(1,2)=50.0001; 
    231244       fin=-30+24*2.5; 
    232         
     245 
    233246       clear fin 
    234247       fin=-10+16*2.5; 
    … …  
    238251       else 
    239252      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    240        end        
     253       end 
    241254       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    242255       if e==4; 
    243           co=colorbar;             
     256          co=colorbar; 
    244257          set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    245258       end; 
    246        hold on; cartemonde1; 
     259       hold on; 
     260       cartemonde1; 
    247261       set (gca,'tickDir','out'); 
    248262       axis equal 
    … …  
    253267       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    254268       pos_vert=e/10; 
    255        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     269       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    256270end; 
    257271print -depsc2 composite_hgt500_trop_eof2_1030b.eps 
    258  
    259  
    260  

  • trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof2_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36 
    47load hgt500_trop.mat 
    … …  
    1215hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128); 
    1316hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64); 
    14 clear hgt500;  hgt500=hgt500b; clear hgt500b 
    15  
     17clear hgt500; 
     18hgt500=hgt500b; 
     19clear hgt500b; 
    1620 
    1721% on desaisonalise 
    1822hgt1=permute(hgt500,[2 1 3 4]); 
    19 hgt2(:,:,:)=nanmean(hgt1); clear hgt1; 
     23hgt2(:,:,:)=nanmean(hgt1); 
     24clear hgt1; 
    2025hgt3=reshape(hgt500, 3538,64,128); 
    21 hgt4(:,:)=nanmean(hgt3); clear hgt3; 
     26hgt4(:,:)=nanmean(hgt3); 
     27clear hgt3; 
    2228 
    2329for a=1:122; 
    2430   for b=1:28; 
    2531      for c=1:37; 
    26          for d=1:128;  
    27              hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                 
     32         for d=1:128; 
     33             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d)); 
    2834         end; 
    2935      end; 
    … …  
    3238clear hgt2 hgt4; 
    3339 
    34  
    35  
    36  
    37  
    38 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    39  
    4040load eof2_TR_30100.txt 
    4141 
    4242% on met sous la forme annee mois 
    43 hgt500_eof=reshape(eof2_TR_30100,122,29); clear eof2_TR_30100; 
     43hgt500_eof=reshape(eof2_TR_30100,122,29); 
     44clear eof2_TR_30100; 
    4445 
    4546% on calcule l ecart type sur la serie temporelle de l HGT500 
    46 k=122*29;  
     47k=122*29; 
    4748hgt500bis=reshape(hgt500_eof,k,1); 
    48 hgt500bis=std(hgt500bis);  
     49hgt500bis=std(hgt500bis); 
    4950 
    5051% intialisation des tableaux 
    51 hgt500_filtre_compomax=NaN*ones(50,31,64,128);  
     52hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
    5253hgt500_filtre_compomin=NaN*ones(50,31,64,128); 
    5354 
    54 compteurmax=0;  
     55compteurmax=0; 
    5556compteurmin=0; 
    5657 
    57 for a=1:29; % boucle sur les annees 
    58    clear delta;  
     58% boucle sur les annees 
     59for a=1:29; 
     60   clear delta; 
    5961   delta=zeros(122,1); 
    60    for b=1:122; % boucle sur les jours : on prepare avant    
     62   % boucle sur les jours : on prepare avant 
     63   for b=1:122; 
    6164        if b>1; 
    6265            delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a); 
    6366        end; 
    6467   end; 
    65    for b=1:122; % boucle sur les jours 
    66       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    67 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    68          if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis));  
     68   % boucle sur les jours 
     69   for b=1:122; 
     70      % 1ere condition (laisser une marge de 10) 
     71      if (b>20 && b<112); 
     72% cas 1 : max deltas apres negetifs et deltas avant postifs 
     73         if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis)); 
    6974            compteurmax=compteurmax+1; 
    7075          hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:); 
    … …  
    101106            hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:); 
    102107            hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:); 
    103 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     108% cas 2 : min deltas apres positifs et deltas avant negatifs 
    104109         elseif (delta(b+1)>0 && delta(b)<0 && hgt500_eof(b,a)<(hgt500bis)); 
    105110            compteurmin=compteurmin+1; 
    … …  
    140145         end; 
    141146      end; 
    142    end;          
     147   end; 
    143148end; 
    144149hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:); 
    … …  
    147152% on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences 
    148153% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    149 hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin; 
    150 hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax; 
    151  
    152 x=[-10:1:10]'; %' 
    153  
    154 figure(1); orient('landscape'); 
    155  
    156 lat=lat';  
     154hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); 
     155clear hgt500_filtre_compomin; 
     156hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); 
     157clear hgt500_filtre_compomax; 
     158 
     159x=[-10:1:10]'; 
     160 
     161figure(1); 
     162orient('landscape'); 
     163 
     164lat=lat'; 
    157165lon=lon-180; 
    158166for e=1:7; 
    … …  
    180188       delta_hgt500_filtre_min(1,2)=100.0001; 
    181189       fin=-30+24*2.5; 
    182         
     190 
    183191       clear fin 
    184192       fin=-10+16*2.5; 
    … …  
    188196       else 
    189197      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    190        end        
     198       end 
    191199       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    192200       if e==4; 
    193           co=colorbar;             
     201          co=colorbar; 
    194202          set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5); 
    195203       end; 
    196        hold on; cartemonde1; 
     204       hold on; 
     205       cartemonde1; 
    197206       set (gca,'tickDir','out'); 
    198207       axis equal 
    199208       axis([-180 180 20 80]); 
    200        if e==7;       
     209       if e==7; 
    201210      title('HGT500 composite EOF2 30100j simulation TROP ','fontsize',8) ; 
    202211       end 
    203212       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    204213       pos_vert=e/10; 
    205        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     214       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    206215end; 
    207216print -depsc2 composite_hgt500_trop_eof2_30100a.eps 
    208217 
    209 figure(2); orient('landscape'); 
     218figure(2); 
     219orient('landscape'); 
    210220 
    211221for e=1:7; 
    … …  
    233243       delta_hgt500_filtre_min(1,2)=100.0001; 
    234244       fin=-30+24*2.5; 
    235         
     245 
    236246       clear fin 
    237247       fin=-10+16*2.5; 
    … …  
    241251       else 
    242252      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    243        end        
     253       end 
    244254       set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6); 
    245255       if e==4; 
    246           co=colorbar;             
     256          co=colorbar; 
    247257          set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5); 
    248258       end; 
    249        hold on; cartemonde1; 
     259       hold on; 
     260       cartemonde1; 
    250261       set (gca,'tickDir','out'); 
    251262       axis equal 
    … …  
    256267       text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    257268       pos_vert=e/10; 
    258        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     269       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    259270end; 
    260271print -depsc2 composite_hgt500_trop_eof2_30100b.eps 
    261  
    262  
    263  

  • trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof1_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47 
    … …  
    8891 
    8992ncload('rlut_d.AfNQIVIV.200006-09.nc','rlut','lat','lon'); 
    90 olr(:,29,:,:)=rlut; clear rlut; 
     93olr(:,29,:,:)=rlut; 
     94clear rlut; 
    9195 
    9296% selction du domaine geographique 
    … …  
    9599olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    96100clear olr; 
    97 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    98101 
    99102load eof1_AFR_1030.txt 
    100103 
    101104% on met sous la forme annee mois 
    102 olr_eof=reshape(eof1_AFR_1030,122,29); clear eof1_AFR_1030; 
     105olr_eof=reshape(eof1_AFR_1030,122,29); 
     106clear eof1_AFR_1030; 
    103107 
    104108% on calcule l ecart type sur la serie temporelle de l OLR 
    105 k=122*29;  
     109k=122*29; 
    106110olrbis=reshape(olr_eof,k,1); 
    107 olrbis=std(olrbis);  
     111olrbis=std(olrbis); 
    108112 
    109113% intialisation des tableaux 
    110 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     114olr_filtre_compomax=NaN*ones(50,31,64,128); 
    111115olr_filtre_compomin=NaN*ones(50,31,64,128); 
    112116 
    113 compteurmax=0;  
     117compteurmax=0; 
    114118compteurmin=0; 
    115119 
    116 for a=1:29; % boucle sur les annees 
    117    clear delta;  
     120% boucle sur les annees 
     121for a=1:29; 
     122   clear delta; 
    118123   delta=zeros(122,1); 
    119    for b=1:122; % boucle sur les jours : on prepare avant    
     124   % boucle sur les jours : on prepare avant 
     125   for b=1:122; 
    120126        if b>1; 
    121127            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    122128        end; 
    123129   end; 
    124    for b=1:122; % boucle sur les jours 
    125       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    126 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    127          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     130   % boucle sur les jours 
     131   for b=1:122; 
     132      % 1ere condition (laisser une marge de 10) 
     133      if (b>20 && b<112); 
     134% cas 1 : max deltas apres negetifs et deltas avant postifs 
     135         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    128136            compteurmax=compteurmax+1; 
    129137          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    160168            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    161169            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    162 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     170% cas 2 : min deltas apres positifs et deltas avant negatifs 
    163171         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis)); 
    164172            compteurmin=compteurmin+1; 
    … …  
    199207         end; 
    200208      end; 
    201    end;          
     209   end; 
    202210end; 
    203211% on fait le test de Student 
    … …  
    217225% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    218226% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    219 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    220 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    221  
    222 x=[-10:1:10]'; %' 
    223  
    224 figure(1); orient('landscape'); 
    225  
    226 lat=lat';  
     227olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     228clear olr_filtre_compomin; 
     229olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     230clear olr_filtre_compomax; 
     231 
     232x=[-10:1:10]'; 
     233 
     234figure(1); 
     235orient('landscape'); 
     236 
     237lat=lat'; 
    227238lon=lon-180; 
    228239for e=1:7; 
    … …  
    255266       delta_olr_filtre_min(1,2)=50.0001; 
    256267       fin=-30+24*2.5; 
    257         
     268 
    258269       clear fin 
    259270       fin=-10+16*2.5; 
    … …  
    263274       else 
    264275      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    265        end        
     276       end 
    266277       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    267278       if e==4; 
    268           co=colorbar;             
     279          co=colorbar; 
    269280          set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    270281       end; 
    271        hold on; cartemonde1; 
     282       hold on; 
     283       cartemonde1; 
    272284       set (gca,'tickDir','out'); 
    273285       axis equal 
    274286       axis([-180 180 -20 40]); 
    275        if e==7;       
    276       title('OLR composite EOF1 1030j simulation AFR ','fontsize',8) ; 
     287       if e==7; 
     288          title('OLR composite EOF1 1030j simulation AFR ','fontsize',8) ; 
    277289       end 
    278290       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    279291       pos_vert=e/10; 
    280        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     292       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    281293end; 
    282294 
    283 figure(1); print -depsc2 composite_olr_EOF1_1030j_simulation_AFR_part1.eps; 
    284  
    285 figure(2); orient('landscape'); 
     295figure(1); 
     296print -depsc2 composite_olr_EOF1_1030j_simulation_AFR_part1.eps; 
     297 
     298figure(2); 
     299orient('landscape'); 
    286300 
    287301for e=1:7; 
    … …  
    314328       delta_olr_filtre_min(1,2)=50.0001; 
    315329       fin=-30+24*2.5; 
    316         
     330 
    317331       clear fin 
    318332       fin=-10+16*2.5; 
    … …  
    322336       else 
    323337      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    324        end        
     338       end 
    325339       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    326340       if e==4; 
    327           co=colorbar;             
     341          co=colorbar; 
    328342          set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    329343       end; 
    330        hold on; cartemonde1; 
     344       hold on; 
     345       cartemonde1; 
    331346       set (gca,'tickDir','out'); 
    332347       axis equal 
    … …  
    337352       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    338353       pos_vert=e/10; 
    339        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     354       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    340355end; 
    341356 
    342 figure(2); print -depsc2 composite_olr_EOF1_1030j_simulation_AFR_part2.eps; 
    343  
    344  
    345  
     357figure(2); 
     358print -depsc2 composite_olr_EOF1_1030j_simulation_AFR_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof1_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47 
    … …  
    9598olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    9699clear olr; 
    97 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    98100 
    99101load eof1_AFR_30100.txt 
    100102 
    101103% on met sous la forme annee mois 
    102 olr_eof=reshape(eof1_AFR_30100,122,29); clear eof1_AFR_30100; 
     104olr_eof=reshape(eof1_AFR_30100,122,29); 
     105clear eof1_AFR_30100; 
    103106 
    104107% on calcule l ecart type sur la serie temporelle de l OLR 
    105 k=122*29;  
     108k=122*29; 
    106109olrbis=reshape(olr_eof,k,1); 
    107 olrbis=std(olrbis);  
     110olrbis=std(olrbis); 
    108111 
    109112% intialisation des tableaux 
    110 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     113olr_filtre_compomax=NaN*ones(50,31,64,128); 
    111114olr_filtre_compomin=NaN*ones(50,31,64,128); 
    112115 
    113 compteurmax=0;  
     116compteurmax=0; 
    114117compteurmin=0; 
    115118 
    116 for a=1:29; % boucle sur les annees 
    117    clear delta;  
     119% boucle sur les annees 
     120for a=1:29; 
     121   clear delta; 
    118122   delta=zeros(122,1); 
    119    for b=1:122; % boucle sur les jours : on prepare avant    
     123   % boucle sur les jours : on prepare avant 
     124   for b=1:122; 
    120125        if b>1; 
    121126            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    122127        end; 
    123128   end; 
    124    for b=1:122; % boucle sur les jours 
    125       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    126 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    127          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     129   % boucle sur les jours 
     130   for b=1:122; 
     131      % 1ere condition (laisser une marge de 10) 
     132      if (b>20 && b<112); 
     133% cas 1 : max deltas apres negetifs et deltas avant postifs 
     134         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    128135            compteurmax=compteurmax+1; 
    129136          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    160167            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    161168            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    162 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     169% cas 2 : min deltas apres positifs et deltas avant negatifs 
    163170         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis)); 
    164171            compteurmin=compteurmin+1; 
    … …  
    199206         end; 
    200207      end; 
    201    end;          
     208   end; 
    202209end; 
    203210% on fait le test de Student 
    … …  
    217224% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    218225% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    219 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    220 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    221  
    222 x=[-10:1:10]'; %' 
    223  
    224 figure(1); orient('landscape'); 
    225  
    226 lat=lat';  
     226olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     227clear olr_filtre_compomin; 
     228olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     229clear olr_filtre_compomax; 
     230 
     231x=[-10:1:10]'; 
     232 
     233figure(1); 
     234orient('landscape'); 
     235 
     236lat=lat'; 
    227237lon=lon-180; 
    228238for e=1:7; 
    … …  
    255265       delta_olr_filtre_min(1,2)=50.0001; 
    256266       fin=-30+24*2.5; 
    257         
     267 
    258268       clear fin 
    259269       fin=-10+16*2.5; 
    … …  
    263273       else 
    264274      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    265        end        
     275       end 
    266276       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    267277       if e==4; 
    268           co=colorbar;             
     278          co=colorbar; 
    269279          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    270280       end; 
    271        hold on; cartemonde1; 
     281       hold on; 
     282       cartemonde1; 
    272283       set (gca,'tickDir','out'); 
    273284       axis equal 
    274285       axis([-180 180 -20 40]); 
    275        if e==7;       
     286       if e==7; 
    276287      title('OLR composite EOF1 30100j simulation AFR ','fontsize',8) ; 
    277288       end 
    278289       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    279290       pos_vert=e/10; 
    280        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     291       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    281292end; 
    282293 
    283 figure(1); print -depsc2 composite_olr_EOF1_30100j_simulation_AFR_part1.eps; 
    284  
    285 figure(2); orient('landscape'); 
     294figure(1); 
     295print -depsc2 composite_olr_EOF1_30100j_simulation_AFR_part1.eps; 
     296 
     297figure(2); 
     298orient('landscape'); 
    286299 
    287300for e=1:7; 
    … …  
    314327       delta_olr_filtre_min(1,2)=50.0001; 
    315328       fin=-30+24*2.5; 
    316         
     329 
    317330       clear fin 
    318331       fin=-10+16*2.5; 
    … …  
    322335       else 
    323336      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    324        end        
     337       end 
    325338       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    326339       if e==4; 
    327           co=colorbar;             
     340          co=colorbar; 
    328341          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    329342       end; 
    330        hold on; cartemonde1; 
     343       hold on; 
     344       cartemonde1; 
    331345       set (gca,'tickDir','out'); 
    332346       axis equal 
    … …  
    337351       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    338352       pos_vert=e/10; 
    339        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     353       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    340354end; 
    341355 
    342 figure(2); print -depsc2 composite_olr_EOF1_30100j_simulation_AFR_part2.eps; 
    343  
    344  
    345  
     356figure(2); 
     357print -depsc2 composite_olr_EOF1_30100j_simulation_AFR_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof2_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47 
    … …  
    9598olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    9699clear olr; 
    97 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    98100 
    99101load eof2_AFR_1030.txt 
    100102 
    101103% on met sous la forme annee mois 
    102 olr_eof=reshape(eof2_AFR_1030,122,29); clear eof2_AFR_1030; 
     104olr_eof=reshape(eof2_AFR_1030,122,29); 
     105clear eof2_AFR_1030; 
    103106 
    104107% on calcule l ecart type sur la serie temporelle de l OLR 
    105 k=122*29;  
     108k=122*29; 
    106109olrbis=reshape(olr_eof,k,1); 
    107 olrbis=1.25*std(olrbis);  
     110olrbis=1.25*std(olrbis); 
    108111 
    109112% intialisation des tableaux 
    110 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     113olr_filtre_compomax=NaN*ones(50,31,64,128); 
    111114olr_filtre_compomin=NaN*ones(50,31,64,128); 
    112115 
    113 compteurmax=0;  
     116compteurmax=0; 
    114117compteurmin=0; 
    115118 
    116 for a=1:29; % boucle sur les annees 
    117    clear delta;  
     119% boucle sur les annees 
     120for a=1:29; 
     121   clear delta; 
    118122   delta=zeros(122,1); 
    119    for b=1:122; % boucle sur les jours : on prepare avant    
     123   % boucle sur les jours : on prepare avant 
     124   for b=1:122; 
    120125        if b>1; 
    121126            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    122127        end; 
    123128   end; 
    124    for b=1:122; % boucle sur les jours 
    125       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    126 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    127          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     129   % boucle sur les jours 
     130   for b=1:122; 
     131      % 1ere condition (laisser une marge de 10) 
     132      if (b>20 && b<112); 
     133% cas 1 : max deltas apres negetifs et deltas avant postifs 
     134         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    128135            compteurmax=compteurmax+1; 
    129136          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    160167            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    161168            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    162 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     169% cas 2 : min deltas apres positifs et deltas avant negatifs 
    163170         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis)); 
    164171            compteurmin=compteurmin+1; 
    … …  
    199206         end; 
    200207      end; 
    201    end;          
     208   end; 
    202209end; 
    203210 
    … …  
    221228% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    222229% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    223 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    224 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    225  
    226 x=[-10:1:10]'; %' 
    227  
    228 figure(1); orient('landscape'); 
    229  
    230 lat=lat';  
     230olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     231clear olr_filtre_compomin; 
     232olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     233clear olr_filtre_compomax; 
     234 
     235x=[-10:1:10]'; 
     236 
     237figure(1); 
     238orient('landscape'); 
     239 
     240lat=lat'; 
    231241lon=lon-180; 
    232242for e=1:7; 
    … …  
    259269       delta_olr_filtre_min(1,2)=50.0001; 
    260270       fin=-30+24*2.5; 
    261         
     271 
    262272       clear fin 
    263273       fin=-10+16*2.5; 
    … …  
    267277       else 
    268278      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    269        end        
     279       end 
    270280       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    271281       if e==4; 
    272           co=colorbar;             
     282          co=colorbar; 
    273283          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    274284       end; 
    275        hold on; cartemonde1; 
     285       hold on; 
     286       cartemonde1; 
    276287       set (gca,'tickDir','out'); 
    277288       axis equal 
    278289       axis([-180 180 -20 40]); 
    279        if e==7;       
     290       if e==7; 
    280291      title('OLR composite EOF2 1030j simulation AFR ','fontsize',8) ; 
    281292       end 
    282293       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    283294       pos_vert=e/10; 
    284        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     295       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    285296end; 
    286297 
    287 figure(1); print -depsc2 composite_olr_EOF2_1030j_simulation_AFR_part1.eps; 
    288  
    289 figure(2); orient('landscape'); 
     298figure(1); 
     299print -depsc2 composite_olr_EOF2_1030j_simulation_AFR_part1.eps; 
     300 
     301figure(2); 
     302orient('landscape'); 
    290303 
    291304for e=1:7; 
    … …  
    319332       delta_olr_filtre_min(1,2)=50.0001; 
    320333       fin=-30+24*2.5; 
    321         
     334 
    322335       clear fin 
    323336       fin=-10+16*2.5; 
    … …  
    327340       else 
    328341      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    329        end        
     342       end 
    330343       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    331344       if e==4; 
    332           co=colorbar;             
     345          co=colorbar; 
    333346          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    334347       end; 
    335        hold on; cartemonde1; 
     348       hold on; 
     349       cartemonde1; 
    336350       set (gca,'tickDir','out'); 
    337351       axis equal 
    … …  
    342356       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    343357       pos_vert=e/10; 
    344        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     358       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    345359end; 
    346360 
    347 figure(2); print -depsc2 composite_olr_EOF2_1030j_simulation_AFR_part2.eps; 
    348  
    349  
    350  
     361figure(2); 
     362print -depsc2 composite_olr_EOF2_1030j_simulation_AFR_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof2_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47 
    … …  
    9598olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    9699clear olr; 
    97 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    98100 
    99101load eof2_AFR_30100.txt 
    100102 
    101103% on met sous la forme annee mois 
    102 olr_eof=reshape(eof2_AFR_30100,122,29); clear eof2_AFR_30100; 
     104olr_eof=reshape(eof2_AFR_30100,122,29); 
     105clear eof2_AFR_30100; 
    103106 
    104107% on calcule l ecart type sur la serie temporelle de l OLR 
    105 k=122*29;  
     108k=122*29; 
    106109olrbis=reshape(olr_eof,k,1); 
    107 olrbis=std(olrbis);  
     110olrbis=std(olrbis); 
    108111 
    109112% intialisation des tableaux 
    110 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     113olr_filtre_compomax=NaN*ones(50,31,64,128); 
    111114olr_filtre_compomin=NaN*ones(50,31,64,128); 
    112115 
    113 compteurmax=0;  
     116compteurmax=0; 
    114117compteurmin=0; 
    115118 
    116 for a=1:29; % boucle sur les annees 
    117    clear delta;  
     119% boucle sur les annees 
     120for a=1:29; 
     121   clear delta; 
    118122   delta=zeros(122,1); 
    119    for b=1:122; % boucle sur les jours : on prepare avant    
     123   % boucle sur les jours : on prepare avant 
     124   for b=1:122; 
    120125        if b>1; 
    121126            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    122127        end; 
    123128   end; 
    124    for b=1:122; % boucle sur les jours 
    125       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    126 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    127          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     129   % boucle sur les jours 
     130   for b=1:122; 
     131      % 1ere condition (laisser une marge de 10) 
     132      if (b>20 && b<112); 
     133% cas 1 : max deltas apres negetifs et deltas avant postifs 
     134         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    128135            compteurmax=compteurmax+1; 
    129136          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    160167            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    161168            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    162 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     169% cas 2 : min deltas apres positifs et deltas avant negatifs 
    163170         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis)); 
    164171            compteurmin=compteurmin+1; 
    … …  
    199206         end; 
    200207      end; 
    201    end;          
     208   end; 
    202209end; 
    203210% on fait le test de Student 
    … …  
    217224% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    218225% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    219 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    220 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    221  
    222 x=[-10:1:10]'; %' 
    223  
    224 figure(1); orient('landscape'); 
    225  
    226 lat=lat';  
     226olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     227clear olr_filtre_compomin; 
     228olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     229clear olr_filtre_compomax; 
     230 
     231x=[-10:1:10]'; 
     232 
     233figure(1); 
     234orient('landscape'); 
     235 
     236lat=lat'; 
    227237lon=lon-180; 
    228238for e=1:7; 
    … …  
    255265       delta_olr_filtre_min(1,2)=50.0001; 
    256266       fin=-30+24*2.5; 
    257         
     267 
    258268       clear fin 
    259269       fin=-10+16*2.5; 
    … …  
    263273       else 
    264274      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    265        end        
     275       end 
    266276       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    267277       if e==4; 
    268           co=colorbar;             
     278          co=colorbar; 
    269279          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    270280       end; 
    271        hold on; cartemonde1; 
     281       hold on; 
     282       cartemonde1; 
    272283       set (gca,'tickDir','out'); 
    273284       axis equal 
    274285       axis([-180 180 -20 40]); 
    275        if e==7;       
     286       if e==7; 
    276287      title('OLR composite EOF2 30100j simulation AFR ','fontsize',8) ; 
    277288       end 
    278289       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    279290       pos_vert=e/10; 
    280        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     291       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    281292end; 
    282293 
    283 figure(1); print -depsc2 composite_olr_EOF2_30100j_simulation_AFR_part1.eps; 
    284  
    285 figure(2); orient('landscape'); 
     294figure(1); 
     295print -depsc2 composite_olr_EOF2_30100j_simulation_AFR_part1.eps; 
     296 
     297figure(2); 
     298orient('landscape'); 
    286299 
    287300for e=1:7; 
    … …  
    314327       delta_olr_filtre_min(1,2)=50.0001; 
    315328       fin=-30+24*2.5; 
    316         
     329 
    317330       clear fin 
    318331       fin=-10+16*2.5; 
    … …  
    322335       else 
    323336      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    324        end        
     337       end 
    325338       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    326339       if e==4; 
    327           co=colorbar;             
     340          co=colorbar; 
    328341          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    329342       end; 
    330        hold on; cartemonde1; 
     343       hold on; 
     344       cartemonde1; 
    331345       set (gca,'tickDir','out'); 
    332346       axis equal 
    … …  
    337351       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    338352       pos_vert=e/10; 
    339        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     353       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    340354end; 
    341355 
    342 figure(2); print -depsc2 composite_olr_EOF2_30100j_simulation_AFR_part2.eps; 
    343  
    344  
    345  
     356figure(2); 
     357print -depsc2 composite_olr_EOF2_30100j_simulation_AFR_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof1_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47cd('INDE') 
    … …  
    9699olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    97100clear olr; 
    98 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    99101 
    100102load eof1_AS_1030.txt 
    101103 
    102104% on met sous la forme annee mois 
    103 olr_eof=reshape(eof1_AS_1030,122,29); clear eof1_AS_1030; 
     105olr_eof=reshape(eof1_AS_1030,122,29); 
     106clear eof1_AS_1030; 
    104107 
    105108% on calcule l ecart type sur la serie temporelle de l OLR 
    106 k=122*29;  
     109k=122*29; 
    107110olrbis=reshape(olr_eof,k,1); 
    108 olrbis=std(olrbis);  
     111olrbis=std(olrbis); 
    109112 
    110113% intialisation des tableaux 
    111 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     114olr_filtre_compomax=NaN*ones(50,31,64,128); 
    112115olr_filtre_compomin=NaN*ones(50,31,64,128); 
    113116 
    114 compteurmax=0;  
     117compteurmax=0; 
    115118compteurmin=0; 
    116119 
    117 for a=1:29; % boucle sur les annees 
    118    clear delta;  
     120% boucle sur les annees 
     121for a=1:29; 
     122   clear delta; 
    119123   delta=zeros(122,1); 
    120    for b=1:122; % boucle sur les jours : on prepare avant    
     124   % boucle sur les jours : on prepare avant 
     125   for b=1:122; 
    121126        if b>1; 
    122127            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    123128        end; 
    124129   end; 
    125    for b=1:122; % boucle sur les jours 
    126       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    127 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    128          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     130   % boucle sur les jours 
     131   for b=1:122; 
     132      % 1ere condition (laisser une marge de 10) 
     133      if (b>20 && b<112); 
     134% cas 1 : max deltas apres negetifs et deltas avant postifs 
     135         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    129136            compteurmax=compteurmax+1; 
    130137          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    161168            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    162169            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    163 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     170% cas 2 : min deltas apres positifs et deltas avant negatifs 
    164171         elseif (delta(b+1)>0 && delta(b)<0  && olr_eof(b,a)<(-olrbis)); 
    165172            compteurmin=compteurmin+1; 
    … …  
    200207         end; 
    201208      end; 
    202    end;          
     209   end; 
    203210end; 
    204211% on fait le test de Student 
    … …  
    218225% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    219226% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    220 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    221 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    222  
    223 x=[-10:1:10]'; %' 
    224  
    225 figure(1); orient('landscape'); 
    226  
    227 lat=lat';  
     227olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     228clear olr_filtre_compomin; 
     229olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     230clear olr_filtre_compomax; 
     231 
     232x=[-10:1:10]'; 
     233 
     234figure(1); 
     235orient('landscape'); 
     236 
     237lat=lat'; 
    228238lon=lon-180; 
    229239for e=1:7; 
    … …  
    256266       delta_olr_filtre_min(1,2)=50.0001; 
    257267       fin=-30+24*2.5; 
    258         
     268 
    259269       clear fin 
    260270       fin=-10+16*2.5; 
    … …  
    264274       else 
    265275      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    266        end        
     276       end 
    267277       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    268278       if e==4; 
    269           co=colorbar;             
     279          co=colorbar; 
    270280          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    271281       end; 
    272        hold on; cartemonde1; 
     282       hold on; 
     283       cartemonde1; 
    273284       set (gca,'tickDir','out'); 
    274285       axis equal 
    275286       axis([-180 180 -20 40]); 
    276        if e==7;       
     287       if e==7; 
    277288      title('OLR composite EOF1 1030j simulation AS ','fontsize',8) ; 
    278289       end 
    279290       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    280291       pos_vert=e/10; 
    281        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     292       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    282293end; 
    283294 
    284 figure(1); print -depsc2 composite_olr_EOF1_1030j_simulation_AS_part1.eps; 
    285  
    286 figure(2); orient('landscape'); 
     295figure(1); 
     296print -depsc2 composite_olr_EOF1_1030j_simulation_AS_part1.eps; 
     297 
     298figure(2); 
     299orient('landscape'); 
    287300 
    288301for e=1:7; 
    … …  
    315328       delta_olr_filtre_min(1,2)=50.0001; 
    316329       fin=-30+24*2.5; 
    317         
     330 
    318331       clear fin 
    319332       fin=-10+16*2.5; 
    … …  
    323336       else 
    324337      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    325        end        
     338       end 
    326339       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    327340       if e==4; 
    328           co=colorbar;             
     341          co=colorbar; 
    329342          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    330343       end; 
    331        hold on; cartemonde1; 
     344       hold on; 
     345       cartemonde1; 
    332346       set (gca,'tickDir','out'); 
    333347       axis equal 
    … …  
    338352       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    339353       pos_vert=e/10; 
    340        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     354       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    341355end; 
    342356 
    343 figure(2); print -depsc2 composite_olr_EOF1_1030j_simulation_AS_part2.eps; 
    344  
    345  
    346  
     357figure(2); 
     358print -depsc2 composite_olr_EOF1_1030j_simulation_AS_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof1_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47cd('INDE') 
    … …  
    9699olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    97100clear olr; 
    98 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    99101 
    100102load eof1_AS_30100.txt 
    101103 
    102104% on met sous la forme annee mois 
    103 olr_eof=reshape(eof1_AS_30100,122,29); clear eof1_AS_30100; 
     105olr_eof=reshape(eof1_AS_30100,122,29); 
     106clear eof1_AS_30100; 
    104107 
    105108% on calcule l ecart type sur la serie temporelle de l OLR 
    106 k=122*29;  
     109k=122*29; 
    107110olrbis=reshape(olr_eof,k,1); 
    108 olrbis=std(olrbis);  
     111olrbis=std(olrbis); 
    109112 
    110113% intialisation des tableaux 
    111 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     114olr_filtre_compomax=NaN*ones(50,31,64,128); 
    112115olr_filtre_compomin=NaN*ones(50,31,64,128); 
    113116 
    114 compteurmax=0;  
     117compteurmax=0; 
    115118compteurmin=0; 
    116119 
    117 for a=1:29; % boucle sur les annees 
    118    clear delta;  
     120% boucle sur les annees 
     121for a=1:29; 
     122   clear delta; 
    119123   delta=zeros(122,1); 
    120    for b=1:122; % boucle sur les jours : on prepare avant    
     124   % boucle sur les jours : on prepare avant 
     125   for b=1:122; 
    121126        if b>1; 
    122127            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    123128        end; 
    124129   end; 
    125    for b=1:122; % boucle sur les jours 
    126       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    127 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    128          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     130   % boucle sur les jours 
     131   for b=1:122; 
     132      % 1ere condition (laisser une marge de 10) 
     133      if (b>20 && b<112); 
     134% cas 1 : max deltas apres negetifs et deltas avant postifs 
     135         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    129136            compteurmax=compteurmax+1; 
    130137          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    161168            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    162169            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    163 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     170% cas 2 : min deltas apres positifs et deltas avant negatifs 
    164171         elseif (delta(b+1)>0 && delta(b) &&  olr_eof(b,a)<(-olrbis)); 
    165172            compteurmin=compteurmin+1; 
    … …  
    200207         end; 
    201208      end; 
    202    end;          
     209   end; 
    203210end; 
    204211% on fait le test de Student 
    … …  
    218225% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    219226% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    220 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    221 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    222  
    223 x=[-10:1:10]'; %' 
    224  
    225 figure(1); orient('landscape'); 
    226  
    227 lat=lat';  
     227olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     228clear olr_filtre_compomin; 
     229olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     230clear olr_filtre_compomax; 
     231 
     232x=[-10:1:10]'; 
     233 
     234figure(1); 
     235orient('landscape'); 
     236 
     237lat=lat'; 
    228238lon=lon-180; 
    229239for e=1:7; 
    … …  
    256266       delta_olr_filtre_min(1,2)=50.0001; 
    257267       fin=-30+24*2.5; 
    258         
     268 
    259269       clear fin 
    260270       fin=-10+16*2.5; 
    … …  
    264274       else 
    265275      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    266        end        
     276       end 
    267277       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    268278       if e==4; 
    269           co=colorbar;             
     279          co=colorbar; 
    270280          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    271281       end; 
    272        hold on; cartemonde1; 
     282       hold on; 
     283       cartemonde1; 
    273284       set (gca,'tickDir','out'); 
    274285       axis equal 
    275286       axis([-180 180 -20 40]); 
    276        if e==7;       
     287       if e==7; 
    277288      title('OLR composite EOF1 30100j simulation AS ','fontsize',8) ; 
    278289       end 
    279290       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    280291       pos_vert=e/10; 
    281        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     292       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    282293end; 
    283294 
    284 figure(1); print -depsc2 composite_olr_EOF1_30100j_simulation_AS_part1.eps; 
    285  
    286 figure(2); orient('landscape'); 
     295figure(1); 
     296print -depsc2 composite_olr_EOF1_30100j_simulation_AS_part1.eps; 
     297 
     298figure(2); 
     299orient('landscape'); 
    287300 
    288301for e=1:7; 
    … …  
    315328       delta_olr_filtre_min(1,2)=50.0001; 
    316329       fin=-30+24*2.5; 
    317         
     330 
    318331       clear fin 
    319332       fin=-10+16*2.5; 
    … …  
    323336       else 
    324337      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    325        end        
     338       end 
    326339       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    327340       if e==4; 
    328           co=colorbar;             
     341          co=colorbar; 
    329342          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    330343       end; 
    331        hold on; cartemonde1; 
     344       hold on; 
     345       cartemonde1; 
    332346       set (gca,'tickDir','out'); 
    333347       axis equal 
    … …  
    338352       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    339353       pos_vert=e/10; 
    340        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     354       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    341355end; 
    342356 
    343 figure(2); print -depsc2 composite_olr_EOF1_30100j_simulation_AS_part2.eps; 
    344  
    345  
    346  
     357figure(2); 
     358print -depsc2 composite_olr_EOF1_30100j_simulation_AS_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof2_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47cd('INDE') 
    … …  
    9699olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    97100clear olr; 
    98 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    99101 
    100102load eof2_AS_1030.txt 
    101103 
    102104% on met sous la forme annee mois 
    103 olr_eof=reshape(eof2_AS_1030,122,29); clear eof2_AS_1030; 
     105olr_eof=reshape(eof2_AS_1030,122,29); 
     106clear eof2_AS_1030; 
    104107 
    105108% on calcule l ecart type sur la serie temporelle de l OLR 
    106 k=122*29;  
     109k=122*29; 
    107110olrbis=reshape(olr_eof,k,1); 
    108 olrbis=std(olrbis);  
     111olrbis=std(olrbis); 
    109112 
    110113% intialisation des tableaux 
    111 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     114olr_filtre_compomax=NaN*ones(50,31,64,128); 
    112115olr_filtre_compomin=NaN*ones(50,31,64,128); 
    113116 
    114 compteurmax=0;  
     117compteurmax=0; 
    115118compteurmin=0; 
    116119 
    117 for a=1:29; % boucle sur les annees 
    118    clear delta;  
     120% boucle sur les annees 
     121for a=1:29; 
     122   clear delta; 
    119123   delta=zeros(122,1); 
    120    for b=1:122; % boucle sur les jours : on prepare avant    
     124   % boucle sur les jours : on prepare avant 
     125   for b=1:122; 
    121126        if b>1; 
    122127            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    123128        end; 
    124129   end; 
    125    for b=1:122; % boucle sur les jours 
    126       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    127 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    128          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     130   % boucle sur les jours 
     131   for b=1:122; 
     132      % 1ere condition (laisser une marge de 10) 
     133      if (b>20 && b<112); 
     134% cas 1 : max deltas apres negetifs et deltas avant postifs 
     135         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    129136            compteurmax=compteurmax+1; 
    130137          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    161168            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    162169            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    163 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     170% cas 2 : min deltas apres positifs et deltas avant negatifs 
    164171         elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && olr_eof(b,a)<(-olrbis)); 
    165172            compteurmin=compteurmin+1; 
    … …  
    200207         end; 
    201208      end; 
    202    end;          
     209   end; 
    203210end; 
    204211% on fait le test de Student 
    … …  
    218225% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    219226% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    220 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    221 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    222  
    223 x=[-10:1:10]'; %' 
    224  
    225 figure(1); orient('landscape'); 
    226  
    227 lat=lat';  
     227olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     228clear olr_filtre_compomin; 
     229olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     230clear olr_filtre_compomax; 
     231 
     232x=[-10:1:10]'; 
     233 
     234figure(1); 
     235orient('landscape'); 
     236 
     237lat=lat'; 
    228238lon=lon-180; 
    229239for e=1:7; 
    … …  
    256266       delta_olr_filtre_min(1,2)=50.0001; 
    257267       fin=-30+24*2.5; 
    258         
     268 
    259269       clear fin 
    260270       fin=-10+16*2.5; 
    … …  
    264274       else 
    265275      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    266        end        
     276       end 
    267277       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    268278       if e==4; 
    269           co=colorbar;             
     279          co=colorbar; 
    270280          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    271281       end; 
    272        hold on; cartemonde1; 
     282       hold on; 
     283       cartemonde1; 
    273284       set (gca,'tickDir','out'); 
    274285       axis equal 
    275286       axis([-180 180 -20 40]); 
    276        if e==7;       
     287       if e==7; 
    277288      title('OLR composite EOF2 1030j simulation AS ','fontsize',8) ; 
    278289       end 
    279290       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    280291       pos_vert=e/10; 
    281        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     292       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    282293end; 
    283294 
    284 figure(1); print -depsc2 composite_olr_EOF2_1030j_simulation_AS_part1.eps; 
    285  
    286 figure(2); orient('landscape'); 
     295figure(1); 
     296print -depsc2 composite_olr_EOF2_1030j_simulation_AS_part1.eps; 
     297 
     298figure(2); 
     299orient('landscape'); 
    287300 
    288301for e=1:7; 
    … …  
    315328       delta_olr_filtre_min(1,2)=50.0001; 
    316329       fin=-30+24*2.5; 
    317         
     330 
    318331       clear fin 
    319332       fin=-10+16*2.5; 
    … …  
    323336       else 
    324337      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    325        end        
     338       end 
    326339       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    327340       if e==4; 
    328           co=colorbar;             
     341          co=colorbar; 
    329342          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    330343       end; 
    331        hold on; cartemonde1; 
     344       hold on; 
     345       cartemonde1; 
    332346       set (gca,'tickDir','out'); 
    333347       axis equal 
    … …  
    338352       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    339353       pos_vert=e/10; 
    340        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     354       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    341355end; 
    342356 
    343 figure(2); print -depsc2 composite_olr_EOF2_1030j_simulation_AS_part2.eps; 
    344  
    345  
    346  
     357figure(2); 
     358print -depsc2 composite_olr_EOF2_1030j_simulation_AS_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof2_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47cd('INDE') 
    … …  
    9699olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    97100clear olr; 
    98 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    99101 
    100102load eof2_AS_30100.txt 
    101103 
    102104% on met sous la forme annee mois 
    103 olr_eof=reshape(eof2_AS_30100,122,29); clear eof2_AS_30100; 
     105olr_eof=reshape(eof2_AS_30100,122,29); 
     106clear eof2_AS_30100; 
    104107 
    105108% on calcule l ecart type sur la serie temporelle de l OLR 
    106 k=122*29;  
     109k=122*29; 
    107110olrbis=reshape(olr_eof,k,1); 
    108 olrbis=std(olrbis);  
     111olrbis=std(olrbis); 
    109112 
    110113% intialisation des tableaux 
    111 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     114olr_filtre_compomax=NaN*ones(50,31,64,128); 
    112115olr_filtre_compomin=NaN*ones(50,31,64,128); 
    113116 
    114 compteurmax=0;  
     117compteurmax=0; 
    115118compteurmin=0; 
    116119 
    117 for a=1:29; % boucle sur les annees 
    118    clear delta;  
     120% boucle sur les annees 
     121for a=1:29; 
     122   clear delta; 
    119123   delta=zeros(122,1); 
    120    for b=1:122; % boucle sur les jours : on prepare avant    
     124   % boucle sur les jours : on prepare avant 
     125   for b=1:122; 
    121126        if b>1; 
    122127            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    123128        end; 
    124129   end; 
    125    for b=1:122; % boucle sur les jours 
    126       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    127 % cas 1 : max deltas apres negetifs et deltas avant postifs    
    128          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     130   % boucle sur les jours 
     131   for b=1:122; 
     132      % 1ere condition (laisser une marge de 10) 
     133      if (b>20 && b<112); 
     134% cas 1 : max deltas apres negetifs et deltas avant postifs 
     135         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    129136            compteurmax=compteurmax+1; 
    130137          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    161168            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    162169            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    163 % cas 2 : min deltas apres positifs et deltas avant negatifs    
     170% cas 2 : min deltas apres positifs et deltas avant negatifs 
    164171         elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && olr_eof(b,a)<(-olrbis)); 
    165172            compteurmin=compteurmin+1; 
    … …  
    200207         end; 
    201208      end; 
    202    end;          
     209   end; 
    203210end; 
    204211% on fait le test de Student 
    … …  
    218225% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    219226% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    220 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    221 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    222  
    223 x=[-10:1:10]'; %' 
    224  
    225 figure(1); orient('landscape'); 
    226  
    227 lat=lat';  
     227olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     228clear olr_filtre_compomin; 
     229olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     230clear olr_filtre_compomax; 
     231 
     232x=[-10:1:10]'; 
     233 
     234figure(1); 
     235orient('landscape'); 
     236 
     237lat=lat'; 
    228238lon=lon-180; 
    229239for e=1:7; 
    … …  
    256266       delta_olr_filtre_min(1,2)=50.0001; 
    257267       fin=-30+24*2.5; 
    258         
     268 
    259269       clear fin; 
    260270       fin=-10+16*2.5; 
    … …  
    264274       else 
    265275      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    266        end        
     276       end 
    267277       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    268278       if e==4; 
    269           co=colorbar;             
     279          co=colorbar; 
    270280          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    271281       end; 
    272        hold on; cartemonde1; 
     282       hold on; 
     283       cartemonde1; 
    273284       set (gca,'tickDir','out'); 
    274285       axis equal 
    275286       axis([-180 180 -20 40]); 
    276        if e==7;       
    277       title('OLR composite EOF2 30100j simulation AS ','fontsize',8) ; 
     287       if e==7; 
     288          title('OLR composite EOF2 30100j simulation AS ','fontsize',8) ; 
    278289       end 
    279290       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    280291       pos_vert=e/10; 
    281        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     292       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    282293end; 
    283294 
    284 figure(1); print -depsc2 composite_olr_EOF2_30100j_simulation_AS_part1.eps; 
    285  
    286 figure(2); orient('landscape'); 
     295figure(1); 
     296print -depsc2 composite_olr_EOF2_30100j_simulation_AS_part1.eps; 
     297 
     298figure(2); 
     299orient('landscape'); 
    287300 
    288301for e=1:7; 
    … …  
    315328       delta_olr_filtre_min(1,2)=50.0001; 
    316329       fin=-30+24*2.5; 
    317         
     330 
    318331       clear fin 
    319332       fin=-10+16*2.5; 
    … …  
    323336       else 
    324337      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    325        end        
     338       end 
    326339       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    327340       if e==4; 
    328           co=colorbar;             
     341          co=colorbar; 
    329342          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    330343       end; 
    331        hold on; cartemonde1; 
     344       hold on; 
     345       cartemonde1; 
    332346       set (gca,'tickDir','out'); 
    333347       axis equal 
    … …  
    338352       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    339353       pos_vert=e/10; 
    340        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     354       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    341355end; 
    342356 
    343 figure(2); print -depsc2 composite_olr_EOF2_30100j_simulation_AS_part2.eps; 
    344  
    345  
    346  
     357figure(2); 
     358print -depsc2 composite_olr_EOF2_30100j_simulation_AS_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof1_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47cd('CTL') 
    … …  
    98101olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    99102clear olr; 
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101103 
    102104load eof1_CTL_1030.txt 
    103105 
    104106% on met sous la forme annee mois 
    105 olr_eof=reshape(eof1_CTL_1030,122,29); clear eof1_CTL_1030; 
     107olr_eof=reshape(eof1_CTL_1030,122,29); 
     108clear eof1_CTL_1030; 
    106109 
    107110% on calcule l ecart type sur la serie temporelle de l OLR 
    108 k=122*29;  
     111k=122*29; 
    109112olrbis=reshape(olr_eof,k,1); 
    110 olrbis=std(olrbis);  
     113olrbis=std(olrbis); 
    111114 
    112115% intialisation des tableaux 
    113 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     116olr_filtre_compomax=NaN*ones(50,31,64,128); 
    114117olr_filtre_compomin=NaN*ones(50,31,64,128); 
    115118 
    116 compteurmax=0;  
     119compteurmax=0; 
    117120compteurmin=0; 
    118121 
    119 for a=1:29; % boucle sur les annees 
    120    clear delta;  
     122% boucle sur les annees 
     123for a=1:29; 
     124   clear delta; 
    121125   delta=zeros(122,1); 
    122    for b=1:122; % boucle sur les jours : on prepare avant    
     126   % boucle sur les jours : on prepare avant 
     127   for b=1:122; 
    123128        if b>1; 
    124129            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    125130        end; 
    126131   end; 
    127    for b=1:122; % boucle sur les jours 
    128       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    129     
    130          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     132   % boucle sur les jours 
     133   for b=1:122; 
     134      % 1ere condition (laisser une marge de 10) 
     135      if (b>20 && b<112); 
     136 
     137         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    131138            compteurmax=compteurmax+1; 
    132139          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    163170            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    164171            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    165     
     172 
    166173         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis)); 
    167174            compteurmin=compteurmin+1; 
    … …  
    202209         end; 
    203210      end; 
    204    end;          
     211   end; 
    205212end; 
    206213% on fait le test de Student 
    … …  
    220227% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    221228% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    222 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    223 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    224  
    225 x=[-10:1:10]'; %' 
    226  
    227 figure(1); orient('landscape'); 
    228  
    229 lat=lat';  
     229olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     230clear olr_filtre_compomin; 
     231olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     232clear olr_filtre_compomax; 
     233 
     234x=[-10:1:10]'; 
     235 
     236figure(1); 
     237orient('landscape'); 
     238 
     239lat=lat'; 
    230240lon=lon-180; 
    231241for e=1:7; 
    … …  
    258268       delta_olr_filtre_min(1,2)=50.0001; 
    259269       fin=-30+24*2.5; 
    260         
     270 
    261271       clear fin 
    262272       fin=-10+16*2.5; 
    … …  
    266276       else 
    267277      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    268        end        
     278       end 
    269279       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    270280       if e==4; 
    271           co=colorbar;             
     281          co=colorbar; 
    272282          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    273283       end; 
    274        hold on; cartemonde1; 
     284       hold on; 
     285       cartemonde1; 
    275286       set (gca,'tickDir','out'); 
    276287       axis equal 
    277288       axis([-180 180 -20 40]); 
    278        if e==7;       
     289       if e==7; 
    279290      title('OLR composite EOF1 1030j simulation CTL ','fontsize',8) ; 
    280291       end 
    281292       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    282293       pos_vert=e/10; 
    283        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     294       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    284295end; 
    285296 
    286 figure(1); print -depsc2 composite_olr_EOF1_1030j_simulation_CTL_part1.eps; 
    287  
    288 figure(2); orient('landscape'); 
     297figure(1); 
     298print -depsc2 composite_olr_EOF1_1030j_simulation_CTL_part1.eps; 
     299 
     300figure(2); 
     301orient('landscape'); 
    289302 
    290303for e=1:7; 
    … …  
    317330       delta_olr_filtre_min(1,2)=50.0001; 
    318331       fin=-30+24*2.5; 
    319         
     332 
    320333       clear fin 
    321334       fin=-10+16*2.5; 
    … …  
    325338       else 
    326339      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    327        end        
     340       end 
    328341       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    329342       if e==4; 
    330           co=colorbar;             
     343          co=colorbar; 
    331344          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    332345       end; 
    333        hold on; cartemonde1; 
     346       hold on; 
     347       cartemonde1; 
    334348       set (gca,'tickDir','out'); 
    335349       axis equal 
    … …  
    340354       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    341355       pos_vert=e/10; 
    342        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     356       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    343357end; 
    344358 
    345 figure(2); print -depsc2 composite_olr_EOF1_1030j_simulation_CTL_part2.eps; 
    346  
    347  
    348  
     359figure(2); 
     360print -depsc2 composite_olr_EOF1_1030j_simulation_CTL_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof1_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47cd('CTL') 
    … …  
    98101olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    99102clear olr; 
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101103 
    102104load eof1_CTL_30100.txt 
    103105 
    104106% on met sous la forme annee mois 
    105 olr_eof=reshape(eof1_CTL_30100,122,29); clear eof1_CTL_30100; 
     107olr_eof=reshape(eof1_CTL_30100,122,29); 
     108clear eof1_CTL_30100; 
    106109 
    107110% on calcule l ecart type sur la serie temporelle de l OLR 
    108 k=122*29;  
     111k=122*29; 
    109112olrbis=reshape(olr_eof,k,1); 
    110 olrbis=std(olrbis);  
     113olrbis=std(olrbis); 
    111114 
    112115% intialisation des tableaux 
    113 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     116olr_filtre_compomax=NaN*ones(50,31,64,128); 
    114117olr_filtre_compomin=NaN*ones(50,31,64,128); 
    115118 
    116 compteurmax=0;  
     119compteurmax=0; 
    117120compteurmin=0; 
    118121 
    119 for a=1:29; % boucle sur les annees 
    120    clear delta;  
     122% boucle sur les annees 
     123for a=1:29; 
     124   clear delta; 
    121125   delta=zeros(122,1); 
    122    for b=1:122; % boucle sur les jours : on prepare avant    
     126   % boucle sur les jours : on prepare avant 
     127   for b=1:122; 
    123128        if b>1; 
    124129            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    125130        end; 
    126131   end; 
    127    for b=1:122; % boucle sur les jours 
    128       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    129     
    130          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     132   % boucle sur les jours 
     133   for b=1:122; 
     134      % 1ere condition (laisser une marge de 10) 
     135      if (b>20 && b<112); 
     136 
     137         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    131138            compteurmax=compteurmax+1; 
    132139          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    163170            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    164171            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    165     
     172 
    166173         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis)); 
    167174            compteurmin=compteurmin+1; 
    … …  
    202209         end; 
    203210      end; 
    204    end;          
     211   end; 
    205212end; 
    206213% on fait le test de Student 
    … …  
    220227% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    221228% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    222 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    223 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    224  
    225 x=[-10:1:10]'; %' 
    226  
    227 figure(1); orient('landscape'); 
    228  
    229 lat=lat';  
     229olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     230clear olr_filtre_compomin; 
     231olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     232clear olr_filtre_compomax; 
     233 
     234x=[-10:1:10]'; 
     235 
     236figure(1); 
     237orient('landscape'); 
     238 
     239lat=lat'; 
    230240lon=lon-180; 
    231241for e=1:7; 
    … …  
    258268       delta_olr_filtre_min(1,2)=50.0001; 
    259269       fin=-30+24*2.5; 
    260         
     270 
    261271       clear fin 
    262272       fin=-10+16*2.5; 
    … …  
    266276       else 
    267277      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    268        end        
     278       end 
    269279       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    270280       if e==4; 
    271           co=colorbar;             
     281          co=colorbar; 
    272282          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    273283       end; 
    274        hold on; cartemonde1; 
     284       hold on; 
     285       cartemonde1; 
    275286       set (gca,'tickDir','out'); 
    276287       axis equal 
    277288       axis([-180 180 -20 40]); 
    278        if e==7;       
     289       if e==7; 
    279290      title('OLR composite EOF1 30100j simulation CTL ','fontsize',8) ; 
    280291       end 
    281292       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    282293       pos_vert=e/10; 
    283        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     294       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    284295end; 
    285296 
    286 figure(1); print -depsc2 composite_olr_EOF1_30100j_simulation_CTL_part1.eps; 
    287  
    288 figure(2); orient('landscape'); 
     297figure(1); 
     298print -depsc2 composite_olr_EOF1_30100j_simulation_CTL_part1.eps; 
     299 
     300figure(2); 
     301orient('landscape'); 
    289302 
    290303for e=1:7; 
    … …  
    317330       delta_olr_filtre_min(1,2)=50.0001; 
    318331       fin=-30+24*2.5; 
    319         
     332 
    320333       clear fin 
    321334       fin=-10+16*2.5; 
    … …  
    325338       else 
    326339      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    327        end        
     340       end 
    328341       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    329342       if e==4; 
    330           co=colorbar;             
     343          co=colorbar; 
    331344          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    332345       end; 
    333        hold on; cartemonde1; 
     346       hold on; 
     347       cartemonde1; 
    334348       set (gca,'tickDir','out'); 
    335349       axis equal 
    … …  
    340354       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    341355       pos_vert=e/10; 
    342        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     356       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    343357end; 
    344358 
    345 figure(2); print -depsc2 composite_olr_EOF1_30100j_simulation_CTL_part2.eps; 
    346  
    347  
    348  
     359figure(2); 
     360print -depsc2 composite_olr_EOF1_30100j_simulation_CTL_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof2_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47cd('CTL') 
    … …  
    9093ncload('rlut_d.CtIV.200006-09.nc','rlut','lat','lon'); 
    9194olr(:,29,:,:)=rlut; clear rlut; 
    92  
    9395 
    9496cd('..'); 
    … …  
    98100olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    99101clear olr; 
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101102 
    102103load eof2_CTL_1030.txt 
    103104 
    104105% on met sous la forme annee mois 
    105 olr_eof=reshape(eof2_CTL_1030,122,29); clear eof2_CTL_1030; 
     106olr_eof=reshape(eof2_CTL_1030,122,29); 
     107clear eof2_CTL_1030; 
    106108 
    107109% on calcule l ecart type sur la serie temporelle de l OLR 
    108 k=122*29;  
     110k=122*29; 
    109111olrbis=reshape(olr_eof,k,1); 
    110 olrbis=std(olrbis);  
     112olrbis=std(olrbis); 
    111113 
    112114% intialisation des tableaux 
    113 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     115olr_filtre_compomax=NaN*ones(50,31,64,128); 
    114116olr_filtre_compomin=NaN*ones(50,31,64,128); 
    115117 
    116 compteurmax=0;  
     118compteurmax=0; 
    117119compteurmin=0; 
    118120 
    119 for a=1:29; % boucle sur les annees 
    120    clear delta;  
     121% boucle sur les annees 
     122for a=1:29; 
     123   clear delta; 
    121124   delta=zeros(122,1); 
    122    for b=1:122; % boucle sur les jours : on prepare avant    
     125   % boucle sur les jours : on prepare avant 
     126   for b=1:122; 
    123127        if b>1; 
    124128            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    125129        end; 
    126130   end; 
    127    for b=1:122; % boucle sur les jours 
    128       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    129     
    130          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     131   % boucle sur les jours 
     132   for b=1:122; 
     133      % 1ere condition (laisser une marge de 10) 
     134      if (b>20 && b<112); 
     135 
     136         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    131137            compteurmax=compteurmax+1; 
    132138          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    163169            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    164170            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    165     
     171 
    166172         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis)); 
    167173            compteurmin=compteurmin+1; 
    … …  
    202208         end; 
    203209      end; 
    204    end;          
     210   end; 
    205211end; 
    206212% on fait le test de Student 
    … …  
    220226% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    221227% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    222 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    223 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    224  
    225 x=[-10:1:10]'; %' 
    226  
    227 figure(1); orient('landscape'); 
    228  
    229 lat=lat';  
     228olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     229clear olr_filtre_compomin; 
     230olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     231clear olr_filtre_compomax; 
     232 
     233x=[-10:1:10]'; 
     234 
     235figure(1); 
     236orient('landscape'); 
     237 
     238lat=lat'; 
    230239lon=lon-180; 
    231240for e=1:7; 
    … …  
    258267       delta_olr_filtre_min(1,2)=50.0001; 
    259268       fin=-30+24*2.5; 
    260         
     269 
    261270       clear fin 
    262271       fin=-10+16*2.5; 
    … …  
    266275       else 
    267276      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    268        end        
     277       end 
    269278       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    270279       if e==4; 
    271           co=colorbar;             
     280          co=colorbar; 
    272281          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    273282       end; 
    274        hold on; cartemonde1; 
     283       hold on; 
     284       cartemonde1; 
    275285       set (gca,'tickDir','out'); 
    276286       axis equal 
    277287       axis([-180 180 -20 40]); 
    278        if e==7;       
     288       if e==7; 
    279289      title('OLR composite EOF2 1030j simulation CTL ','fontsize',8) ; 
    280290       end 
    281291       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    282292       pos_vert=e/10; 
    283        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     293       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    284294end; 
    285295 
    286 figure(1); print -depsc2 composite_olr_EOF2_1030j_simulation_CTL_part1.eps; 
    287  
    288 figure(2); orient('landscape'); 
     296figure(1); 
     297print -depsc2 composite_olr_EOF2_1030j_simulation_CTL_part1.eps; 
     298 
     299figure(2); 
     300orient('landscape'); 
    289301 
    290302for e=1:7; 
    … …  
    317329       delta_olr_filtre_min(1,2)=50.0001; 
    318330       fin=-30+24*2.5; 
    319         
     331 
    320332       clear fin 
    321333       fin=-10+16*2.5; 
    … …  
    325337       else 
    326338      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    327        end        
     339       end 
    328340       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    329341       if e==4; 
    330           co=colorbar;             
     342          co=colorbar; 
    331343          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    332344       end; 
    333        hold on; cartemonde1; 
     345       hold on; 
     346       cartemonde1; 
    334347       set (gca,'tickDir','out'); 
    335348       axis equal 
    … …  
    340353       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    341354       pos_vert=e/10; 
    342        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     355       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    343356end; 
    344357 
    345 figure(2); print -depsc2 composite_olr_EOF2_1030j_simulation_CTL_part2.eps; 
    346  
    347  
    348  
     358figure(2); 
     359print -depsc2 composite_olr_EOF2_1030j_simulation_CTL_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof2_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47cd('CTL') 
    … …  
    9093ncload('rlut_d.CtIV.200006-09.nc','rlut','lat','lon'); 
    9194olr(:,29,:,:)=rlut; clear rlut; 
    92  
    9395 
    9496cd('..'); 
    … …  
    98100olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    99101clear olr; 
    100 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    101102 
    102103load eof2_CTL_30100.txt 
    103104 
    104105% on met sous la forme annee mois 
    105 olr_eof=reshape(eof2_CTL_30100,122,29); clear eof2_CTL_30100; 
     106olr_eof=reshape(eof2_CTL_30100,122,29); 
     107clear eof2_CTL_30100; 
    106108 
    107109% on calcule l ecart type sur la serie temporelle de l OLR 
    108 k=122*29;  
     110k=122*29; 
    109111olrbis=reshape(olr_eof,k,1); 
    110 olrbis=std(olrbis);  
     112olrbis=std(olrbis); 
    111113 
    112114% intialisation des tableaux 
    113 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     115olr_filtre_compomax=NaN*ones(50,31,64,128); 
    114116olr_filtre_compomin=NaN*ones(50,31,64,128); 
    115117 
    116 compteurmax=0;  
     118compteurmax=0; 
    117119compteurmin=0; 
    118120 
    119 for a=1:29; % boucle sur les annees 
    120    clear delta;  
     121% boucle sur les annees 
     122for a=1:29; 
     123   clear delta; 
    121124   delta=zeros(122,1); 
    122    for b=1:122; % boucle sur les jours : on prepare avant    
     125   % boucle sur les jours : on prepare avant 
     126   for b=1:122; 
    123127        if b>1; 
    124128            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    125129        end; 
    126130   end; 
    127    for b=1:122; % boucle sur les jours 
    128       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    129     
    130          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     131   % boucle sur les jours 
     132   for b=1:122; 
     133      % 1ere condition (laisser une marge de 10) 
     134      if (b>20 && b<112); 
     135 
     136         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    131137            compteurmax=compteurmax+1; 
    132138          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    163169            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    164170            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    165     
     171 
    166172         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis)); 
    167173            compteurmin=compteurmin+1; 
    … …  
    202208         end; 
    203209      end; 
    204    end;          
     210   end; 
    205211end; 
    206212% on fait le test de Student 
    … …  
    220226% on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences 
    221227% on obtent un tableau de la forme (jours-avant-apres,lon,lat) 
    222 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    223 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    224  
    225 x=[-10:1:10]'; %' 
    226  
    227 figure(1); orient('landscape'); 
    228  
    229 lat=lat';  
     228olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     229clear olr_filtre_compomin; 
     230olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     231clear olr_filtre_compomax; 
     232 
     233x=[-10:1:10]'; 
     234 
     235figure(1); 
     236orient('landscape'); 
     237 
     238lat=lat'; 
    230239lon=lon-180; 
    231240for e=1:7; 
    … …  
    258267       delta_olr_filtre_min(1,2)=50.0001; 
    259268       fin=-30+24*2.5; 
    260         
     269 
    261270       clear fin 
    262271       fin=-10+16*2.5; 
    … …  
    266275       else 
    267276      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    268        end        
     277       end 
    269278       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    270279       if e==4; 
    271           co=colorbar;             
     280          co=colorbar; 
    272281          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    273282       end; 
    274        hold on; cartemonde1; 
     283       hold on; 
     284       cartemonde1; 
    275285       set (gca,'tickDir','out'); 
    276286       axis equal 
    277287       axis([-180 180 -20 40]); 
    278        if e==7;       
    279       title('OLR composite EOF2 30100j simulation CTL ','fontsize',8) ; 
     288       if e==7; 
     289          title('OLR composite EOF2 30100j simulation CTL ','fontsize',8) ; 
    280290       end 
    281291       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    282292       pos_vert=e/10; 
    283        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     293       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    284294end; 
    285295 
    286 figure(1); print -depsc2 composite_olr_EOF2_30100j_simulation_CTL_part1.eps; 
    287  
    288 figure(2); orient('landscape'); 
     296figure(1); 
     297print -depsc2 composite_olr_EOF2_30100j_simulation_CTL_part1.eps; 
     298 
     299figure(2); 
     300orient('landscape'); 
    289301 
    290302for e=1:7; 
    … …  
    317329       delta_olr_filtre_min(1,2)=50.0001; 
    318330       fin=-30+24*2.5; 
    319         
     331 
    320332       clear fin 
    321333       fin=-10+16*2.5; 
    … …  
    325337       else 
    326338      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    327        end        
     339       end 
    328340       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    329341       if e==4; 
    330           co=colorbar;             
     342          co=colorbar; 
    331343          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    332344       end; 
    333        hold on; cartemonde1; 
     345       hold on; 
     346       cartemonde1; 
    334347       set (gca,'tickDir','out'); 
    335348       axis equal 
    … …  
    340353       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    341354       pos_vert=e/10; 
    342        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     355       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    343356end; 
    344357 
    345 figure(2); print -depsc2 composite_olr_EOF2_30100j_simulation_CTL_part2.eps; 
    346  
    347  
    348  
     358figure(2); 
     359print -depsc2 composite_olr_EOF2_30100j_simulation_CTL_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof1_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,29,64,128); 
    47cd('TROP') 
    … …  
    9699olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    97100clear olr; 
    98 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    99101 
    100102load eof1_TR_1030.txt 
    101103 
    102104% on met sous la forme annee mois 
    103 olr_eof=reshape(eof1_TR_1030,122,29); clear eof1_TR_1030; 
     105olr_eof=reshape(eof1_TR_1030,122,29); 
     106clear eof1_TR_1030; 
    104107 
    105108% on calcule l ecart type sur la serie temporelle de l OLR 
    106 k=122*29;  
     109k=122*29; 
    107110olrbis=reshape(olr_eof,k,1); 
    108 olrbis=std(olrbis);  
     111olrbis=std(olrbis); 
    109112 
    110113% intialisation des tableaux 
    111 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     114olr_filtre_compomax=NaN*ones(50,31,64,128); 
    112115olr_filtre_compomin=NaN*ones(50,31,64,128); 
    113116 
    114 compteurmax=0;  
     117compteurmax=0; 
    115118compteurmin=0; 
    116119 
    117 for a=1:29; % boucle sur les annees 
    118    clear delta;  
     120% boucle sur les annees 
     121for a=1:29; 
     122   clear delta; 
    119123   delta=zeros(122,1); 
    120    for b=1:122; % boucle sur les jours : on prepare avant    
     124   % boucle sur les jours : on prepare avant 
     125   for b=1:122; 
    121126        if b>1; 
    122127            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    123128        end; 
    124129   end; 
    125    for b=1:122; % boucle sur les jours 
    126       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    127     
    128          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));  
     130   % boucle sur les jours 
     131   for b=1:122; 
     132      % 1ere condition (laisser une marge de 10) 
     133      if (b>20 && b<112); 
     134 
     135         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
    129136            compteurmax=compteurmax+1; 
    130137          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    161168            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    162169            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    163     
     170 
    164171         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis)); 
    165172            compteurmin=compteurmin+1; 
    … …  
    200207         end; 
    201208      end; 
    202    end;          
     209   end; 
    203210end; 
    204211% on fait le test de Student 
    … …  
    217224 
    218225 
    219 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    220 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    221  
    222 x=[-10:1:10]'; %' 
    223  
    224 figure(1); orient('landscape'); 
    225  
    226 lat=lat';  
     226olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     227clear olr_filtre_compomin; 
     228olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     229clear olr_filtre_compomax; 
     230 
     231x=[-10:1:10]'; 
     232 
     233figure(1); 
     234orient('landscape'); 
     235 
     236lat=lat'; 
    227237lon=lon-180; 
    228238for e=1:7; 
    … …  
    255265       delta_olr_filtre_min(1,2)=50.0001; 
    256266       fin=-30+24*2.5; 
    257         
     267 
    258268       clear fin 
    259269       fin=-10+16*2.5; 
    … …  
    263273       else 
    264274      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    265        end        
     275       end 
    266276       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    267277       if e==4; 
    268           co=colorbar;             
     278          co=colorbar; 
    269279          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    270280       end; 
    271        hold on; cartemonde1; 
     281       hold on; 
     282       cartemonde1; 
    272283       set (gca,'tickDir','out'); 
    273284       axis equal 
    274285       axis([-180 180 -20 40]); 
    275        if e==7;       
     286       if e==7; 
    276287      title('OLR composite EOF1 1030j simulation TR ','fontsize',8) ; 
    277288       end 
    278289       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    279290       pos_vert=e/10; 
    280        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     291       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    281292end; 
    282293 
    283 figure(1); print -depsc2 composite_olr_EOF1_1030j_simulation_TR_part1.eps; 
    284  
    285 figure(2); orient('landscape'); 
     294figure(1); 
     295print -depsc2 composite_olr_EOF1_1030j_simulation_TR_part1.eps; 
     296 
     297figure(2); 
     298orient('landscape'); 
    286299 
    287300for e=1:7; 
    … …  
    314327       delta_olr_filtre_min(1,2)=50.0001; 
    315328       fin=-30+24*2.5; 
    316         
     329 
    317330       clear fin 
    318331       fin=-10+16*2.5; 
    … …  
    322335       else 
    323336      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    324        end        
     337       end 
    325338       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    326339       if e==4; 
    327           co=colorbar;             
     340          co=colorbar; 
    328341          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    329342       end; 
    330        hold on; cartemonde1; 
     343       hold on; 
     344       cartemonde1; 
    331345       set (gca,'tickDir','out'); 
    332346       axis equal 
    … …  
    337351       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    338352       pos_vert=e/10; 
    339        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     353       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    340354end; 
    341355 
    342 figure(2); print -depsc2 composite_olr_EOF1_1030j_simulation_TR_part2.eps; 
    343  
    344  
    345  
     356figure(2); 
     357print -depsc2 composite_olr_EOF1_1030j_simulation_TR_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof1_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,30,64,128); 
    47cd('TROP') 
    … …  
    99102olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    100103clear olr; 
    101 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    102104 
    103105load eof1_TR_30100.txt 
    104106 
    105107% on met sous la forme annee mois 
    106 olr_eof=reshape(eof1_TR_30100,122,30); clear eof1_TR_30100; 
     108olr_eof=reshape(eof1_TR_30100,122,30); 
     109clear eof1_TR_30100; 
    107110 
    108111% on calcule l ecart type sur la serie temporelle de l OLR 
    109 k=122*30;  
     112k=122*30; 
    110113olrbis=reshape(olr_eof,k,1); 
    111 olr_std=std(olrbis);  
    112 olr_moy=mean(olrbis);  
     114olr_std=std(olrbis); 
     115olr_moy=mean(olrbis); 
    113116 
    114117for a=1:3660; 
    … …  
    117120 
    118121% intialisation des tableaux 
    119 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     122olr_filtre_compomax=NaN*ones(50,31,64,128); 
    120123olr_filtre_compomin=NaN*ones(50,31,64,128); 
    121124 
    122 compteurmax=0;  
     125compteurmax=0; 
    123126compteurmin=0; 
    124127 
    125 for a=1:30; % boucle sur les annees 
    126    clear delta;  
     128% boucle sur les annees 
     129for a=1:30; 
     130   clear delta; 
    127131   delta=zeros(122,1); 
    128    for b=1:122; % boucle sur les jours : on prepare avant    
     132   % boucle sur les jours : on prepare avant 
     133   for b=1:122; 
    129134        if b>1; 
    130135            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    131136        end; 
    132137   end; 
    133    for b=1:122; % boucle sur les jours 
    134       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    135     
    136          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1);  
     138   % boucle sur les jours 
     139   for b=1:122; 
     140      % 1ere condition (laisser une marge de 10) 
     141      if (b>20 && b<112); 
     142 
     143         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1); 
    137144            compteurmax=compteurmax+1; 
    138145          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    169176            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    170177            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    171     
     178 
    172179         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<-1); 
    173180            compteurmin=compteurmin+1; 
    … …  
    208215         end; 
    209216      end; 
    210    end;          
     217   end; 
    211218end; 
    212219% on fait le test de Student 
    … …  
    223230end 
    224231 
    225  
    226  
    227 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    228 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    229  
    230 x=[-10:1:10]'; %' 
    231  
    232 figure(1); orient('landscape'); 
    233  
    234 lat=lat';  
     232olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     233clear olr_filtre_compomin; 
     234olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     235clear olr_filtre_compomax; 
     236 
     237x=[-10:1:10]'; 
     238 
     239figure(1); 
     240orient('landscape'); 
     241 
     242lat=lat'; 
    235243lon=lon-180; 
    236244for e=1:7; 
    … …  
    263271       delta_olr_filtre_min(1,2)=50.0001; 
    264272       fin=-30+24*2.5; 
    265         
     273 
    266274       clear fin 
    267275       fin=-10+16*2.5; 
    … …  
    271279       else 
    272280      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    273        end        
     281       end 
    274282       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    275283       if e==4; 
    276           co=colorbar;             
     284          co=colorbar; 
    277285          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    278286       end; 
    279        hold on; cartemonde1; 
     287       hold on; 
     288       cartemonde1; 
    280289       set (gca,'tickDir','out'); 
    281290       axis equal 
    282291       axis([-180 180 -20 40]); 
    283        if e==7;       
     292       if e==7; 
    284293      title('OLR composite EOF1 30100j simulation TR ','fontsize',8) ; 
    285294       end 
    286295       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    287296       pos_vert=e/10; 
    288        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     297       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    289298end; 
    290299 
    291 figure(1); print -depsc2 composite_olr_EOF1_30100j_simulation_TR_part1.eps; 
    292  
    293 figure(2); orient('landscape'); 
     300figure(1); 
     301print -depsc2 composite_olr_EOF1_30100j_simulation_TR_part1.eps; 
     302 
     303figure(2); 
     304orient('landscape'); 
    294305 
    295306for e=1:7; 
    … …  
    322333       delta_olr_filtre_min(1,2)=50.0001; 
    323334       fin=-30+24*2.5; 
    324         
     335 
    325336       clear fin 
    326337       fin=-10+16*2.5; 
    … …  
    330341       else 
    331342      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    332        end        
     343       end 
    333344       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    334345       if e==4; 
    335           co=colorbar;             
     346          co=colorbar; 
    336347          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    337348       end; 
    338        hold on; cartemonde1; 
     349       hold on; 
     350       cartemonde1; 
    339351       set (gca,'tickDir','out'); 
    340352       axis equal 
    … …  
    345357       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    346358       pos_vert=e/10; 
    347        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     359       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    348360end; 
    349361 
    350 figure(2); print -depsc2 composite_olr_EOF1_30100j_simulation_TR_part2.eps; 
    351  
    352  
    353  
     362figure(2); 
     363print -depsc2 composite_olr_EOF1_30100j_simulation_TR_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof2_1030.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,30,64,128); 
    47cd('TROP') 
    … …  
    99102olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    100103clear olr; 
    101 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    102104 
    103105load eof2_TR_30100.txt 
    104106 
    105107% on met sous la forme annee mois 
    106 olr_eof=reshape(eof2_TR_30100,122,30); clear eof2_TR_30100; 
     108olr_eof=reshape(eof2_TR_30100,122,30); 
     109clear eof2_TR_30100; 
    107110 
    108111% on calcule l ecart type sur la serie temporelle de l OLR 
    109 k=122*30;  
     112k=122*30; 
    110113olrbis=reshape(olr_eof,k,1); 
    111 olr_std=std(olrbis);  
    112 olr_moy=mean(olrbis);  
     114olr_std=std(olrbis); 
     115olr_moy=mean(olrbis); 
    113116 
    114117for a=1:3660; 
    … …  
    117120 
    118121% intialisation des tableaux 
    119 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     122olr_filtre_compomax=NaN*ones(50,31,64,128); 
    120123olr_filtre_compomin=NaN*ones(50,31,64,128); 
    121124 
    122 compteurmax=0;  
     125compteurmax=0; 
    123126compteurmin=0; 
    124127 
    125 for a=1:30; % boucle sur les annees 
    126    clear delta;  
     128% boucle sur les annees 
     129for a=1:30; 
     130   clear delta; 
    127131   delta=zeros(122,1); 
    128    for b=1:122; % boucle sur les jours : on prepare avant    
     132   % boucle sur les jours : on prepare avant 
     133   for b=1:122; 
    129134        if b>1; 
    130135            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    131136        end; 
    132137   end; 
    133    for b=1:122; % boucle sur les jours 
    134       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    135     
    136          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1);  
     138   % boucle sur les jours 
     139   for b=1:122; 
     140      % 1ere condition (laisser une marge de 10) 
     141      if (b>20 && b<112); 
     142 
     143         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1); 
    137144            compteurmax=compteurmax+1; 
    138145          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    169176            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    170177            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    171     
     178 
    172179         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<-1); 
    173180            compteurmin=compteurmin+1; 
    … …  
    208215         end; 
    209216      end; 
    210    end;          
     217   end; 
    211218end; 
    212219% on fait le test de Student 
    … …  
    225232 
    226233 
    227 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    228 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    229  
    230 x=[-10:1:10]'; %' 
    231  
    232 figure(1); orient('landscape'); 
    233  
    234 lat=lat';  
     234olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     235clear olr_filtre_compomin; 
     236olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     237clear olr_filtre_compomax; 
     238 
     239x=[-10:1:10]'; 
     240 
     241figure(1); 
     242orient('landscape'); 
     243 
     244lat=lat'; 
    235245lon=lon-180; 
    236246for e=1:7; 
    … …  
    263273       delta_olr_filtre_min(1,2)=50.0001; 
    264274       fin=-30+24*2.5; 
    265         
     275 
    266276       clear fin 
    267277       fin=-10+16*2.5; 
    … …  
    271281       else 
    272282      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    273        end        
     283       end 
    274284       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    275285       if e==4; 
    276           co=colorbar;             
     286          co=colorbar; 
    277287          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    278288       end; 
    279        hold on; cartemonde1; 
     289       hold on; 
     290       cartemonde1; 
    280291       set (gca,'tickDir','out'); 
    281292       axis equal 
    282293       axis([-180 180 -20 40]); 
    283        if e==7;       
     294       if e==7; 
    284295      title('OLR composite EOF2 30100j simulation TR ','fontsize',8) ; 
    285296       end 
    286297       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    287298       pos_vert=e/10; 
    288        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     299       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    289300end; 
    290301 
    291 figure(1); print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part1.eps; 
    292  
    293 figure(2); orient('landscape'); 
     302figure(1); 
     303print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part1.eps; 
     304 
     305figure(2); 
     306orient('landscape'); 
    294307 
    295308for e=1:7; 
    … …  
    322335       delta_olr_filtre_min(1,2)=50.0001; 
    323336       fin=-30+24*2.5; 
    324         
     337 
    325338       clear fin 
    326339       fin=-10+16*2.5; 
    … …  
    330343       else 
    331344      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    332        end        
     345       end 
    333346       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    334347       if e==4; 
    335           co=colorbar;             
     348          co=colorbar; 
    336349          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    337350       end; 
    338        hold on; cartemonde1; 
     351       hold on; 
     352       cartemonde1; 
    339353       set (gca,'tickDir','out'); 
    340354       axis equal 
    … …  
    345359       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    346360       pos_vert=e/10; 
    347        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     361       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    348362end; 
    349363 
    350 figure(2); print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part2.eps; 
    351  
    352  
    353  
     364figure(2); 
     365print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof2_30100.m

    r15 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
     4clear; 
     5close all; 
    36olr=zeros(122,30,64,128); 
    47cd('TROP') 
    … …  
    99102olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    100103clear olr; 
    101 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    102104 
    103105load eof2_TR_30100.txt 
    104106 
    105107% on met sous la forme annee mois 
    106 olr_eof=reshape(eof2_TR_30100,122,30); clear eof2_TR_30100; 
     108olr_eof=reshape(eof2_TR_30100,122,30); 
     109clear eof2_TR_30100; 
    107110 
    108111% on calcule l ecart type sur la serie temporelle de l OLR 
    109 k=122*30;  
     112k=122*30; 
    110113olrbis=reshape(olr_eof,k,1); 
    111 olr_std=std(olrbis);  
    112 olr_moy=mean(olrbis);  
     114olr_std=std(olrbis); 
     115olr_moy=mean(olrbis); 
    113116 
    114117for a=1:3660; 
    … …  
    117120 
    118121% intialisation des tableaux 
    119 olr_filtre_compomax=NaN*ones(50,31,64,128);  
     122olr_filtre_compomax=NaN*ones(50,31,64,128); 
    120123olr_filtre_compomin=NaN*ones(50,31,64,128); 
    121124 
    122 compteurmax=0;  
     125compteurmax=0; 
    123126compteurmin=0; 
    124127 
    125 for a=1:30; % boucle sur les annees 
    126    clear delta;  
     128% boucle sur les annees 
     129for a=1:30; 
     130   clear delta; 
    127131   delta=zeros(122,1); 
    128    for b=1:122; % boucle sur les jours : on prepare avant    
     132   % boucle sur les jours : on prepare avant 
     133   for b=1:122; 
    129134        if b>1; 
    130135            delta(b)=olr_eof(b,a)-olr_eof(b-1,a); 
    131136        end; 
    132137   end; 
    133    for b=1:122; % boucle sur les jours 
    134       if (b>20 && b<112); % 1ere condition (laisser une marge de 10)  
    135     
    136          if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1);  
     138   % boucle sur les jours 
     139   for b=1:122; 
     140      % 1ere condition (laisser une marge de 10) 
     141      if (b>20 && b<112); 
     142 
     143         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1); 
    137144            compteurmax=compteurmax+1; 
    138145          olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:); 
    … …  
    169176            olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:); 
    170177            olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:); 
    171     
     178 
    172179         elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<-1); 
    173180            compteurmin=compteurmin+1; 
    … …  
    208215         end; 
    209216      end; 
    210    end;          
     217   end; 
    211218end; 
    212219% on fait le test de Student 
    … …  
    225232 
    226233 
    227 olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin; 
    228 olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax; 
    229  
    230 x=[-10:1:10]'; %' 
    231  
    232 figure(1); orient('landscape'); 
    233  
    234 lat=lat';  
     234olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); 
     235clear olr_filtre_compomin; 
     236olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); 
     237clear olr_filtre_compomax; 
     238 
     239x=[-10:1:10]'; 
     240 
     241figure(1); 
     242orient('landscape'); 
     243 
     244lat=lat'; 
    235245lon=lon-180; 
    236246for e=1:7; 
    … …  
    263273       delta_olr_filtre_min(1,2)=50.0001; 
    264274       fin=-30+24*2.5; 
    265         
     275 
    266276       clear fin 
    267277       fin=-10+16*2.5; 
    … …  
    271281       else 
    272282      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    273        end        
     283       end 
    274284       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    275285       if e==4; 
    276           co=colorbar;             
     286          co=colorbar; 
    277287          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    278288       end; 
    279        hold on; cartemonde1; 
     289       hold on; 
     290       cartemonde1; 
    280291       set (gca,'tickDir','out'); 
    281292       axis equal 
    282293       axis([-180 180 -20 40]); 
    283        if e==7;       
     294       if e==7; 
    284295      title('OLR composite EOF2 30100j simulation TR ','fontsize',8) ; 
    285296       end 
    286297       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    287298       pos_vert=e/10; 
    288        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     299       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    289300end; 
    290301 
    291 figure(1); print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part1.eps; 
    292  
    293 figure(2); orient('landscape'); 
     302figure(1); 
     303print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part1.eps; 
     304 
     305figure(2); 
     306orient('landscape'); 
    294307 
    295308for e=1:7; 
    … …  
    322335       delta_olr_filtre_min(1,2)=50.0001; 
    323336       fin=-30+24*2.5; 
    324         
     337 
    325338       clear fin 
    326339       fin=-10+16*2.5; 
    … …  
    330343       else 
    331344      set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6); 
    332        end        
     345       end 
    333346       set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6); 
    334347       if e==4; 
    335           co=colorbar;             
     348          co=colorbar; 
    336349          set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6); 
    337350       end; 
    338        hold on; cartemonde1; 
     351       hold on; 
     352       cartemonde1; 
    339353       set (gca,'tickDir','out'); 
    340354       axis equal 
    … …  
    345359       text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10); 
    346360       pos_vert=e/10; 
    347        set (gca,'position',[0.2 pos_vert 0.5 0.1])  
     361       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
    348362end; 
    349363 
    350 figure(2); print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part2.eps; 
    351  
    352  
    353  
     364figure(2); 
     365print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part2.eps; 

  • trunk/src/SIMULS_IRCAAM/correlations_eofs_olr_jas.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
    5  
    6 % initialisation 
    7 clear; close all; 
     1% 
     2 
     3clear; 
     4close all; 
    85 
    96cd('..'); 
    … …  
    3027olr1=zeros(siz,37,144); 
    3128olr1(:,:,1:72)=olr(:,:,73:144); 
    32 olr1(:,:,73:144)=olr(:,:,1:72); clear olr; 
     29olr1(:,:,73:144)=olr(:,:,1:72); 
     30clear olr; 
    3331 
    3432% on permture le temps et l'espce 
    … …  
    4240      vecteur=zeros(siz,1); 
    4341      for c=1:siz; 
    44            vecteur(c)=olr1(a,b,c);     
     42           vecteur(c)=olr1(a,b,c); 
    4543      end 
    4644      std_c=nanmean(vecteur); 
    4745      for c=1:siz; 
    48           olr1(a,b,c)=olr1(a,b,c)-std_c;     
    49       end  
     46          olr1(a,b,c)=olr1(a,b,c)-std_c; 
     47      end 
    5048   end 
    51 end;    
    52  
    53 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
     49end; 
     50 
    5451% on met sous la forme longitude latitude jour 
    55  
    5652 
    5753% on selectionne les mois d ete (attention aux annees bixestiles!) 
    … …  
    153149%olr=zeros(37,144,92,28); 
    154150 
    155  
    156 olr1=permute(olr,[3 1 2 4]); clear olr; 
    157 olr(:,:,:)=nanmean(olr1);  
    158  
     151olr1=permute(olr,[3 1 2 4]); 
     152clear olr; 
     153olr(:,:,:)=nanmean(olr1); 
    159154 
    160155load eof3_noaa_annuel.txt 
    … …  
    167162correlations_eof3=zeros(37,144); 
    168163 
    169 lat=lat(5:41)';  
     164lat=lat(5:41)'; 
    170165lon=lon-180; 
    171166 
    … …  
    177172           y(c)=olr(a,b,c); 
    178173        end 
    179         clear coco; coco=corrcoef(y,eof1_noaa_annuel); 
     174        clear coco; 
     175        coco=corrcoef(y,eof1_noaa_annuel); 
    180176        correlations_eof1(a,b)=coco(2,1); 
    181         clear coco; coco=corrcoef(y,eof2_noaa_annuel); 
     177        clear coco; 
     178        coco=corrcoef(y,eof2_noaa_annuel); 
    182179        correlations_eof2(a,b)=coco(2,1); 
    183         clear coco; coco=corrcoef(y,eof3_noaa_annuel); 
     180        clear coco; 
     181        coco=corrcoef(y,eof3_noaa_annuel); 
    184182        correlations_eof3(a,b)=coco(2,1); 
    185183 
    186     end     
     184    end 
    187185end 
    188186 
    189187subplot(3,1,1); 
    190 correlations_eof1(1,1)=1.0001; correlations_eof1(1,2)=-1.0001; 
     188correlations_eof1(1,1)=1.0001; 
     189correlations_eof1(1,2)=-1.0001; 
    191190 
    192191contourf(lon,lat,correlations_eof1,[-1:0.1:1],'LineStyle','none'); 
    … …  
    206205subplot(3,1,2); 
    207206palette 
    208 correlations_eof2(1,1)=1.0001; correlations_eof2(1,2)=-1.0001; 
     207correlations_eof2(1,1)=1.0001; 
     208correlations_eof2(1,2)=-1.0001; 
    209209contourf(lon,lat,correlations_eof2,[-1:0.1:1],'LineStyle','none'); 
    210210colorbar; 
    … …  
    224224subplot(3,1,3); 
    225225palette; 
    226 correlations_eof3(1,1)=1.0001; correlations_eof3(1,2)=-1.0001; 
     226correlations_eof3(1,1)=1.0001; 
     227correlations_eof3(1,2)=-1.0001; 
    227228contourf(lon,lat,correlations_eof3,[-1:0.1:1],'LineStyle','none'); 
    228229set (gca,'tickDir','out'); 

  • trunk/src/SIMULS_IRCAAM/correlations_eofs_olr_jas_20.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
    52 
    63% initialisation 
    7 clear; close all; 
     4clear; 
     5close all; 
    86 
    97cd('..'); 
    … …  
    3028olr1=zeros(siz,37,144); 
    3129olr1(:,:,1:72)=olr(:,:,73:144); 
    32 olr1(:,:,73:144)=olr(:,:,1:72); clear olr; 
     30olr1(:,:,73:144)=olr(:,:,1:72); 
     31clear olr; 
    3332 
    3433% on permture le temps et l'espce 
    … …  
    4241      vecteur=zeros(siz,1); 
    4342      for c=1:siz; 
    44            vecteur(c)=olr1(a,b,c);     
     43           vecteur(c)=olr1(a,b,c); 
    4544      end 
    4645      std_c=nanmean(vecteur); 
    4746      for c=1:siz; 
    48           olr1(a,b,c)=olr1(a,b,c)-std_c;     
    49       end  
     47          olr1(a,b,c)=olr1(a,b,c)-std_c; 
     48      end 
    5049   end 
    51 end;    
    52  
    53 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
     50end; 
     51 
    5452% on met sous la forme longitude latitude jour 
    55  
    5653 
    5754% on selectionne les mois d ete (attention aux annees bixestiles!) 
    … …  
    153150%olr=zeros(37,144,92,28); 
    154151 
    155  
    156 olr1=permute(olr,[3 1 2 4]); clear olr; 
    157 olr(:,:,:)=nanmean(olr1);  
    158  
     152olr1=permute(olr,[3 1 2 4]); 
     153clear olr; 
     154olr(:,:,:)=nanmean(olr1); 
    159155 
    160156load eof3_noaa_annuel_20.txt 
    … …  
    167163correlations_eof3=zeros(37,144); 
    168164 
    169 lat=lat(5:41)';  
     165lat=lat(5:41)'; 
    170166lon=lon-180; 
    171167 
    … …  
    177173           y(c)=olr(a,b,c); 
    178174        end 
    179         clear coco; coco=corrcoef(y,eof1_noaa_annuel_20); 
     175        clear coco; 
     176        coco=corrcoef(y,eof1_noaa_annuel_20); 
    180177        correlations_eof1(a,b)=coco(2,1); 
    181         clear coco; coco=corrcoef(y,eof2_noaa_annuel_20); 
     178        clear coco; 
     179        coco=corrcoef(y,eof2_noaa_annuel_20); 
    182180        correlations_eof2(a,b)=coco(2,1); 
    183         clear coco; coco=corrcoef(y,eof3_noaa_annuel_20); 
     181        clear coco; 
     182        coco=corrcoef(y,eof3_noaa_annuel_20); 
    184183        correlations_eof3(a,b)=coco(2,1); 
    185     end     
     184    end 
    186185end 
    187186 
    188187subplot(3,1,1); 
    189 correlations_eof1(1,1)=1.0001; correlations_eof1(1,2)=-1.0001; 
     188correlations_eof1(1,1)=1.0001; 
     189correlations_eof1(1,2)=-1.0001; 
    190190 
    191191contourf(lon,lat,correlations_eof1,[-1:0.1:1],'LineStyle','none'); 
    … …  
    205205subplot(3,1,2); 
    206206palette 
    207 correlations_eof2(1,1)=1.0001; correlations_eof2(1,2)=-1.0001; 
     207correlations_eof2(1,1)=1.0001; 
     208correlations_eof2(1,2)=-1.0001; 
    208209contourf(lon,lat,correlations_eof2,[-1:0.1:1],'LineStyle','none'); 
    209210colorbar; 
    … …  
    223224subplot(3,1,3); 
    224225palette; 
    225 correlations_eof3(1,1)=1.0001; correlations_eof3(1,2)=-1.0001; 
     226correlations_eof3(1,1)=1.0001; 
     227correlations_eof3(1,2)=-1.0001; 
    226228contourf(lon,lat,correlations_eof3,[-1:0.1:1],'LineStyle','none'); 
    227229set (gca,'tickDir','out'); 

  • trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
     2 
     3clear; 
     4close all; 
    55 
    66fid=fopen('olrf10-30.80.dat','r'); 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr=reshape(v,360,3538); clear v; 
     10olr=reshape(v,360,3538); 
     11clear v; 
    1112 
    12   
    1313% calcul de la matrice de covariance 
    1414vaudou=zeros(360,360); 
    … …  
    1616    for b=1:360; 
    1717      clear e d covaria; 
    18       e=olr(b,:);  
    19       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    2020      covaria=cov(e,d); 
    2121      vaudou(a,b)=covaria(2,1); 
    … …  
    2626[C,L]=eig(vaudou); 
    2727 
    28 % spatialisation du premier mode 
    29  
    30  
    31 % serie temporelle de la premiere vP 
    32  
    3328delete('eof_1030_ircaam.mat'); 
    3429save('eof_1030_ircaam.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_as.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
     2 
     3clear; 
     4close all; 
    55 
    66fid=fopen('olrf10-30_as.80.dat','r'); 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr=reshape(v,360,3538); clear v; 
     10olr=reshape(v,360,3538); 
     11clear v; 
    1112 
    12   
    1313% calcul de la matrice de covariance 
    1414vaudou=zeros(360,360); 
    … …  
    1616    for b=1:360; 
    1717      clear e d covaria; 
    18       e=olr(b,:);  
    19       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    2020      covaria=cov(e,d); 
    2121      vaudou(a,b)=covaria(2,1); 
    … …  
    2626[C,L]=eig(vaudou); 
    2727 
    28 % spatialisation du premier mode 
    29  
    30  
    31 % serie temporelle de la premiere vP 
    32  
    3328delete('eof_1030_ircaam_as.mat'); 
    3429save('eof_1030_ircaam_as.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
     2 
     3clear; 
     4close all; 
    55 
    66fid=fopen('olrf10-30_ctl.80.dat','r'); 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr=reshape(v,360,3538); clear v; 
     10olr=reshape(v,360,3538); 
     11clear v; 
    1112 
    12   
    1313% calcul de la matrice de covariance 
    1414vaudou=zeros(360,360); 
    … …  
    1616    for b=1:360; 
    1717      clear e d covaria; 
    18       e=olr(b,:);  
    19       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    2020      covaria=cov(e,d); 
    2121      vaudou(a,b)=covaria(2,1); 
    … …  
    2626[C,L]=eig(vaudou); 
    2727 
    28 % spatialisation du premier mode 
    29  
    30  
    31 % serie temporelle de la premiere vP 
    32  
    3328delete('eof_1030_ircaam_ctl.mat'); 
    3429save('eof_1030_ircaam_ctl.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl_clim.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
     2 
     3clear; 
     4close all; 
    55 
    66fid=fopen('olrf10-30_clim_sst.80.dat','r'); 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr=reshape(v,360,3538); clear v; 
     10olr=reshape(v,360,3538); 
     11clear v; 
    1112 
    12   
    1313% calcul de la matrice de covariance 
    1414vaudou=zeros(360,360); 
    … …  
    1616    for b=1:360; 
    1717      clear e d covaria; 
    18       e=olr(b,:);  
    19       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    2020      covaria=cov(e,d); 
    2121      vaudou(a,b)=covaria(2,1); 
    … …  
    2626[C,L]=eig(vaudou); 
    2727 
    28 % spatialisation du premier mode 
    29  
    30  
    31 % serie temporelle de la premiere vP 
    32  
    3328delete('eof_1030_ircaam_ctl_clim.mat'); 
    3429save('eof_1030_ircaam_ctl_clim.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_tr.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
     2 
     3clear; 
     4close all; 
    55 
    66fid=fopen('olrf10-30_tr.80.dat','r'); 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr=reshape(v,360,3538); clear v; 
     10olr=reshape(v,360,3538); 
     11clear v; 
    1112 
    12   
    1313% calcul de la matrice de covariance 
    1414vaudou=zeros(360,360); 
    … …  
    1616    for b=1:360; 
    1717      clear e d covaria; 
    18       e=olr(b,:);  
    19       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    2020      covaria=cov(e,d); 
    2121      vaudou(a,b)=covaria(2,1); 
    … …  
    2626[C,L]=eig(vaudou); 
    2727 
    28 % spatialisation du premier mode 
    29  
    30  
    31 % serie temporelle de la premiere vP 
    32  
    3328delete('eof_1030_ircaam_tr.mat'); 
    3429save('eof_1030_ircaam_tr.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
     2 
     3clear; 
     4close all; 
    55 
    66fid=fopen('olrf30-100.80.dat','r'); 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr=reshape(v,360,3538); clear v; 
     10olr=reshape(v,360,3538); 
     11clear v; 
    1112 
    1213% calcul de la matrice de covariance 
    … …  
    1516    for b=1:360; 
    1617      clear e d covaria; 
    17       e=olr(b,:);  
    18       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    1920      covaria=cov(e,d); 
    2021      vaudou(a,b)=covaria(2,1); 
    … …  
    2526[C,L]=eig(vaudou); 
    2627 
    27 % spatialisation du premier mode 
    28  
    29  
    30 % serie temporelle de la premiere vP 
    31  
    3228delete('eof_30100_ircaam.mat'); 
    3329save('eof_30100_ircaam.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_as.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
     2 
     3clear; 
     4close all; 
    55 
    66fid=fopen('olrf30-100_as.80.dat','r'); 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr=reshape(v,360,3538); clear v; 
     10olr=reshape(v,360,3538); 
     11clear v; 
    1112 
    1213% calcul de la matrice de covariance 
    … …  
    1516    for b=1:360; 
    1617      clear e d covaria; 
    17       e=olr(b,:);  
    18       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    1920      covaria=cov(e,d); 
    2021      vaudou(a,b)=covaria(2,1); 
    … …  
    2526[C,L]=eig(vaudou); 
    2627 
    27 % spatialisation du premier mode 
    28  
    29  
    30 % serie temporelle de la premiere vP 
    31  
    3228delete('eof_30100_ircaam_as.mat'); 
    3329save('eof_30100_ircaam_as.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_ctl.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
     2 
     3clear; 
     4close all; 
    55 
    66fid=fopen('olrf30-100_ctl.80.dat','r'); 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr=reshape(v,360,3538); clear v; 
     10olr=reshape(v,360,3538); 
     11clear v; 
    1112 
    12   
    1313% calcul de la matrice de covariance 
    1414vaudou=zeros(360,360); 
    … …  
    1616    for b=1:360; 
    1717      clear e d covaria; 
    18       e=olr(b,:);  
    19       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    2020      covaria=cov(e,d); 
    2121      vaudou(a,b)=covaria(2,1); 
    … …  
    2626[C,L]=eig(vaudou); 
    2727 
    28 % spatialisation du premier mode 
    29  
    30  
    31 % serie temporelle de la premiere vP 
    32  
    3328delete('eof_30100_ircaam_ctl.mat'); 
    3429save('eof_30100_ircaam_ctl.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_tr.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
     2 
     3clear; 
     4close all; 
    55 
    66fid=fopen('olrf30-100_tr.80.dat','r'); 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr=reshape(v,360,3538); clear v; 
     10olr=reshape(v,360,3538); 
     11clear v; 
    1112 
    1213% calcul de la matrice de covariance 
    … …  
    1516    for b=1:360; 
    1617      clear e d covaria; 
    17       e=olr(b,:);  
    18       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    1920      covaria=cov(e,d); 
    2021      vaudou(a,b)=covaria(2,1); 
    … …  
    2526[C,L]=eig(vaudou); 
    2627 
    27 % spatialisation du premier mode 
    28  
    29  
    30 % serie temporelle de la premiere vP 
    31  
    3228delete('eof_30100_ircaam_tr.mat'); 
    3329save('eof_30100_ircaam_tr.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
    3 clear 
    4 close all 
     1% 
     2 
     3clear; 
     4close all; 
    55 
    66fid=fopen('olrint.80.dat','r'); 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr1=reshape(v,25,17,10500); clear v; 
    11  
     10olr1=reshape(v,25,17,10500); 
     11clear v; 
    1212 
    1313% on selectionne les mois d ete (attention aux annees bixestiles!) 
    … …  
    101101clear siz28 siz28bis; 
    102102 
    103  
    104  
    105103clear olr1; 
    106104 
    107105olr=reshape(olr,425,92,28); 
    108 olr1=permute(olr,[2 1 3]); clear olr 
    109 olr(:,:)=mean(olr1); clear olr1; 
     106olr1=permute(olr,[2 1 3]); 
     107clear olr; 
     108olr(:,:)=mean(olr1); 
     109clear olr1; 
    110110 
    111111% calcul de la matrice de covariance 
    … …  
    114114    for b=1:425; 
    115115      clear e d covaria; 
    116       e=olr(b,:);  
    117       d=olr(a,:);  
     116      e=olr(b,:); 
     117      d=olr(a,:); 
    118118      covaria=cov(e,d); 
    119119      vaudou(a,b)=covaria(2,1); 
    … …  
    124124[C,L]=eig(vaudou); 
    125125 
    126 % spatialisation du premier mode 
    127  
    128  
    129 % serie temporelle de la premiere vP 
    130  
    131126delete('eof_olr_noaa_annuel_jas_1020.mat'); 
    132127save('eof_olr_noaa_annuel_jas_1020.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_1_8.m

    r10 r16  
    1 clear 
    2 close all 
     1% 
     2 
     3clear; 
     4close all; 
    35 
    46fid=fopen('olrf1-8_annuel.dat','r'); 
    … …  
    68v=fread(fid,siz,'float'); 
    79fclose(fid); 
    8 olr=reshape(v,425,28); clear v; 
     10olr=reshape(v,425,28); 
     11clear v; 
    912 
    1013% calcul de la matrice de covariance 
    … …  
    1316    for b=1:425; 
    1417      clear e d covaria; 
    15       e=olr(b,:);  
    16       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    1720      covaria=cov(e,d); 
    1821      vaudou(a,b)=covaria(2,1); 
    … …  
    2326[C,L]=eig(vaudou); 
    2427 
    25 % spatialisation du premier mode 
    26  
    27  
    28 % serie temporelle de la premiere vP 
    29  
    3028delete('eof_noaa_annuel_1_8.mat'); 
    3129save('eof_noaa_annuel_1_8.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_20.m

    r10 r16  
    1 %%%%%%%%%%%%%%% FICHIER OLR 
    2 % ouverture / lecture du fichier 
     1% 
     2 
    33clear; 
    44close all; 
    … …  
    88v=fread(fid,siz,'float'); 
    99fclose(fid); 
    10 olr1=reshape(v,25,17,10500); clear v; 
     10olr1=reshape(v,25,17,10500); 
     11clear v; 
    1112 
    1213cd ('/usr/temp/seglod/SIMULS_IRCAAM/'); 
    … …  
    102103clear siz28 siz28bis; 
    103104 
    104  
    105  
    106105clear olr1; 
    107106 
    … …  
    110109olr=reshape(olr,325,92,28); 
    111110 
    112 olr1=permute(olr,[2 1 3]); clear olr 
    113 olr(:,:)=mean(olr1); clear olr1; 
     111olr1=permute(olr,[2 1 3]); 
     112clear olr; 
     113olr(:,:)=mean(olr1); 
     114clear olr1; 
    114115 
    115116% calcul de la matrice de covariance 
    … …  
    118119    for b=1:325; 
    119120      clear e d covaria; 
    120       e=olr(b,:);  
    121       d=olr(a,:);  
     121      e=olr(b,:); 
     122      d=olr(a,:); 
    122123      covaria=cov(e,d); 
    123124      vaudou(a,b)=covaria(2,1); 
    … …  
    128129[C,L]=eig(vaudou); 
    129130 
    130 % spatialisation du premier mode 
    131  
    132  
    133 % serie temporelle de la premiere vP 
    134  
    135131delete('eof_olr_noaa_annuel_jas_1020.mat'); 
    136132save('eof_olr_noaa_annuel_jas_1020.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_8_28.m

    r10 r16  
    1 clear 
    2 close all 
     1% 
     2 
     3clear; 
     4close all; 
    35 
    46fid=fopen('olrf8-28_annuel.dat','r'); 
    … …  
    68v=fread(fid,siz,'float'); 
    79fclose(fid); 
    8 olr=reshape(v,425,28); clear v; 
     10olr=reshape(v,425,28); 
     11clear v; 
    912 
    1013% calcul de la matrice de covariance 
    … …  
    1316    for b=1:425; 
    1417      clear e d covaria; 
    15       e=olr(b,:);  
    16       d=olr(a,:);  
     18      e=olr(b,:); 
     19      d=olr(a,:); 
    1720      covaria=cov(e,d); 
    1821      vaudou(a,b)=covaria(2,1); 
    … …  
    2326[C,L]=eig(vaudou); 
    2427 
    25 % spatialisation du premier mode 
    26  
    27  
    28 % serie temporelle de la premiere vP 
    29  
    3028delete('eof_noaa_annuel_8_28.mat'); 
    3129save('eof_noaa_annuel_8_28.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/palette.m

    r10 r16  
     1% 
     2 
    13palette2=zeros(20,3); 
    24palette2(20,:)= [0.2 0 0];          % noir 

  • trunk/src/SIMULS_IRCAAM/palette1.m

    r10 r16  
     1% 
     2 
    13palette2=zeros(20,3); 
    24palette2(20,:)= [0.2 0 0];          % noir 

  • trunk/src/SIMULS_IRCAAM/palettecomplet.m

    r10 r16  
     1% 
     2 
    13palette2=zeros(20,3); 
    24palette2(20,:)= [0.2 0 0];          % noir 

  • trunk/src/SIMULS_IRCAAM/prepare_hgt500_tr.m

    r10 r16  
     1% 
     2 
    13% initialisation 
    2 clear; close all; 
    3 % 122     9    64   128 
     4clear; 
     5close all; 
    46 
    57cd('GEOPOT_TROP'); 
    … …  
    125127cd('..'); 
    126128save hgt500_trop.mat hgt500; 
    127  
    128  
    129  
    130  

  • trunk/src/SIMULS_IRCAAM/prepare_olr_AFR_annuel.m

    r15 r16  
     1% 
    12 
    23% ncload('rlut_d.AfNQIVIV.197106-09.nc') 
    … …  
    45% Name        Size                  Bytes  Class     Attributes 
    56% 
    6 % ans         1x4                     268  cell                 
    7 % lat        64x1                     512  double               
    8 % lon       128x1                    1024  double               
    9 % rlut      122x64x128            7995392  double               
    10 % time      122x1                     976  double               
     7% ans         1x4                     268  cell 
     8% lat        64x1                     512  double 
     9% lon       128x1                    1024  double 
     10% rlut      122x64x128            7995392  double 
     11% time      122x1                     976  double 
    1112% 
    1213 
    … …  
    1516 
    1617olr=zeros(122,30,64,128); 
    17  
    1818 
    1919ncload('rlut_d.AfNQIVIV.197106-09.nc','rlut'); 
    … …  
    111111olr1(:,:,:,1:64)=olr(:,:,:,65:128); 
    112112olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    113 clear olr 
    114 olr=olr1; clear olr1; 
     113clear olr; 
     114olr=olr1; 
     115clear olr1; 
    115116olr=olr(:,:,29:43,54:77); 
    116117taille=(43-29+1)*(77-54+1); 
    … …  
    118119% taille de OLR 
    119120% 122 28 14 24 
    120  olr=olr(31:122,:,:,:); 
    121 olr1(:,:,:)=mean(olr); clear olr; 
    122 olr=permute(olr1,[3 2 1]); clear olr1; 
     121olr=olr(31:122,:,:,:); 
     122olr1(:,:,:)=mean(olr); 
     123clear olr; 
     124olr=permute(olr1,[3 2 1]); 
     125clear olr1; 
    123126olr=reshape(olr,360,30); 
    124127for a=1:360; 
    … …  
    130133end 
    131134 
    132  
    133  
    134135% calcul de la matrice de covariance 
    135136vaudou=zeros(360,360); 
    … …  
    137138    for b=1:360; 
    138139      clear e d covaria; 
    139       e=olr(b,:);  
    140       d=olr(a,:);  
     140      e=olr(b,:); 
     141      d=olr(a,:); 
    141142      covaria=cov(e,d); 
    142143      vaudou(a,b)=covaria(2,1); 
    … …  
    147148[C,L]=eig(vaudou); 
    148149 
    149 % spatialisation du premier mode 
    150  
    151  
    152 % serie temporelle de la premiere vP 
    153  
    154150delete('eof_annuel_AFR.mat'); 
    155151save('eof_annuel_AFR.mat','C','L','olr') 

  • trunk/src/SIMULS_IRCAAM/prepare_olr_filtre.m

    r10 r16  
     1% 
    12 
    23% initialisation 
    3 clear; close all; 
     4clear; 
     5close all; 
    46 
    57fid=fopen('olrint.80.dat','r'); 
    … …  
    79v=fread(fid,siz,'float'); 
    810fclose(fid); 
    9 olr1=reshape(v,25,17,10500); clear v; 
    10  
     11olr1=reshape(v,25,17,10500); 
     12clear v; 
    1113 
    1214% on selectionne les mois d ete (attention aux annees bixestiles!) 
    … …  
    100102clear siz28 siz28bis; 
    101103 
    102  
    103  
    104104clear olr1; 
    105105 
    106106olr=reshape(olr,425,92,28); 
    107 olr1=permute(olr,[2 1 3]); clear olr 
    108 olr(:,:)=mean(olr1); clear olr1; 
     107olr1=permute(olr,[2 1 3]); 
     108clear olr; 
     109olr(:,:)=mean(olr1); 
     110clear olr1; 
    109111%olr=reshape(olr,25,17,28); 
    110112% size olr : 425 28 

  • trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_AFR.m

    r15 r16  
     1% 
     2 
    13% ce programme prepare les fichiers d'OLR de simulations IRCAAM CNRM 
    24% pour le programme de filtrage 
    … …  
    57% Name        Size                  Bytes  Class     Attributes 
    68% 
    7 % ans         1x4                     268  cell                 
    8 % lat        64x1                     512  double               
    9 % lon       128x1                    1024  double               
    10 % rlut      122x64x128            7995392  double               
    11 % time      122x1                     976  double               
     9% ans         1x4                     268  cell 
     10% lat        64x1                     512  double 
     11% lon       128x1                    1024  double 
     12% rlut      122x64x128            7995392  double 
     13% time      122x1                     976  double 
    1214% 
    1315 
    … …  
    1618 
    1719olr=zeros(122,29,64,128); 
    18  
    1920 
    2021ncload('rlut_d.AfNQIVIV.197106-09.nc','rlut'); 
    … …  
    110111olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    111112clear olr 
    112 olr=olr1; clear olr1; 
     113olr=olr1; 
     114clear olr1; 
    113115olr=olr(:,:,29:43,54:77); 
    114116taille=(43-29+1)*(77-54+1); 
    115117tps=122*29; 
    116118% taille de OLR 
    117 % 122 28 14 24  
     119% 122 28 14 24 
    118120olr=reshape(olr,3538,15,24); 
    119121olr=permute(olr,[3 2 1]); 

  • trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_AS.m

    r15 r16  
     1% 
     2 
    13% ce programme prepare les fichiers d'OLR de simulations IRCAAM CNRM 
    24% pour le programme de filtrage 
    … …  
    57% Name        Size                  Bytes  Class     Attributes 
    68% 
    7 % ans         1x4                     268  cell                 
    8 % lat        64x1                     512  double               
    9 % lon       128x1                    1024  double               
    10 % rlut      122x64x128            7995392  double               
    11 % time      122x1                     976  double               
     9% ans         1x4                     268  cell 
     10% lat        64x1                     512  double 
     11% lon       128x1                    1024  double 
     12% rlut      122x64x128            7995392  double 
     13% time      122x1                     976  double 
    1214% 
    1315 
    … …  
    111113olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    112114clear olr; 
    113 olr=olr1; clear olr1; 
     115olr=olr1; 
     116clear olr1; 
    114117olr=olr(:,:,29:43,54:77); 
    115118taille=(43-29+1)*(77-54+1); 
    116119tps=122*29; 
    117120% taille de OLR 
    118 % 122 28 14 24  
     121% 122 28 14 24 
    119122olr=reshape(olr,3538,15,24); 
    120123olr=permute(olr,[3 2 1]); 

  • trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_CTL.m

    r10 r16  
     1% 
     2 
    13% ce programme prepare les fichiers d'OLR de simulations IRCAAM CNRM 
    24% pour le programme de filtrage 
    … …  
    57% Name        Size                  Bytes  Class     Attributes 
    68% 
    7 % ans         1x4                     268  cell                 
    8 % lat        64x1                     512  double               
    9 % lon       128x1                    1024  double               
    10 % rlut      122x64x128            7995392  double               
    11 % time      122x1                     976  double               
     9% ans         1x4                     268  cell 
     10% lat        64x1                     512  double 
     11% lon       128x1                    1024  double 
     12% rlut      122x64x128            7995392  double 
     13% time      122x1                     976  double 
    1214% 
    1315 
    … …  
    111113olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    112114clear olr 
    113 olr=olr1; clear olr1; 
     115olr=olr1; 
     116clear olr1; 
    114117olr=olr(:,:,29:43,54:77); 
    115118taille=(43-29+1)*(77-54+1); 
    116119tps=122*29; 
    117120% taille de OLR 
    118 % 122 28 14 24  
     121% 122 28 14 24 
    119122olr=reshape(olr,3538,15,24); 
    120123olr=permute(olr,[3 2 1]); 

  • trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_CTL_clim.m

    r10 r16  
     1% 
     2 
    13% ce programme prepare les fichiers d'OLR de simulations IRCAAM CNRM 
    24% pour le programme de filtrage 
    … …  
    57% Name        Size                  Bytes  Class     Attributes 
    68% 
    7 % ans         1x4                     268  cell                 
    8 % lat        64x1                     512  double               
    9 % lon       128x1                    1024  double               
    10 % rlut      122x64x128            7995392  double               
    11 % time      122x1                     976  double               
     9% ans         1x4                     268  cell 
     10% lat        64x1                     512  double 
     11% lon       128x1                    1024  double 
     12% rlut      122x64x128            7995392  double 
     13% time      122x1                     976  double 
    1214% 
    1315 
    … …  
    111113olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    112114clear olr 
    113 olr=olr1; clear olr1; 
     115olr=olr1; 
     116clear olr1; 
    114117olr=olr(:,:,29:43,54:77); 
    115118taille=(43-29+1)*(77-54+1); 
    116119tps=122*29; 
    117120% taille de OLR 
    118 % 122 28 14 24  
     121% 122 28 14 24 
    119122olr=reshape(olr,3538,15,24); 
    120123olr=permute(olr,[3 2 1]); 

  • trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_TR.m

    r15 r16  
     1% 
     2 
    13% ce programme prepare les fichiers d'OLR de simulations IRCAAM CNRM 
    24% pour le programme de filtrage 
    … …  
    46% Name        Size                  Bytes  Class     Attributes 
    57% 
    6 % ans         1x4                     268  cell                 
    7 % lat        64x1                     512  double               
    8 % lon       128x1                    1024  double               
    9 % rlut      122x64x128            7995392  double               
    10 % time      122x1                     976  double               
     8% ans         1x4                     268  cell 
     9% lat        64x1                     512  double 
     10% lon       128x1                    1024  double 
     11% rlut      122x64x128            7995392  double 
     12% time      122x1                     976  double 
    1113% 
    1214 
    … …  
    110112olr1(:,:,:,65:128)=olr(:,:,:,1:64); 
    111113clear olr; 
    112 olr=olr1; clear olr1; 
     114olr=olr1; 
     115clear olr1; 
    113116olr=olr(:,:,29:43,54:77); 
    114117taille=(43-29+1)*(77-54+1); 
    115118tps=122*29; 
    116119% taille de OLR 
    117 % 122 28 14 24  
     120% 122 28 14 24 
    118121olr=reshape(olr,3538,15,24); 
    119122olr=permute(olr,[3 2 1]); 

  • trunk/src/SIMULS_IRCAAM/prepare_pluie_AFR_annuel.m

    r15 r16  
     1% 
    12 
    23% ncload('pr_d.AfNQIVIV.197106-09.nc') 
    … …  
    45% Name        Size                  Bytes  Class     Attributes 
    56% 
    6 % ans         1x4                     268  cell                 
    7 % lat        64x1                     512  double               
    8 % lon       128x1                    1024  double               
    9 % pr      122x64x128            7995392  double               
    10 % time      122x1                     976  double               
     7% ans         1x4                     268  cell 
     8% lat        64x1                     512  double 
     9% lon       128x1                    1024  double 
     10% pr      122x64x128            7995392  double 
     11% time      122x1                     976  double 
    1112% 
    1213 
    … …  
    112113pluie1(:,:,:,65:128)=pluie(:,:,:,1:64); 
    113114clear pluie 
    114 pluie=pluie1; clear pluie1; 
     115pluie=pluie1; 
     116clear pluie1; 
    115117pluie=pluie(:,:,29:43,54:77); 
    116118taille=(43-29+1)*(77-54+1); 
    … …  
    118120% taille de PLUIE 
    119121% 122 28 14 24 
    120  pluie=pluie(31:122,:,:,:); 
    121 pluie1(:,:,:)=mean(pluie); clear pluie; 
    122 pluie=permute(pluie1,[3 2 1]); clear pluie1; 
     122pluie=pluie(31:122,:,:,:); 
     123pluie1(:,:,:)=mean(pluie); 
     124clear pluie; 
     125pluie=permute(pluie1,[3 2 1]); 
     126clear pluie1; 
    123127pluie=reshape(pluie,360,30); 
    124128for a=1:360; 
    … …  
    137141    for b=1:360; 
    138142      clear e d covaria; 
    139       e=pluie(b,:);  
    140       d=pluie(a,:);  
     143      e=pluie(b,:); 
     144      d=pluie(a,:); 
    141145      covaria=cov(e,d); 
    142146      vaudou(a,b)=covaria(2,1); 
    … …  
    147151[C,L]=eig(vaudou); 
    148152 
    149 % spatialisation du premier mode 
    150  
    151  
    152 % serie temporelle de la premiere vP 
    153  
    154153delete('eof_pluie_annuel_AFR.mat'); 
    155154save('eof_pluie_annuel_AFR.mat','C','L','pluie'); 

  • trunk/src/SIMULS_IRCAAM/time_serie_afr_1030.m

    r15 r16  
     1% 
     2 
    13clear; 
    24close all; 
    … …  
    2628for a=1:29; 
    2729   if a<12; 
    28       figure(1); subplot(4,3,a); 
     30      figure(1); 
     31      subplot(4,3,a); 
    2932   elseif a<23; 
    30       figure(2); subplot(4,3,a-11); 
     33      figure(2); 
     34      subplot(4,3,a-11); 
    3135   else 
    32       figure(3); subplot(4,3,a-22); 
     36      figure(3); 
     37      subplot(4,3,a-22); 
    3338   end 
    34    clear koro1  
     39   clear koro1 
    3540   debut=(a-1)*122+1; 
    3641   fin=a*122; 
    3742   koro1=time_serie_olr1(debut:fin); 
    3843   koro2=time_serie_olr2(debut:fin); 
    39    clear x; x=[1:122]'; 
     44   clear x; 
     45   x=[1:122]'; 
    4046   plot(x,koro1,'r'); 
    4147   hold on 
    … …  
    5359   set (gca,'tickDir','out'); 
    5460   axis([1 122 -3 3]); 
    55     
     61 
    5662 
    5763   set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6); 
    … …  
    5965end; 
    6066 
    61 figure(1); print -depsc2 time_serie_eof_afr_1030a.eps; 
    62 figure(2); print -depsc2 time_serie_eof_afr_1030b.eps; 
    63 figure(3); print -depsc2 time_serie_eof_afr_1030c.eps; 
    64  
     67figure(1); 
     68print -depsc2 time_serie_eof_afr_1030a.eps; 
     69figure(2); 
     70print -depsc2 time_serie_eof_afr_1030b.eps; 
     71figure(3); 
     72print -depsc2 time_serie_eof_afr_1030c.eps; 

  • trunk/src/SIMULS_IRCAAM/time_serie_afr_30100.m

    r15 r16  
     1% 
     2 
    13clear; 
    24 
    … …  
    46olr=olr'; 
    57PC1=olr*C; 
    6  
    78 
    89%%%%%%% cronique de la VP1 
    … …  
    2526for a=1:29; 
    2627   if a<12; 
    27       figure(1); subplot(4,3,a); 
     28      figure(1); 
     29      subplot(4,3,a); 
    2830   elseif a<23; 
    29       figure(2); subplot(4,3,a-11); 
     31      figure(2); 
     32      subplot(4,3,a-11); 
    3033   else 
    31       figure(3); subplot(4,3,a-22); 
     34      figure(3); 
     35      subplot(4,3,a-22); 
    3236   end 
    33    clear koro1  
     37   clear koro1 
    3438   debut=(a-1)*122+1; 
    3539   fin=a*122; 
    3640   koro1=time_serie_olr1(debut:fin); 
    3741   koro2=time_serie_olr2(debut:fin); 
    38    clear x; x=[1:122]'; 
     42   clear x; 
     43   x=[1:122]'; 
    3944   plot(x,koro1,'r'); 
    4045   hold on 
    … …  
    5257   set (gca,'tickDir','out'); 
    5358   axis([1 122 -3 3]); 
    54     
     59 
    5560 
    5661   set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6); 
    … …  
    5863end; 
    5964 
    60 figure(1); print -depsc2 time_serie_eof_afr_30100a.eps; 
    61 figure(2); print -depsc2 time_serie_eof_afr_30100b.eps; 
    62 figure(3); print -depsc2 time_serie_eof_afr_30100c.eps; 
    63  
     65figure(1); 
     66print -depsc2 time_serie_eof_afr_30100a.eps; 
     67figure(2); 
     68print -depsc2 time_serie_eof_afr_30100b.eps; 
     69figure(3); 
     70print -depsc2 time_serie_eof_afr_30100c.eps; 

  • trunk/src/SIMULS_IRCAAM/time_serie_as_1030.m

    r15 r16  
     1% 
     2 
    13clear; 
    24close all; 
    … …  
    2729for a=1:29; 
    2830   if a<12; 
    29       figure(1); subplot(4,3,a); 
     31      figure(1); 
     32      subplot(4,3,a); 
    3033   elseif a<23; 
    31       figure(2); subplot(4,3,a-11); 
     34      figure(2); 
     35      subplot(4,3,a-11); 
    3236   else 
    33       figure(3); subplot(4,3,a-22); 
     37      figure(3); 
     38      subplot(4,3,a-22); 
    3439   end 
    35    clear koro1  
     40   clear koro1; 
    3641   debut=(a-1)*122+1; 
    3742   fin=a*122; 
    3843   koro1=time_serie_olr1(debut:fin); 
    3944   koro2=time_serie_olr2(debut:fin); 
    40    clear x; x=[1:122]'; 
     45   clear x; 
     46   x=[1:122]'; 
    4147   plot(x,koro1,'r'); 
    4248   hold on 
    … …  
    5460   set (gca,'tickDir','out'); 
    5561   axis([1 122 -3 3]); 
    56     
     62 
    5763 
    5864   set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6); 
    … …  
    6066end; 
    6167 
    62 figure(1); print -depsc2 time_serie_eof_as_1030a.eps; 
    63 figure(2); print -depsc2 time_serie_eof_as_1030b.eps; 
    64 figure(3); print -depsc2 time_serie_eof_as_1030c.eps; 
    65  
     68figure(1); 
     69print -depsc2 time_serie_eof_as_1030a.eps; 
     70figure(2); 
     71print -depsc2 time_serie_eof_as_1030b.eps; 
     72figure(3); 
     73print -depsc2 time_serie_eof_as_1030c.eps; 

  • trunk/src/SIMULS_IRCAAM/time_serie_as_30100.m

    r15 r16  
     1% 
     2 
    13clear; 
    24close all; 
    … …  
    2729for a=1:29; 
    2830   if a<12; 
    29       figure(1); subplot(4,3,a); 
     31      figure(1); 
     32      subplot(4,3,a); 
    3033   elseif a<23; 
    31       figure(2); subplot(4,3,a-11); 
     34      figure(2); 
     35      subplot(4,3,a-11); 
    3236   else 
    33       figure(3); subplot(4,3,a-22); 
     37      figure(3); 
     38      subplot(4,3,a-22); 
    3439   end 
    35    clear koro1  
     40   clear koro1 
    3641   debut=(a-1)*122+1; 
    3742   fin=a*122; 
    3843   koro1=time_serie_olr1(debut:fin); 
    3944   koro2=time_serie_olr2(debut:fin); 
    40    clear x; x=[1:122]'; 
     45   clear x; 
     46   x=[1:122]'; 
    4147   plot(x,koro1,'r'); 
    4248   hold on 
    … …  
    5460   set (gca,'tickDir','out'); 
    5561   axis([1 122 -3 3]); 
    56     
     62 
    5763 
    5864   set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6); 
    … …  
    6066end; 
    6167 
    62 figure(1); print -depsc2 time_serie_eof_as_30100a.eps; 
    63 figure(2); print -depsc2 time_serie_eof_as_30100b.eps; 
    64 figure(3); print -depsc2 time_serie_eof_as_30100c.eps; 
    65  
     68figure(1); 
     69print -depsc2 time_serie_eof_as_30100a.eps; 
     70figure(2); 
     71print -depsc2 time_serie_eof_as_30100b.eps; 
     72figure(3); 
     73print -depsc2 time_serie_eof_as_30100c.eps; 

  • trunk/src/SIMULS_IRCAAM/time_serie_ctl_1030.m

    r15 r16  
     1% 
     2 
    13clear; 
    24close all; 
    … …  
    2628for a=1:29; 
    2729   if a<12; 
    28       figure(1); subplot(4,3,a); 
     30      figure(1); 
     31      subplot(4,3,a); 
    2932   elseif a<23; 
    30       figure(2); subplot(4,3,a-11); 
     33      figure(2); 
     34      subplot(4,3,a-11); 
    3135   else 
    32       figure(3); subplot(4,3,a-22); 
     36      figure(3); 
     37      subplot(4,3,a-22); 
    3338   end 
    34    clear koro1  
     39   clear koro1 
    3540   debut=(a-1)*122+1; 
    3641   fin=a*122; 
    3742   koro1=time_serie_olr1(debut:fin); 
    3843   koro2=time_serie_olr2(debut:fin); 
    39    clear x; x=[1:122]'; 
     44   clear x; 
     45   x=[1:122]'; 
    4046   plot(x,koro1,'r'); 
    4147   hold on 
    … …  
    5359   set (gca,'tickDir','out'); 
    5460   axis([1 122 -3 3]); 
    55     
     61 
    5662 
    5763   set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6); 
    … …  
    5965end; 
    6066 
    61 figure(1); print -depsc2 time_serie_eof_ctl_1030a.eps; 
    62 figure(2); print -depsc2 time_serie_eof_ctl_1030b.eps; 
    63 figure(3); print -depsc2 time_serie_eof_ctl_1030c.eps; 
    64  
     67figure(1); 
     68print -depsc2 time_serie_eof_ctl_1030a.eps; 
     69figure(2); 
     70print -depsc2 time_serie_eof_ctl_1030b.eps; 
     71figure(3); 
     72print -depsc2 time_serie_eof_ctl_1030c.eps; 

  • trunk/src/SIMULS_IRCAAM/time_serie_ctl_30100.m

    r15 r16  
     1% 
     2 
    13clear; 
    24close all; 
    … …  
    2628for a=1:29; 
    2729   if a<12; 
    28       figure(1); subplot(4,3,a); 
     30      figure(1); 
     31      subplot(4,3,a); 
    2932   elseif a<23; 
    30       figure(2); subplot(4,3,a-11); 
     33      figure(2); 
     34      subplot(4,3,a-11); 
    3135   else 
    32       figure(3); subplot(4,3,a-22); 
     36      figure(3); 
     37      subplot(4,3,a-22); 
    3338   end 
    34    clear koro1  
     39   clear koro1 
    3540   debut=(a-1)*122+1; 
    3641   fin=a*122; 
    3742   koro1=time_serie_olr1(debut:fin); 
    3843   koro2=time_serie_olr2(debut:fin); 
    39    clear x; x=[1:122]'; 
     44   clear x; 
     45   x=[1:122]'; 
    4046   plot(x,koro1,'r'); 
    4147   hold on 
    … …  
    5359   set (gca,'tickDir','out'); 
    5460   axis([1 122 -3 3]); 
    55     
     61 
    5662 
    5763   set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6); 
    … …  
    5965end; 
    6066 
    61 figure(1); print -depsc2 time_serie_eof_ctl_30100a.eps; 
    62 figure(2); print -depsc2 time_serie_eof_ctl_30100b.eps; 
    63 figure(3); print -depsc2 time_serie_eof_ctl_30100c.eps; 
    64  
     67figure(1); 
     68print -depsc2 time_serie_eof_ctl_30100a.eps; 
     69figure(2); 
     70print -depsc2 time_serie_eof_ctl_30100b.eps; 
     71figure(3); 
     72print -depsc2 time_serie_eof_ctl_30100c.eps; 

  • trunk/src/SIMULS_IRCAAM/time_serie_noaa_annuel.m

    r15 r16  
     1% 
     2 
    13clear; 
    24close all; 
    … …  
    3840koro3=time_serie_olr3; 
    3941 
    40 clear x; x=[1979:2006]'; 
     42clear x; 
     43x=[1979:2006]'; 
    4144aa=plot(x,-koro1,'r'); 
    4245hold on 
    … …  
    5457set (gca,'tickDir','out'); 
    5558print -depsc2 time_serie_eof_noaa_annuel.eps; 
    56  

  • trunk/src/SIMULS_IRCAAM/time_serie_noaa_annuel_20.m

    r15 r16  
     1% 
    12clear; 
    23close all; 
    … …  
    3738koro3=time_serie_olr3; 
    3839 
    39 clear x; x=[1979:2006]'; 
     40clear x; 
     41x=[1979:2006]'; 
    4042aa=plot(x,-koro1,'r'); 
    4143hold on 
    … …  
    5355set (gca,'tickDir','out'); 
    5456print -depsc2 time_serie_eof_noaa_annuel_20.eps; 
    55  

  • trunk/src/SIMULS_IRCAAM/time_serie_tr_1030.m

    r15 r16  
     1% 
    12clear; 
    23close all; 
    … …  
    2627for a=1:29; 
    2728   if a<12; 
    28       figure(1); subplot(4,3,a); 
     29      figure(1); 
     30      subplot(4,3,a); 
    2931   elseif a<23; 
    30       figure(2); subplot(4,3,a-11); 
     32      figure(2); 
     33      subplot(4,3,a-11); 
    3134   else 
    32       figure(3); subplot(4,3,a-22); 
     35      figure(3); 
     36      subplot(4,3,a-22); 
    3337   end 
    34    clear koro1  
     38   clear koro1 
    3539   debut=(a-1)*122+1; 
    3640   fin=a*122; 
    3741   koro1=time_serie_olr1(debut:fin); 
    3842   koro2=time_serie_olr2(debut:fin); 
    39    clear x; x=[1:122]'; 
     43   clear x; 
     44   x=[1:122]'; 
    4045   plot(x,koro1,'r'); 
    4146   hold on 
    … …  
    5358   set (gca,'tickDir','out'); 
    5459   axis([1 122 -3 3]); 
    55     
     60 
    5661 
    5762   set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6); 
    … …  
    5964end; 
    6065 
    61 figure(1); print -depsc2 time_serie_eof_tr_1030a.eps; 
    62 figure(2); print -depsc2 time_serie_eof_tr_1030b.eps; 
    63 figure(3); print -depsc2 time_serie_eof_tr_1030c.eps; 
    64  
     66figure(1); 
     67print -depsc2 time_serie_eof_tr_1030a.eps; 
     68figure(2); 
     69print -depsc2 time_serie_eof_tr_1030b.eps; 
     70figure(3); 
     71print -depsc2 time_serie_eof_tr_1030c.eps; 

  • trunk/src/SIMULS_IRCAAM/time_serie_tr_30100.m

    r15 r16  
     1% 
     2 
    13clear; 
    24close all; 
    … …  
    2628for a=1:29; 
    2729   if a<12; 
    28       figure(1); subplot(4,3,a); 
     30      figure(1); 
     31      subplot(4,3,a); 
    2932   elseif a<23; 
    30       figure(2); subplot(4,3,a-11); 
     33      figure(2); 
     34      subplot(4,3,a-11); 
    3135   else 
    32       figure(3); subplot(4,3,a-22); 
     36      figure(3); 
     37      subplot(4,3,a-22); 
    3338   end 
    34    clear koro1  
     39   clear koro1 
    3540   debut=(a-1)*122+1; 
    3641   fin=a*122; 
    3742   koro1=time_serie_olr1(debut:fin); 
    3843   koro2=time_serie_olr2(debut:fin); 
    39    clear x; x=[1:122]'; 
     44   clear x; 
     45   x=[1:122]'; 
    4046   plot(x,koro1,'r'); 
    4147   hold on 
    … …  
    5359   set (gca,'tickDir','out'); 
    5460   axis([1 122 -3 3]); 
    55     
     61 
    5662 
    5763   set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6); 
    … …  
    5965end; 
    6066 
    61 figure(1); print -depsc2 time_serie_eof_tr_30100a.eps; 
    62 figure(2); print -depsc2 time_serie_eof_tr_30100b.eps; 
    63 figure(3); print -depsc2 time_serie_eof_tr_30100c.eps; 
    64  
     67figure(1); 
     68print -depsc2 time_serie_eof_tr_30100a.eps; 
     69figure(2); 
     70print -depsc2 time_serie_eof_tr_30100b.eps; 
     71figure(3); 
     72print -depsc2 time_serie_eof_tr_30100c.eps; 
Note: See TracChangeset for help on using the changeset viewer.