Index: trunk/src/SIMULS_IRCAAM/anomalies_olr_AFR_1979_2000.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/anomalies_olr_AFR_1979_2000.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/anomalies_olr_AFR_1979_2000.m	(revision 16)
@@ -1,2 +1,3 @@
+%
 
 % ncload('rlut_d.AfNQIVIV.197106-09.nc')
@@ -4,9 +5,9 @@
 % Name        Size                  Bytes  Class     Attributes
 %
-% ans         1x4                     268  cell                
-% lat        64x1                     512  double              
-% lon       128x1                    1024  double              
-% rlut      122x64x128            7995392  double              
-% time      122x1                     976  double              
+% ans         1x4                     268  cell
+% lat        64x1                     512  double
+% lon       128x1                    1024  double
+% rlut      122x64x128            7995392  double
+% time      122x1                     976  double
 %
 
@@ -112,5 +113,6 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr
-olr=olr1; clear olr1;
+olr=olr1;
+clear olr1;
 olr=olr(:,:,29:43,54:77);
 taille=(43-29+1)*(77-54+1);
@@ -118,6 +120,8 @@
 % taille de OLR
 % 122 30 15 24
-olr1=olr(31:122,:,:,:); clear olr
-olr(:,:,:)=mean(olr1); clear olr1;
+olr1=olr(31:122,:,:,:);
+clear olr
+olr(:,:,:)=mean(olr1);
+clear olr1;
 moyenne_olr(:,:)=mean(olr);
 olr_centre=zeros(30,15,24);
@@ -130,8 +134,12 @@
 end;
 
-figure(1); orient('landscape');
-figure(2); orient('landscape');
-lon=lon(54:77); lon=lon-180;
-lat=lat(29:43); lat=lat';
+figure(1);
+orient('landscape');
+figure(2);
+orient('landscape');
+lon=lon(54:77);
+lon=lon-180;
+lat=lat(29:43);
+lat=lat';
 for a=1:22;
      clear kara;
@@ -139,7 +147,9 @@
      kara(:,:)=olr_centre(a+8,:,:);
      if a<13;
-         figure(1); subplot(3,4,a);
+         figure(1);
+         subplot(3,4,a);
      else
-         figure(2); subplot(3,4,a-12);
+         figure(2);
+         subplot(3,4,a-12);
      end
      for b=1:15;
@@ -167,4 +177,6 @@
 end;
 
-figure(1); print -depsc2 anomalies_OLR_1979_2000_simulAFR_part1.eps;
-figure(2); print -depsc2 anomalies_OLR_1979_2000_simulAFR_part2.eps;
+figure(1);
+print -depsc2 anomalies_OLR_1979_2000_simulAFR_part1.eps;
+figure(2);
+print -depsc2 anomalies_OLR_1979_2000_simulAFR_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/carte_eof_AFR_annuel.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_AFR_annuel.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_AFR_annuel.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_annuel_AFR.mat;
@@ -13,5 +15,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -31,11 +34,11 @@
 colorbar;
 title('EOF1 OLR AFR annuel','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -62,10 +65,10 @@
 
 title('EOF2 OLR AFR annuel','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -91,5 +94,6 @@
 colorbar;
 title('EOF3 OLR AFR annuel','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
@@ -98,5 +102,4 @@
 
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -122,10 +125,9 @@
 colorbar;
 title('EOF4 OLR AFR annuel','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -142,12 +144,8 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-
-
 print -depsc2 resultats_eof_AFR_annuel.eps;
Index: trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_1030_ircaam.mat
@@ -13,5 +15,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -31,11 +34,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -62,10 +65,10 @@
 
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -91,12 +94,10 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -122,10 +123,9 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -142,12 +142,8 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-
-
 print -depsc2 resultats_eof_jjas_2006_1030.eps;
Index: trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_as.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_as.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_as.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_1030_ircaam_as.mat
@@ -13,5 +15,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -31,11 +34,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -62,10 +65,10 @@
 
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -91,5 +94,6 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
@@ -98,5 +102,4 @@
 
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -122,10 +125,9 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -142,5 +144,5 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
Index: trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_ctl.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_ctl.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_ctl.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_1030_ircaam_ctl.mat
@@ -15,5 +17,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -33,11 +36,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -64,10 +67,10 @@
 
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -93,5 +96,6 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
@@ -100,5 +104,4 @@
 
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -124,10 +127,9 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -144,12 +146,8 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-
-
 print -depsc2 eof_ircaam_1030_ctl.eps;
Index: trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_ctl_clim.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_ctl_clim.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_ctl_clim.m	(revision 16)
@@ -1,2 +1,3 @@
+%
 clear;
 load eof_1030_ircaam_ctl_clim.mat
@@ -15,5 +16,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -33,11 +35,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -64,10 +66,10 @@
 
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -93,12 +95,10 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -124,10 +124,9 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -144,12 +143,8 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-
-
 print -depsc2 eof_ircaam_1030_ctl_clim.eps;
Index: trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_tr.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_tr.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_1030_tr.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_1030_ircaam_tr.mat
@@ -13,5 +15,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -31,11 +34,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -62,10 +65,10 @@
 
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -91,5 +94,6 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
@@ -98,5 +102,4 @@
 
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -122,10 +125,9 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -142,5 +144,5 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
Index: trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_30100_ircaam.mat
@@ -13,5 +15,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -31,11 +34,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -62,10 +65,10 @@
 
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -91,12 +94,10 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -122,10 +123,9 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -142,12 +142,8 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-
-
 print -depsc2 resultats_eof_jjas_2006_30100.eps;
Index: trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_as.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_as.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_as.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_30100_ircaam_as.mat
@@ -13,5 +15,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -31,11 +34,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -62,10 +65,10 @@
 
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -91,12 +94,10 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -122,10 +123,9 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -142,9 +142,8 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
 print -depsc2 carte_eof_simuls_AS_30100.eps;
Index: trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_ctl.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_ctl.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_ctl.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_30100_ircaam_ctl.mat
@@ -15,5 +17,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -33,11 +36,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -64,10 +67,10 @@
 
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -93,12 +96,10 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -124,10 +125,9 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -144,12 +144,8 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-
-
 print -depsc2 eof_ircaam_30100_ctl.eps;
Index: trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_tr.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_tr.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_ircaam_30100_tr.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_30100_ircaam_tr.mat
@@ -13,5 +15,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -31,11 +34,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -62,10 +65,10 @@
 
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -91,12 +94,10 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -122,10 +123,9 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -142,5 +142,5 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
@@ -148,5 +148,2 @@
 
 print -depsc2 carte_eof_simuls_TR_30100.eps;
-
-
-
Index: trunk/src/SIMULS_IRCAAM/carte_eof_noaa_1_8.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_noaa_1_8.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_noaa_1_8.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_noaa_annuel_1_8.mat;
@@ -11,5 +13,6 @@
 lat=[-10:2.5:30];
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -30,11 +33,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,424);
 carte=reshape(carte1,25,17);
@@ -42,5 +45,5 @@
 
 clear carte1;
-lon=[-30:2.5:30]'; 
+lon=[-30:2.5:30]';
 lat=[-10:2.5:30];
 
@@ -60,13 +63,13 @@
 
 contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none');
-colorbar; 
+colorbar;
 axis([-30 30 -10 30]);
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,423);
@@ -76,5 +79,5 @@
 
 % defintion des lat et lon
-lon=[-30:2.5:30]'; 
+lon=[-30:2.5:30]';
 lat=[-10:2.5:30];
 
@@ -98,10 +101,9 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%%%%%%%%%%%%%%%
 
 clear carte1 x y a b carte coco;
@@ -112,5 +114,5 @@
 
 % defintion des lat et lon
-lon=[-30:2.5:30]'; 
+lon=[-30:2.5:30]';
 lat=[-10:2.5:30];
 
@@ -133,5 +135,6 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
@@ -156,5 +159,5 @@
 bar(x,vecteurs,'LineStyle','none')
 
-axis([0.5 20.5 0 50]); 
+axis([0.5 20.5 0 50]);
 set (gca,'YTick',[0:10:50],'YTickLabel',[0:10:50],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
Index: trunk/src/SIMULS_IRCAAM/carte_eof_noaa_8_28.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_noaa_8_28.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_noaa_8_28.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_noaa_annuel_8_28.mat;
@@ -11,5 +13,6 @@
 lat=[-10:2.5:30];
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -30,11 +33,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,424);
 carte=reshape(carte1,25,17);
@@ -60,13 +63,13 @@
 
 contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none');
-colorbar; 
+colorbar;
 axis([-30 30 -10 30]);
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,423);
@@ -76,5 +79,5 @@
 
 % defintion des lat et lon
-lon=[-30:2.5:30]'; 
+lon=[-30:2.5:30]';
 lat=[-10:2.5:30];
 
@@ -98,10 +101,9 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%%%%%%%%%%%%%%%
 
 clear carte1 x y a b carte coco;
@@ -112,5 +114,5 @@
 
 % defintion des lat et lon
-lon=[-30:2.5:30]'; 
+lon=[-30:2.5:30]';
 lat=[-10:2.5:30];
 
@@ -133,5 +135,6 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
@@ -156,5 +159,5 @@
 bar(x,vecteurs,'LineStyle','none')
 
-axis([0.5 20.5 0 70]); 
+axis([0.5 20.5 0 70]);
 set (gca,'YTick',[0:10:50],'YTickLabel',[0:10:50],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
Index: trunk/src/SIMULS_IRCAAM/carte_eof_olr_noaa_jas.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_olr_noaa_jas.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_olr_noaa_jas.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 cd('/usr/temp/seglod/mode_sahelien/')
@@ -13,5 +15,6 @@
 lat=[-10:2.5:30];
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -32,11 +35,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,424);
 carte=reshape(carte1,25,17);
@@ -62,13 +65,13 @@
 
 contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none');
-colorbar; 
+colorbar;
 
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,423);
@@ -78,5 +81,5 @@
 
 % defintion des lat et lon
-lon=[-30:2.5:30]'; 
+lon=[-30:2.5:30]';
 lat=[-10:2.5:30];
 
@@ -99,10 +102,9 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%%%%%%%%%%%%%%%
 
 clear carte1 x y a b carte coco;
@@ -113,5 +115,5 @@
 
 % defintion des lat et lon
-lon=[-30:2.5:30]'; 
+lon=[-30:2.5:30]';
 lat=[-10:2.5:30];
 
@@ -134,5 +136,6 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
@@ -142,5 +145,4 @@
 
 
-%********************
 subplot(3,2,4);
 vaude=0;
@@ -156,5 +158,5 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 50]); 
+axis([0.5 20.5 0 50]);
 set (gca,'YTick',[0:10:50],'YTickLabel',[0:10:50],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
Index: trunk/src/SIMULS_IRCAAM/carte_eof_olr_noaa_jas_20.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_olr_noaa_jas_20.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_olr_noaa_jas_20.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_olr_noaa_annuel_jas_1020.mat;
@@ -11,5 +13,6 @@
 lat=[-10:2.5:20];
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -30,11 +33,11 @@
 colorbar;
 title('OLR EOF1','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,324);
 carte=reshape(carte1,25,13);
@@ -42,5 +45,5 @@
 
 clear carte1;
-lon=[-30:2.5:30]'; 
+lon=[-30:2.5:30]';
 lat=[-10:2.5:20];
 
@@ -60,13 +63,13 @@
 
 contourf(lon,lat,-carte,[-0.2:0.02:0.2],'LineStyle','none');
-colorbar; 
+colorbar;
 axis([-30 30 -10 30]);
 title('OLR EOF2','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,323);
@@ -76,5 +79,5 @@
 
 % defintion des lat et lon
-lon=[-30:2.5:30]'; 
+lon=[-30:2.5:30]';
 lat=[-10:2.5:20];
 
@@ -98,10 +101,9 @@
 colorbar;
 title('OLR EOF3','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%%%%%%%%%%%%%%%
 
 clear carte1 x y a b carte coco;
@@ -112,5 +114,5 @@
 
 % defintion des lat et lon
-lon=[-30:2.5:30]'; 
+lon=[-30:2.5:30]';
 lat=[-10:2.5:20];
 
@@ -133,5 +135,6 @@
 colorbar;
 title('OLR EOF4','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:20],'YTickLabel',['10S';'  0';'10N';'20N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
@@ -156,5 +159,5 @@
 bar(x,vecteurs,'LineStyle','none')
 
-axis([0.5 20.5 0 50]); 
+axis([0.5 20.5 0 50]);
 set (gca,'YTick',[0:10:50],'YTickLabel',[0:10:50],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
Index: trunk/src/SIMULS_IRCAAM/carte_eof_pluie_AFR_annuel.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/carte_eof_pluie_AFR_annuel.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/carte_eof_pluie_AFR_annuel.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 load eof_pluie_annuel_AFR.mat;
@@ -13,5 +15,6 @@
 lat=lat(29:43)';
 
-figure(1); orient('landscape');
+figure(1);
+orient('landscape');
 subplot(3,2,1);
 palette;
@@ -31,11 +34,11 @@
 colorbar;
 title('EOF1 OLR AFR annuel','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
-clear carte1 x y a b carte coco; 
+clear carte1 x y a b carte coco;
 carte1=C(:,359);
 carte=reshape(carte1,24,15);
@@ -62,10 +65,10 @@
 
 title('EOF2 OLR AFR annuel','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,358);
@@ -91,12 +94,10 @@
 colorbar;
 title('EOF3 OLR AFR annuel','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 clear carte1 x y a b carte coco;
 carte1=C(:,357);
@@ -122,10 +123,9 @@
 colorbar;
 title('EOF4 OLR AFR annuel','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
-%%%%%%%%%%
 
 subplot(3,2,4);
@@ -142,12 +142,8 @@
 
 bar(x,vecteurs,'LineStyle','none')
-axis([0.5 20.5 0 25]); 
+axis([0.5 20.5 0 25]);
 set (gca,'YTick',[0:5:25],'YTickLabel',[0:5:25],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[2:2:20],'XTickLabel',[2:2:20],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
 
-
-
-
-
 print -depsc2 resultats_eof_AFR_annuel.eps;
Index: trunk/src/SIMULS_IRCAAM/climato_olr_AFR.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/climato_olr_AFR.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/climato_olr_AFR.m	(revision 16)
@@ -1,7 +1,8 @@
+%
+
 close all;
 clear;
 
 olr=zeros(122,29,64,128);
-
 
 ncload('rlut_d.AfNQIVIV.197106-09.nc','rlut');
@@ -97,8 +98,11 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr
-olr=olr1; clear olr1;
+olr=olr1;
+clear olr1;
 olr=olr(:,:,29:43,54:77);
-olr1(:,:,:)=mean(olr); clear olr;
-olr2(:,:)=mean(olr1); clear olr1;
+olr1(:,:,:)=mean(olr);
+clear olr;
+olr2(:,:)=mean(olr1);
+clear olr1;
 
 ncload('rlut_d.AfNQIVIV.199606-09.nc','lat','lon')
@@ -106,5 +110,7 @@
 lon=lon(54:77);
 lat=lat(29:43)';
-figure(1); orient('landscape'); subplot(3,2,1);
+figure(1);
+orient('landscape');
+subplot(3,2,1);
 palette;
 olr2(1,1)=149.999;
@@ -114,15 +120,19 @@
 colorbar;
 title('OLR mean JJAS AFR nudging','Fontsize',8);
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-axis equal; axis([-30 30 -10 30]);
+axis equal;
+axis([-30 30 -10 30]);
 climato_olr_CTL;
 title('OLR mean JJAS no nudging','Fontsize',8);
-axis equal; axis([-30 30 -10 30]);
+axis equal;
+axis([-30 30 -10 30]);
 climato_olr_noaa;
 title('OLR mean JJAS NOAA','Fontsize',8);
-axis equal; axis([-30 30 -10 30]);
+axis equal;
+axis([-30 30 -10 30]);
 
 print -depsc2 planel_climato_olr.eps
Index: trunk/src/SIMULS_IRCAAM/climato_olr_CTL.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/climato_olr_CTL.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/climato_olr_CTL.m	(revision 16)
@@ -1,2 +1,3 @@
+%
 
 clear;
@@ -98,8 +99,11 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr
-olr=olr1; clear olr1;
+olr=olr1;
+clear olr1;
 olr=olr(:,:,29:43,54:77);
-olr1(:,:,:)=mean(olr); clear olr;
-olr2(:,:)=mean(olr1); clear olr1;
+olr1(:,:,:)=mean(olr);
+clear olr;
+olr2(:,:)=mean(olr1);
+clear olr1;
 
 ncload('rlut_d.AfNQIVIV.199606-09.nc','lat','lon')
@@ -114,7 +118,7 @@
 colorbar;
 
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
Index: trunk/src/SIMULS_IRCAAM/climato_olr_noaa.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/climato_olr_noaa.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/climato_olr_noaa.m	(revision 16)
@@ -1,5 +1,6 @@
+%
 
 % initialisation
-clear; 
+clear;
 
 cd('..');
@@ -26,5 +27,6 @@
 olr1=zeros(siz,25,144);
 olr1(:,:,1:72)=olr(:,:,73:144);
-olr1(:,:,73:144)=olr(:,:,1:72); clear olr;
+olr1(:,:,73:144)=olr(:,:,1:72);
+clear olr;
 
 % on permture le temps et l'espce
@@ -33,8 +35,5 @@
 olr1=permute(olr1, [2 3 1]);
 
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % on met sous la forme longitude latitude jour
-
 
 % on selectionne les mois d ete (attention aux annees bixestiles!)
@@ -137,6 +136,8 @@
 olr=permute(olr,[3 4 1 2]);
 clear olr1
-olr1(:,:,:)=mean(olr); clear olr;
-olr2(:,:)=mean(olr1); clear olr1;
+olr1(:,:,:)=mean(olr);
+clear olr;
+olr2(:,:)=mean(olr1);
+clear olr1;
 cd('..');
 ncload('olr.day.mean.nc','lon','lat');
@@ -151,10 +152,9 @@
 olr2(1,2)=350.001;
 
-
 contourf(lon,lat,olr2,[150:10:350],'LineStyle','none');
 colorbar;
-hold on; cartemonde;
+hold on;
+cartemonde;
 set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
 set (gca,'XTick',[-30:10:30],'XTickLabel',['30W';'20W';'10W';'  0';'10E';'20E';'30E'],'fontname','Arial','fontsize',6);
 set (gca,'tickDir','out');
-
Index: trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof1_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof1_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof1_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 
 load hgt500_afr.mat
@@ -12,17 +15,21 @@
 hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128);
 hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64);
-clear hgt500;  hgt500=hgt500b; clear hgt500b
+clear hgt500;
+hgt500=hgt500b;
+clear hgt500b
 
 % on desaisonalise
 hgt1=permute(hgt500,[2 1 3 4]);
-hgt2(:,:,:)=nanmean(hgt1); clear hgt1;
+hgt2(:,:,:)=nanmean(hgt1);
+clear hgt1;
 hgt3=reshape(hgt500, 3538,64,128);
-hgt4(:,:)=nanmean(hgt3); clear hgt3;
+hgt4(:,:)=nanmean(hgt3);
+clear hgt3;
 
 for a=1:122;
    for b=1:28;
       for c=1:37;
-         for d=1:128; 
-             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                
+         for d=1:128;
+             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));
          end;
       end;
@@ -31,36 +38,38 @@
 clear hgt2 hgt4;
 
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
 load eof1_AFR_1030.txt
 
 % on met sous la forme annee mois
-hgt500_eof=reshape(eof1_AFR_1030,122,29); clear eof1_AFR_1030;
+hgt500_eof=reshape(eof1_AFR_1030,122,29);
+clear eof1_AFR_1030;
 
 % on calcule l ecart type sur la serie temporelle de l HGT500
-k=122*29; 
+k=122*29;
 hgt500bis=reshape(hgt500_eof,k,1);
-hgt500bis=std(hgt500bis); 
+hgt500bis=std(hgt500bis);
 
 % intialisation des tableaux
-hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
+hgt500_filtre_compomax=NaN*ones(50,31,64,128);
 hgt500_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));
             compteurmax=compteurmax+1;
           hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:);
@@ -97,5 +106,5 @@
             hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:);
             hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(hgt500bis));
             compteurmin=compteurmin+1;
@@ -136,5 +145,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:);
@@ -143,12 +152,15 @@
 % on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin;
-hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin);
+clear hgt500_filtre_compomin;
+hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax);
+clear hgt500_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -176,5 +188,5 @@
        delta_hgt500_filtre_min(1,2)=100.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -184,24 +196,26 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 20 80]);
-       if e==7;      
-      title('HGT500 composite EOF1 1030j simulation AFR ','fontsize',8) ;
+       if e==7;
+          title('HGT500 composite EOF1 1030j simulation AFR ','fontsize',8) ;
        end
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_afr_eof1_1030a.eps
 
-figure(2); orient('landscape');
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -229,5 +243,5 @@
        delta_hgt500_filtre_min(1,2)=100.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -237,11 +251,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -252,8 +267,5 @@
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_afr_eof1_1030b.eps
-
-
-
Index: trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof1_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof1_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof1_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 
 load hgt500_afr.mat
@@ -12,17 +15,21 @@
 hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128);
 hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64);
-clear hgt500;  hgt500=hgt500b; clear hgt500b
+clear hgt500;
+hgt500=hgt500b;
+clear hgt500b
 
 % on desaisonalise
 hgt1=permute(hgt500,[2 1 3 4]);
-hgt2(:,:,:)=nanmean(hgt1); clear hgt1;
+hgt2(:,:,:)=nanmean(hgt1);
+clear hgt1;
 hgt3=reshape(hgt500, 3538,64,128);
-hgt4(:,:)=nanmean(hgt3); clear hgt3;
+hgt4(:,:)=nanmean(hgt3);
+clear hgt3;
 
 for a=1:122;
    for b=1:28;
       for c=1:37;
-         for d=1:128; 
-             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                
+         for d=1:128;
+             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));
          end;
       end;
@@ -31,36 +38,38 @@
 clear hgt2 hgt4;
 
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
 load eof1_AFR_30100.txt
 
 % on met sous la forme annee mois
-hgt500_eof=reshape(eof1_AFR_30100,122,29); clear eof1_AFR_30100;
+hgt500_eof=reshape(eof1_AFR_30100,122,29);
+clear eof1_AFR_30100;
 
 % on calcule l ecart type sur la serie temporelle de l HGT500
-k=122*29; 
+k=122*29;
 hgt500bis=reshape(hgt500_eof,k,1);
-hgt500bis=std(hgt500bis); 
+hgt500bis=std(hgt500bis);
 
 % intialisation des tableaux
-hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
+hgt500_filtre_compomax=NaN*ones(50,31,64,128);
 hgt500_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));
             compteurmax=compteurmax+1;
           hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:);
@@ -97,5 +106,5 @@
             hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:);
             hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(hgt500bis));
             compteurmin=compteurmin+1;
@@ -136,5 +145,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:);
@@ -143,12 +152,15 @@
 % on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin;
-hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin);
+clear hgt500_filtre_compomin;
+hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax);
+clear hgt500_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -176,5 +188,5 @@
        delta_hgt500_filtre_min(1,2)=100.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -184,24 +196,26 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 20 80]);
-       if e==7;      
-      title('HGT500 composite EOF1 30100j simulation AFR ','fontsize',8) ;
+       if e==7;
+          title('HGT500 composite EOF1 30100j simulation AFR ','fontsize',8) ;
        end
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_afr_eof1_30100a.eps
 
-figure(2); orient('landscape');
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -229,5 +243,5 @@
        delta_hgt500_filtre_min(1,2)=100.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -237,11 +251,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -252,8 +267,5 @@
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_afr_eof1_30100b.eps
-
-
-
Index: trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 
 load hgt500_afr.mat;
@@ -12,17 +15,21 @@
 hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128);
 hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64);
-clear hgt500;  hgt500=hgt500b; clear hgt500b;
+clear hgt500;
+hgt500=hgt500b;
+clear hgt500b;
 
 % on desaisonalise
 hgt1=permute(hgt500,[2 1 3 4]);
-hgt2(:,:,:)=nanmean(hgt1); clear hgt1;
+hgt2(:,:,:)=nanmean(hgt1);
+clear hgt1;
 hgt3=reshape(hgt500, 3538,64,128);
-hgt4(:,:)=nanmean(hgt3); clear hgt3;
+hgt4(:,:)=nanmean(hgt3);
+clear hgt3;
 
 for a=1:122;
    for b=1:28;
       for c=1:37;
-         for d=1:128; 
-             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                
+         for d=1:128;
+             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));
          end;
       end;
@@ -31,36 +38,38 @@
 clear hgt2 hgt4;
 
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
 load eof2_AFR_1030.txt
 
 % on met sous la forme annee mois
-hgt500_eof=reshape(eof2_AFR_1030,122,29); clear eof2_AFR_1030;
+hgt500_eof=reshape(eof2_AFR_1030,122,29);
+clear eof2_AFR_1030;
 
 % on calcule l ecart type sur la serie temporelle de l HGT500
-k=122*29; 
+k=122*29;
 hgt500bis=reshape(hgt500_eof,k,1);
-hgt500bis=1.25*std(hgt500bis); 
+hgt500bis=1.25*std(hgt500bis);
 
 % intialisation des tableaux
-hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
+hgt500_filtre_compomax=NaN*ones(50,31,64,128);
 hgt500_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis));
             compteurmax=compteurmax+1;
           hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:);
@@ -97,5 +106,5 @@
             hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:);
             hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(-hgt500bis));
             compteurmin=compteurmin+1;
@@ -136,5 +145,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 
@@ -158,12 +167,15 @@
 % on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin;
-hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin);
+clear hgt500_filtre_compomin;
+hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax);
+clear hgt500_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -196,5 +208,5 @@
        delta_hgt500_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -204,24 +216,26 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-50:5:50],'yticklabel',[-50:5:50],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 20 80]);
-       if e==7;      
-      title('HGT500 composite EOF2 1030j simulation AFR ','fontsize',8) ;
+       if e==7;
+          title('HGT500 composite EOF2 1030j simulation AFR ','fontsize',8) ;
        end
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_afr_eof2_1030a.eps
 
-figure(2); orient('landscape');
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -254,5 +268,5 @@
        delta_hgt500_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -262,11 +276,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-40:20:40],'yticklabel',[-40:20:40],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -277,8 +292,5 @@
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_afr_eof2_1030b.eps
-
-
-
Index: trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_1030_min.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_1030_min.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_1030_min.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 
 load hgt500_afr.mat;
@@ -12,17 +15,21 @@
 hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128);
 hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64);
-clear hgt500;  hgt500=hgt500b; clear hgt500b;
+clear hgt500;
+hgt500=hgt500b;
+clear hgt500b;
 
 % on desaisonalise
 hgt1=permute(hgt500,[2 1 3 4]);
-hgt2(:,:,:)=nanmean(hgt1); clear hgt1;
+hgt2(:,:,:)=nanmean(hgt1);
+clear hgt1;
 hgt3=reshape(hgt500, 3538,64,128);
-hgt4(:,:)=nanmean(hgt3); clear hgt3;
+hgt4(:,:)=nanmean(hgt3);
+clear hgt3;
 
 for a=1:122;
    for b=1:29;
       for c=1:37;
-         for d=1:128; 
-             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                
+         for d=1:128;
+             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));
          end;
       end;
@@ -31,36 +38,38 @@
 clear hgt2 hgt4;
 
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
 load eof2_AFR_1030.txt
 
 % on met sous la forme annee mois
-hgt500_eof=reshape(eof2_AFR_1030,122,29); clear eof2_AFR_1030;
+hgt500_eof=reshape(eof2_AFR_1030,122,29);
+clear eof2_AFR_1030;
 
 % on calcule l ecart type sur la serie temporelle de l HGT500
-k=122*29; 
+k=122*29;
 hgt500bis=reshape(hgt500_eof,k,1);
-hgt500bis=1.25*std(hgt500bis); 
+hgt500bis=1.25*std(hgt500bis);
 
 % intialisation des tableaux
-hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
+hgt500_filtre_compomax=NaN*ones(50,31,64,128);
 hgt500_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));
             compteurmax=compteurmax+1;
             hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:);
@@ -97,5 +106,5 @@
             hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:);
             hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(-hgt500bis));
             compteurmin=compteurmin+1;
@@ -136,5 +145,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 siz=122*29;
@@ -162,12 +171,15 @@
 % on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin;
-hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin);
+clear hgt500_filtre_compomin;
+hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax);
+clear hgt500_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -202,5 +214,5 @@
        delta_hgt500_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -210,24 +222,26 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-50:5:50],'yticklabel',[-50:5:50],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 20 80]);
-       if e==7;      
-      title('HGT500 composite EOF2 1030j simulation AFR ','fontsize',8) ;
+       if e==7;
+          title('HGT500 composite EOF2 1030j simulation AFR ','fontsize',8) ;
        end
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_afr_eof2_1030a.eps
 
-figure(2); orient('landscape');
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -262,5 +276,5 @@
        delta_hgt500_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -270,11 +284,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-40:20:40],'yticklabel',[-40:20:40],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -285,8 +300,5 @@
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_afr_eof2_1030b.eps
-
-
-
Index: trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_hgt500_AFR_eof2_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 
 load hgt500_afr.mat
@@ -12,17 +15,21 @@
 hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128);
 hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64);
-clear hgt500;  hgt500=hgt500b; clear hgt500b
+clear hgt500;
+hgt500=hgt500b;
+clear hgt500b
 
 % on desaisonalise
 hgt1=permute(hgt500,[2 1 3 4]);
-hgt2(:,:,:)=nanmean(hgt1); clear hgt1;
+hgt2(:,:,:)=nanmean(hgt1);
+clear hgt1;
 hgt3=reshape(hgt500, 3538,64,128);
-hgt4(:,:)=nanmean(hgt3); clear hgt3;
+hgt4(:,:)=nanmean(hgt3);
+clear hgt3;
 
 for a=1:122;
    for b=1:28;
       for c=1:37;
-         for d=1:128; 
-             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                
+         for d=1:128;
+             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));
          end;
       end;
@@ -31,36 +38,38 @@
 clear hgt2 hgt4;
 
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
 load eof2_AFR_30100.txt
 
 % on met sous la forme annee mois
-hgt500_eof=reshape(eof2_AFR_30100,122,29); clear eof2_AFR_30100;
+hgt500_eof=reshape(eof2_AFR_30100,122,29);
+clear eof2_AFR_30100;
 
 % on calcule l ecart type sur la serie temporelle de l HGT500
-k=122*29; 
+k=122*29;
 hgt500bis=reshape(hgt500_eof,k,1);
-hgt500bis=std(hgt500bis); 
+hgt500bis=std(hgt500bis);
 
 % intialisation des tableaux
-hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
+hgt500_filtre_compomax=NaN*ones(50,31,64,128);
 hgt500_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));
             compteurmax=compteurmax+1;
           hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:);
@@ -97,5 +106,5 @@
             hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:);
             hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(hgt500bis));
             compteurmin=compteurmin+1;
@@ -136,5 +145,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:);
@@ -143,12 +152,15 @@
 % on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin;
-hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin);
+clear hgt500_filtre_compomin;
+hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax);
+clear hgt500_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -176,5 +188,5 @@
        delta_hgt500_filtre_min(1,2)=100.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -184,24 +196,26 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 20 80]);
-       if e==7;      
+       if e==7;
       title('HGT500 composite EOF2 30100j simulation AFR ','fontsize',8) ;
        end
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_afr_eof2_30100a.eps
 
-figure(2); orient('landscape');
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -229,5 +243,5 @@
        delta_hgt500_filtre_min(1,2)=100.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -237,11 +251,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -252,8 +267,5 @@
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_afr_eof2_30100b.eps
-
-
-
Index: trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof1_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof1_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof1_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 
 load hgt500_trop.mat
@@ -12,18 +15,21 @@
 hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128);
 hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64);
-clear hgt500;  hgt500=hgt500b; clear hgt500b
-
+clear hgt500;
+hgt500=hgt500b;
+clear hgt500b;
 
 % on desaisonalise
 hgt1=permute(hgt500,[2 1 3 4]);
-hgt2(:,:,:)=nanmean(hgt1); clear hgt1;
+hgt2(:,:,:)=nanmean(hgt1);
+clear hgt1;
 hgt3=reshape(hgt500, 3538,64,128);
-hgt4(:,:)=nanmean(hgt3); clear hgt3;
+hgt4(:,:)=nanmean(hgt3);
+clear hgt3;
 
 for a=1:122;
    for b=1:28;
       for c=1:37;
-         for d=1:128; 
-             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                
+         for d=1:128;
+             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));
          end;
       end;
@@ -32,36 +38,38 @@
 clear hgt2 hgt4;
 
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
 load eof1_TR_1030.txt
 
 % on met sous la forme annee mois
-hgt500_eof=reshape(eof1_TR_1030,122,29); clear eof1_TR_1030;
+hgt500_eof=reshape(eof1_TR_1030,122,29);
+clear eof1_TR_1030;
 
 % on calcule l ecart type sur la serie temporelle de l HGT500
-k=122*29; 
+k=122*29;
 hgt500bis=reshape(hgt500_eof,k,1);
-hgt500bis=std(hgt500bis); 
+hgt500bis=std(hgt500bis);
 
 % intialisation des tableaux
-hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
+hgt500_filtre_compomax=NaN*ones(50,31,64,128);
 hgt500_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));
             compteurmax=compteurmax+1;
           hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:);
@@ -98,5 +106,5 @@
             hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:);
             hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(hgt500bis));
             compteurmin=compteurmin+1;
@@ -137,5 +145,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:);
@@ -144,12 +152,15 @@
 % on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin;
-hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin);
+clear hgt500_filtre_compomin;
+hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax);
+clear hgt500_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -177,5 +188,5 @@
        delta_hgt500_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -185,24 +196,26 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 20 80]);
-       if e==7;      
+       if e==7;
       title('HGT500 composite EOF1 1030j simulation TROP ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_trop_eof1_1030a.eps
 
-figure(2); orient('landscape');
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -230,5 +243,5 @@
        delta_hgt500_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -238,11 +251,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -253,8 +267,5 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_trop_eof1_1030b.eps
-
-
-
Index: trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof1_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof1_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof1_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 
 load hgt500_trop.mat
@@ -12,17 +15,21 @@
 hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128);
 hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64);
-clear hgt500;  hgt500=hgt500b; clear hgt500b
+clear hgt500;
+hgt500=hgt500b;
+clear hgt500b;
 
 % on desaisonalise
 hgt1=permute(hgt500,[2 1 3 4]);
-hgt2(:,:,:)=nanmean(hgt1); clear hgt1;
+hgt2(:,:,:)=nanmean(hgt1);
+clear hgt1;
 hgt3=reshape(hgt500, 3538,64,128);
-hgt4(:,:)=nanmean(hgt3); clear hgt3;
+hgt4(:,:)=nanmean(hgt3);
+clear hgt3;
 
 for a=1:122;
    for b=1:28;
       for c=1:37;
-         for d=1:128; 
-             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                
+         for d=1:128;
+             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));
          end;
       end;
@@ -31,35 +38,38 @@
 clear hgt2 hgt4;
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
 load eof1_TR_30100.txt
 
 % on met sous la forme annee mois
-hgt500_eof=reshape(eof1_TR_30100,122,29); clear eof1_TR_30100;
+hgt500_eof=reshape(eof1_TR_30100,122,29);
+clear eof1_TR_30100;
 
 % on calcule l ecart type sur la serie temporelle de l HGT500
-k=122*29; 
+k=122*29;
 hgt500bis=reshape(hgt500_eof,k,1);
-hgt500bis=std(hgt500bis); 
+hgt500bis=std(hgt500bis);
 
 % intialisation des tableaux
-hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
+hgt500_filtre_compomax=NaN*ones(50,31,64,128);
 hgt500_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)<0 && delta(b-1)>0 && delta(b-2)>0 && hgt500_eof(b,a)>(hgt500bis));
             compteurmax=compteurmax+1;
           hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:);
@@ -96,5 +106,5 @@
             hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:);
             hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && hgt500_eof(b,a)<(hgt500bis));
             compteurmin=compteurmin+1;
@@ -135,5 +145,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:);
@@ -142,12 +152,15 @@
 % on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin;
-hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin);
+clear hgt500_filtre_compomin;
+hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax);
+clear hgt500_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -175,5 +188,5 @@
        delta_hgt500_filtre_min(1,2)=100.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -183,24 +196,26 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 20 80]);
-       if e==7;      
+       if e==7;
       title('HGT500 composite EOF1 30100j simulation TROP ','fontsize',8) ;
        end
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_trop_eof1_30100a.eps
 
-figure(2); orient('landscape');
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -228,5 +243,5 @@
        delta_hgt500_filtre_min(1,2)=100.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -236,11 +251,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -251,8 +267,5 @@
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_trop_eof1_30100b.eps
-
-
-
Index: trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof2_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof2_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof2_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 
 load hgt500_trop.mat
@@ -12,18 +15,21 @@
 hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128);
 hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64);
-clear hgt500;  hgt500=hgt500b; clear hgt500b
-
+clear hgt500;
+hgt500=hgt500b;
+clear hgt500b;
 
 % on desaisonalise
 hgt1=permute(hgt500,[2 1 3 4]);
-hgt2(:,:,:)=nanmean(hgt1); clear hgt1;
+hgt2(:,:,:)=nanmean(hgt1);
+clear hgt1;
 hgt3=reshape(hgt500, 3538,64,128);
-hgt4(:,:)=nanmean(hgt3); clear hgt3;
+hgt4(:,:)=nanmean(hgt3);
+clear hgt3;
 
 for a=1:122;
    for b=1:28;
       for c=1:37;
-         for d=1:128; 
-             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                
+         for d=1:128;
+             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));
          end;
       end;
@@ -32,36 +38,38 @@
 clear hgt2 hgt4;
 
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
 load eof2_TR_1030.txt
 
 % on met sous la forme annee mois
-hgt500_eof=reshape(eof2_TR_1030,122,29); clear eof2_TR_1030;
+hgt500_eof=reshape(eof2_TR_1030,122,29);
+clear eof2_TR_1030;
 
 % on calcule l ecart type sur la serie temporelle de l HGT500
-k=122*29; 
+k=122*29;
 hgt500bis=reshape(hgt500_eof,k,1);
-hgt500bis=std(hgt500bis); 
+hgt500bis=std(hgt500bis);
 
 % intialisation des tableaux
-hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
+hgt500_filtre_compomax=NaN*ones(50,31,64,128);
 hgt500_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis));
             compteurmax=compteurmax+1;
           hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:);
@@ -98,5 +106,5 @@
             hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:);
             hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)<0 && hgt500_eof(b,a)<(hgt500bis));
             compteurmin=compteurmin+1;
@@ -137,5 +145,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:);
@@ -144,12 +152,15 @@
 % on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin;
-hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin);
+clear hgt500_filtre_compomin;
+hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax);
+clear hgt500_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -177,5 +188,5 @@
        delta_hgt500_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -185,24 +196,26 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 20 80]);
-       if e==7;      
+       if e==7;
       title('HGT500 composite EOF2 1030j simulation TROP ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_trop_eof2_1030a.eps
 
-figure(2); orient('landscape');
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -230,5 +243,5 @@
        delta_hgt500_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -238,11 +251,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -253,8 +267,5 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_trop_eof2_1030b.eps
-
-
-
Index: trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof2_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof2_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_hgt500_TROP_eof2_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 
 load hgt500_trop.mat
@@ -12,18 +15,21 @@
 hgt500b(:,:,:,1:64)=hgt500(:,:,:,65:128);
 hgt500b(:,:,:,65:128)=hgt500(:,:,:,1:64);
-clear hgt500;  hgt500=hgt500b; clear hgt500b
-
+clear hgt500;
+hgt500=hgt500b;
+clear hgt500b;
 
 % on desaisonalise
 hgt1=permute(hgt500,[2 1 3 4]);
-hgt2(:,:,:)=nanmean(hgt1); clear hgt1;
+hgt2(:,:,:)=nanmean(hgt1);
+clear hgt1;
 hgt3=reshape(hgt500, 3538,64,128);
-hgt4(:,:)=nanmean(hgt3); clear hgt3;
+hgt4(:,:)=nanmean(hgt3);
+clear hgt3;
 
 for a=1:122;
    for b=1:28;
       for c=1:37;
-         for d=1:128; 
-             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));                
+         for d=1:128;
+             hgt500(a,b,c,d)=hgt500(a,b,c,d)-(hgt2(a,c,d)-hgt4(c,d));
          end;
       end;
@@ -32,39 +38,38 @@
 clear hgt2 hgt4;
 
-
-
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
 load eof2_TR_30100.txt
 
 % on met sous la forme annee mois
-hgt500_eof=reshape(eof2_TR_30100,122,29); clear eof2_TR_30100;
+hgt500_eof=reshape(eof2_TR_30100,122,29);
+clear eof2_TR_30100;
 
 % on calcule l ecart type sur la serie temporelle de l HGT500
-k=122*29; 
+k=122*29;
 hgt500bis=reshape(hgt500_eof,k,1);
-hgt500bis=std(hgt500bis); 
+hgt500bis=std(hgt500bis);
 
 % intialisation des tableaux
-hgt500_filtre_compomax=NaN*ones(50,31,64,128); 
+hgt500_filtre_compomax=NaN*ones(50,31,64,128);
 hgt500_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=hgt500_eof(b,a)-hgt500_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && hgt500_eof(b,a)>(hgt500bis));
             compteurmax=compteurmax+1;
           hgt500_filtre_compomax(compteurmax,1,:,:)=hgt500(b-20,a,:,:);
@@ -101,5 +106,5 @@
             hgt500_filtre_compomax(compteurmax,30,:,:)=hgt500(b+9,a,:,:);
             hgt500_filtre_compomax(compteurmax,31,:,:)=hgt500(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)<0 && hgt500_eof(b,a)<(hgt500bis));
             compteurmin=compteurmin+1;
@@ -140,5 +145,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 hgt500_filtre_compomin=hgt500_filtre_compomin(1:compteurmin,:,:,:);
@@ -147,12 +152,15 @@
 % on fait la somme des valeurs de hgt500_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin); clear hgt500_filtre_compomin;
-hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax); clear hgt500_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+hgt500_filtre_compomin1(:,:,:)=mean(hgt500_filtre_compomin);
+clear hgt500_filtre_compomin;
+hgt500_filtre_compomax1(:,:,:)=mean(hgt500_filtre_compomax);
+clear hgt500_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -180,5 +188,5 @@
        delta_hgt500_filtre_min(1,2)=100.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -188,24 +196,26 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 20 80]);
-       if e==7;      
+       if e==7;
       title('HGT500 composite EOF2 30100j simulation TROP ','fontsize',8) ;
        end
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_trop_eof2_30100a.eps
 
-figure(2); orient('landscape');
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -233,5 +243,5 @@
        delta_hgt500_filtre_min(1,2)=100.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -241,11 +251,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[30:10:70],'YTickLabel',['30N';'40N';'50N';'60N';'70N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'ytick',[-80:40:80],'yticklabel',[-80:40:80],'fontname','Arial','fontsize',5);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -256,8 +267,5 @@
        text(-270,40,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 print -depsc2 composite_hgt500_trop_eof2_30100b.eps
-
-
-
Index: trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof1_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof1_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof1_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 
@@ -88,5 +91,6 @@
 
 ncload('rlut_d.AfNQIVIV.200006-09.nc','rlut','lat','lon');
-olr(:,29,:,:)=rlut; clear rlut;
+olr(:,29,:,:)=rlut;
+clear rlut;
 
 % selction du domaine geographique
@@ -95,35 +99,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof1_AFR_1030.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof1_AFR_1030,122,29); clear eof1_AFR_1030;
+olr_eof=reshape(eof1_AFR_1030,122,29);
+clear eof1_AFR_1030;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -160,5 +168,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -199,5 +207,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -217,12 +225,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -255,5 +266,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -263,25 +274,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
-      title('OLR composite EOF1 1030j simulation AFR ','fontsize',8) ;
+       if e==7;
+          title('OLR composite EOF1 1030j simulation AFR ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF1_1030j_simulation_AFR_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF1_1030j_simulation_AFR_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -314,5 +328,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -322,11 +336,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set(co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -337,9 +352,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF1_1030j_simulation_AFR_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF1_1030j_simulation_AFR_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof1_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof1_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof1_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 
@@ -95,35 +98,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof1_AFR_30100.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof1_AFR_30100,122,29); clear eof1_AFR_30100;
+olr_eof=reshape(eof1_AFR_30100,122,29);
+clear eof1_AFR_30100;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -160,5 +167,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -199,5 +206,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -217,12 +224,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -255,5 +265,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -263,25 +273,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF1 30100j simulation AFR ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF1_30100j_simulation_AFR_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF1_30100j_simulation_AFR_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -314,5 +327,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -322,11 +335,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -337,9 +351,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF1_30100j_simulation_AFR_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF1_30100j_simulation_AFR_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof2_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof2_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof2_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 
@@ -95,35 +98,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof2_AFR_1030.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof2_AFR_1030,122,29); clear eof2_AFR_1030;
+olr_eof=reshape(eof2_AFR_1030,122,29);
+clear eof2_AFR_1030;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=1.25*std(olrbis); 
+olrbis=1.25*std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -160,5 +167,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -199,5 +206,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 
@@ -221,12 +228,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -259,5 +269,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -267,25 +277,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF2 1030j simulation AFR ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF2_1030j_simulation_AFR_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF2_1030j_simulation_AFR_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -319,5 +332,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -327,11 +340,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -342,9 +356,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF2_1030j_simulation_AFR_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF2_1030j_simulation_AFR_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof2_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof2_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_AFR_eof2_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 
@@ -95,35 +98,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof2_AFR_30100.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof2_AFR_30100,122,29); clear eof2_AFR_30100;
+olr_eof=reshape(eof2_AFR_30100,122,29);
+clear eof2_AFR_30100;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -160,5 +167,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -199,5 +206,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -217,12 +224,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -255,5 +265,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -263,25 +273,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF2 30100j simulation AFR ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF2_30100j_simulation_AFR_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF2_30100j_simulation_AFR_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -314,5 +327,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -322,11 +335,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -337,9 +351,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF2_30100j_simulation_AFR_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF2_30100j_simulation_AFR_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof1_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof1_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof1_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 cd('INDE')
@@ -96,35 +99,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof1_AS_1030.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof1_AS_1030,122,29); clear eof1_AS_1030;
+olr_eof=reshape(eof1_AS_1030,122,29);
+clear eof1_AS_1030;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -161,5 +168,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)<0  && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -200,5 +207,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -218,12 +225,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -256,5 +266,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -264,25 +274,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF1 1030j simulation AS ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF1_1030j_simulation_AS_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF1_1030j_simulation_AS_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -315,5 +328,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -323,11 +336,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -338,9 +352,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF1_1030j_simulation_AS_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF1_1030j_simulation_AS_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof1_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof1_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof1_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 cd('INDE')
@@ -96,35 +99,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof1_AS_30100.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof1_AS_30100,122,29); clear eof1_AS_30100;
+olr_eof=reshape(eof1_AS_30100,122,29);
+clear eof1_AS_30100;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -161,5 +168,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b) &&  olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -200,5 +207,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -218,12 +225,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -256,5 +266,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -264,25 +274,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF1 30100j simulation AS ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF1_30100j_simulation_AS_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF1_30100j_simulation_AS_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -315,5 +328,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -323,11 +336,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -338,9 +352,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF1_30100j_simulation_AS_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF1_30100j_simulation_AS_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof2_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof2_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof2_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 cd('INDE')
@@ -96,35 +99,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof2_AS_1030.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof2_AS_1030,122,29); clear eof2_AS_1030;
+olr_eof=reshape(eof2_AS_1030,122,29);
+clear eof2_AS_1030;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -161,5 +168,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -200,5 +207,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -218,12 +225,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -256,5 +266,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -264,25 +274,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF2 1030j simulation AS ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF2_1030j_simulation_AS_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF2_1030j_simulation_AS_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -315,5 +328,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -323,11 +336,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -338,9 +352,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF2_1030j_simulation_AS_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF2_1030j_simulation_AS_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof2_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof2_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_AS_eof2_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 cd('INDE')
@@ -96,35 +99,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof2_AS_30100.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof2_AS_30100,122,29); clear eof2_AS_30100;
+olr_eof=reshape(eof2_AS_30100,122,29);
+clear eof2_AS_30100;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-% cas 1 : max deltas apres negetifs et deltas avant postifs   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+% cas 1 : max deltas apres negetifs et deltas avant postifs
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -161,5 +168,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-% cas 2 : min deltas apres positifs et deltas avant negatifs   
+% cas 2 : min deltas apres positifs et deltas avant negatifs
          elseif (delta(b+1)>0 && delta(b)>0 && delta(b-1)<0 && delta(b-2)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -200,5 +207,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -218,12 +225,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -256,5 +266,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin;
        fin=-10+16*2.5;
@@ -264,25 +274,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
-      title('OLR composite EOF2 30100j simulation AS ','fontsize',8) ;
+       if e==7;
+          title('OLR composite EOF2 30100j simulation AS ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF2_30100j_simulation_AS_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF2_30100j_simulation_AS_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -315,5 +328,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -323,11 +336,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -338,9 +352,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF2_30100j_simulation_AS_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF2_30100j_simulation_AS_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof1_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof1_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof1_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 cd('CTL')
@@ -98,35 +101,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof1_CTL_1030.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof1_CTL_1030,122,29); clear eof1_CTL_1030;
+olr_eof=reshape(eof1_CTL_1030,122,29);
+clear eof1_CTL_1030;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -163,5 +170,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-   
+
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -202,5 +209,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -220,12 +227,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -258,5 +268,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -266,25 +276,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF1 1030j simulation CTL ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF1_1030j_simulation_CTL_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF1_1030j_simulation_CTL_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -317,5 +330,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -325,11 +338,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -340,9 +354,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF1_1030j_simulation_CTL_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF1_1030j_simulation_CTL_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof1_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof1_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof1_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 cd('CTL')
@@ -98,35 +101,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof1_CTL_30100.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof1_CTL_30100,122,29); clear eof1_CTL_30100;
+olr_eof=reshape(eof1_CTL_30100,122,29);
+clear eof1_CTL_30100;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -163,5 +170,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-   
+
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -202,5 +209,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -220,12 +227,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -258,5 +268,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -266,25 +276,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF1 30100j simulation CTL ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF1_30100j_simulation_CTL_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF1_30100j_simulation_CTL_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -317,5 +330,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -325,11 +338,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -340,9 +354,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF1_30100j_simulation_CTL_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF1_30100j_simulation_CTL_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof2_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof2_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof2_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 cd('CTL')
@@ -90,5 +93,4 @@
 ncload('rlut_d.CtIV.200006-09.nc','rlut','lat','lon');
 olr(:,29,:,:)=rlut; clear rlut;
-
 
 cd('..');
@@ -98,35 +100,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof2_CTL_1030.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof2_CTL_1030,122,29); clear eof2_CTL_1030;
+olr_eof=reshape(eof2_CTL_1030,122,29);
+clear eof2_CTL_1030;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -163,5 +169,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-   
+
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -202,5 +208,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -220,12 +226,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -258,5 +267,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -266,25 +275,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF2 1030j simulation CTL ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF2_1030j_simulation_CTL_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF2_1030j_simulation_CTL_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -317,5 +329,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -325,11 +337,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -340,9 +353,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF2_1030j_simulation_CTL_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF2_1030j_simulation_CTL_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof2_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof2_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_CTL_eof2_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 cd('CTL')
@@ -90,5 +93,4 @@
 ncload('rlut_d.CtIV.200006-09.nc','rlut','lat','lon');
 olr(:,29,:,:)=rlut; clear rlut;
-
 
 cd('..');
@@ -98,35 +100,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof2_CTL_30100.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof2_CTL_30100,122,29); clear eof2_CTL_30100;
+olr_eof=reshape(eof2_CTL_30100,122,29);
+clear eof2_CTL_30100;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -163,5 +169,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-   
+
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -202,5 +208,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -220,12 +226,15 @@
 % on fait la somme des valeurs de olr_filtreentiel sur le nbre d occurences
 % on obtent un tableau de la forme (jours-avant-apres,lon,lat)
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -258,5 +267,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -266,25 +275,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
-      title('OLR composite EOF2 30100j simulation CTL ','fontsize',8) ;
+       if e==7;
+          title('OLR composite EOF2 30100j simulation CTL ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF2_30100j_simulation_CTL_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF2_30100j_simulation_CTL_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -317,5 +329,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -325,11 +337,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -340,9 +353,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF2_30100j_simulation_CTL_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF2_30100j_simulation_CTL_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof1_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof1_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof1_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,29,64,128);
 cd('TROP')
@@ -96,35 +99,39 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof1_TR_1030.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof1_TR_1030,122,29); clear eof1_TR_1030;
+olr_eof=reshape(eof1_TR_1030,122,29);
+clear eof1_TR_1030;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*29; 
+k=122*29;
 olrbis=reshape(olr_eof,k,1);
-olrbis=std(olrbis); 
+olrbis=std(olrbis);
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:29; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:29;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis)); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>(olrbis));
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -161,5 +168,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-   
+
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<(-olrbis));
             compteurmin=compteurmin+1;
@@ -200,5 +207,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -217,12 +224,15 @@
 
 
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -255,5 +265,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -263,25 +273,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF1 1030j simulation TR ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF1_1030j_simulation_TR_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF1_1030j_simulation_TR_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -314,5 +327,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -322,11 +335,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -337,9 +351,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF1_1030j_simulation_TR_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF1_1030j_simulation_TR_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof1_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof1_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof1_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,30,64,128);
 cd('TROP')
@@ -99,16 +102,16 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof1_TR_30100.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof1_TR_30100,122,30); clear eof1_TR_30100;
+olr_eof=reshape(eof1_TR_30100,122,30);
+clear eof1_TR_30100;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*30; 
+k=122*30;
 olrbis=reshape(olr_eof,k,1);
-olr_std=std(olrbis); 
-olr_moy=mean(olrbis); 
+olr_std=std(olrbis);
+olr_moy=mean(olrbis);
 
 for a=1:3660;
@@ -117,22 +120,26 @@
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:30; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:30;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1);
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -169,5 +176,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-   
+
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<-1);
             compteurmin=compteurmin+1;
@@ -208,5 +215,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -223,14 +230,15 @@
 end
 
-
-
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -263,5 +271,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -271,25 +279,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF1 30100j simulation TR ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF1_30100j_simulation_TR_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF1_30100j_simulation_TR_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -322,5 +333,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -330,11 +341,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -345,9 +357,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF1_30100j_simulation_TR_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF1_30100j_simulation_TR_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof2_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof2_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof2_1030.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,30,64,128);
 cd('TROP')
@@ -99,16 +102,16 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof2_TR_30100.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof2_TR_30100,122,30); clear eof2_TR_30100;
+olr_eof=reshape(eof2_TR_30100,122,30);
+clear eof2_TR_30100;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*30; 
+k=122*30;
 olrbis=reshape(olr_eof,k,1);
-olr_std=std(olrbis); 
-olr_moy=mean(olrbis); 
+olr_std=std(olrbis);
+olr_moy=mean(olrbis);
 
 for a=1:3660;
@@ -117,22 +120,26 @@
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:30; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:30;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1);
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -169,5 +176,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-   
+
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<-1);
             compteurmin=compteurmin+1;
@@ -208,5 +215,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -225,12 +232,15 @@
 
 
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -263,5 +273,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -271,25 +281,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF2 30100j simulation TR ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -322,5 +335,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -330,11 +343,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -345,9 +359,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof2_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof2_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/composite_olr_TR_eof2_30100.m	(revision 16)
@@ -1,4 +1,7 @@
+%
+
 % initialisation
-clear; close all;
+clear;
+close all;
 olr=zeros(122,30,64,128);
 cd('TROP')
@@ -99,16 +102,16 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 load eof2_TR_30100.txt
 
 % on met sous la forme annee mois
-olr_eof=reshape(eof2_TR_30100,122,30); clear eof2_TR_30100;
+olr_eof=reshape(eof2_TR_30100,122,30);
+clear eof2_TR_30100;
 
 % on calcule l ecart type sur la serie temporelle de l OLR
-k=122*30; 
+k=122*30;
 olrbis=reshape(olr_eof,k,1);
-olr_std=std(olrbis); 
-olr_moy=mean(olrbis); 
+olr_std=std(olrbis);
+olr_moy=mean(olrbis);
 
 for a=1:3660;
@@ -117,22 +120,26 @@
 
 % intialisation des tableaux
-olr_filtre_compomax=NaN*ones(50,31,64,128); 
+olr_filtre_compomax=NaN*ones(50,31,64,128);
 olr_filtre_compomin=NaN*ones(50,31,64,128);
 
-compteurmax=0; 
+compteurmax=0;
 compteurmin=0;
 
-for a=1:30; % boucle sur les annees
-   clear delta; 
+% boucle sur les annees
+for a=1:30;
+   clear delta;
    delta=zeros(122,1);
-   for b=1:122; % boucle sur les jours : on prepare avant   
+   % boucle sur les jours : on prepare avant
+   for b=1:122;
         if b>1;
             delta(b)=olr_eof(b,a)-olr_eof(b-1,a);
         end;
    end;
-   for b=1:122; % boucle sur les jours
-      if (b>20 && b<112); % 1ere condition (laisser une marge de 10) 
-   
-         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1); 
+   % boucle sur les jours
+   for b=1:122;
+      % 1ere condition (laisser une marge de 10)
+      if (b>20 && b<112);
+
+         if (delta(b+1)<0 && delta(b)>0 && olr_eof(b,a)>1);
             compteurmax=compteurmax+1;
           olr_filtre_compomax(compteurmax,1,:,:)=olr1(b-20,a,:,:);
@@ -169,5 +176,5 @@
             olr_filtre_compomax(compteurmax,30,:,:)=olr1(b+9,a,:,:);
             olr_filtre_compomax(compteurmax,31,:,:)=olr1(b+10,a,:,:);
-   
+
          elseif (delta(b+1)>0 && delta(b)<0 && olr_eof(b,a)<-1);
             compteurmin=compteurmin+1;
@@ -208,5 +215,5 @@
          end;
       end;
-   end;         
+   end;
 end;
 % on fait le test de Student
@@ -225,12 +232,15 @@
 
 
-olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin); clear olr_filtre_compomin;
-olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax); clear olr_filtre_compomax;
-
-x=[-10:1:10]'; %'
-
-figure(1); orient('landscape');
-
-lat=lat'; 
+olr_filtre_compomin1(:,:,:)=nanmean(olr_filtre_compomin);
+clear olr_filtre_compomin;
+olr_filtre_compomax1(:,:,:)=nanmean(olr_filtre_compomax);
+clear olr_filtre_compomax;
+
+x=[-10:1:10]';
+
+figure(1);
+orient('landscape');
+
+lat=lat';
 lon=lon-180;
 for e=1:7;
@@ -263,5 +273,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -271,25 +281,28 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
        axis([-180 180 -20 40]);
-       if e==7;      
+       if e==7;
       title('OLR composite EOF2 30100j simulation TR ','fontsize',8) ;
        end
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(1); print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part1.eps;
-
-figure(2); orient('landscape');
+figure(1);
+print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part1.eps;
+
+figure(2);
+orient('landscape');
 
 for e=1:7;
@@ -322,5 +335,5 @@
        delta_olr_filtre_min(1,2)=50.0001;
        fin=-30+24*2.5;
-       
+
        clear fin
        fin=-10+16*2.5;
@@ -330,11 +343,12 @@
        else
       set (gca,'XTick',[-180:60:180],'XTickLabel',[' ';' ';' ';' ';' ';' '],'fontname','Arial','fontsize',6);
-       end       
+       end
        set (gca,'YTick',[-10:10:30],'YTickLabel',['10S';'  0';'10N';'20N';'30N'],'fontname','Arial','fontsize',6);
        if e==4;
-          co=colorbar;            
+          co=colorbar;
           set (co,'xtick',[-20:10:20],'xticklabel',[-20:10:20],'fontname','Arial','fontsize',6);
        end;
-       hold on; cartemonde1;
+       hold on;
+       cartemonde1;
        set (gca,'tickDir','out');
        axis equal
@@ -345,9 +359,7 @@
        text(-270,10,['day = ',num2str(f-21)],'fontname','Arial','fontsize',10);
        pos_vert=e/10;
-       set (gca,'position',[0.2 pos_vert 0.5 0.1]) 
+       set (gca,'position',[0.2 pos_vert 0.5 0.1])
 end;
 
-figure(2); print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part2.eps;
-
-
-
+figure(2);
+print -depsc2 composite_olr_EOF2_30100j_simulation_TR_part2.eps;
Index: trunk/src/SIMULS_IRCAAM/correlations_eofs_olr_jas.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/correlations_eofs_olr_jas.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/correlations_eofs_olr_jas.m	(revision 16)
@@ -1,9 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
-
-% initialisation
-clear; close all;
+%
+
+clear;
+close all;
 
 cd('..');
@@ -30,5 +27,6 @@
 olr1=zeros(siz,37,144);
 olr1(:,:,1:72)=olr(:,:,73:144);
-olr1(:,:,73:144)=olr(:,:,1:72); clear olr;
+olr1(:,:,73:144)=olr(:,:,1:72);
+clear olr;
 
 % on permture le temps et l'espce
@@ -42,16 +40,14 @@
       vecteur=zeros(siz,1);
       for c=1:siz;
-           vecteur(c)=olr1(a,b,c);    
+           vecteur(c)=olr1(a,b,c);
       end
       std_c=nanmean(vecteur);
       for c=1:siz;
-          olr1(a,b,c)=olr1(a,b,c)-std_c;    
-      end 
+          olr1(a,b,c)=olr1(a,b,c)-std_c;
+      end
    end
-end;   
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+end;
+
 % on met sous la forme longitude latitude jour
-
 
 % on selectionne les mois d ete (attention aux annees bixestiles!)
@@ -153,8 +149,7 @@
 %olr=zeros(37,144,92,28);
 
-
-olr1=permute(olr,[3 1 2 4]); clear olr;
-olr(:,:,:)=nanmean(olr1); 
-
+olr1=permute(olr,[3 1 2 4]);
+clear olr;
+olr(:,:,:)=nanmean(olr1);
 
 load eof3_noaa_annuel.txt
@@ -167,5 +162,5 @@
 correlations_eof3=zeros(37,144);
 
-lat=lat(5:41)'; 
+lat=lat(5:41)';
 lon=lon-180;
 
@@ -177,16 +172,20 @@
            y(c)=olr(a,b,c);
         end
-        clear coco; coco=corrcoef(y,eof1_noaa_annuel);
+        clear coco;
+        coco=corrcoef(y,eof1_noaa_annuel);
         correlations_eof1(a,b)=coco(2,1);
-        clear coco; coco=corrcoef(y,eof2_noaa_annuel);
+        clear coco;
+        coco=corrcoef(y,eof2_noaa_annuel);
         correlations_eof2(a,b)=coco(2,1);
-        clear coco; coco=corrcoef(y,eof3_noaa_annuel);
+        clear coco;
+        coco=corrcoef(y,eof3_noaa_annuel);
         correlations_eof3(a,b)=coco(2,1);
 
-    end    
+    end
 end
 
 subplot(3,1,1);
-correlations_eof1(1,1)=1.0001; correlations_eof1(1,2)=-1.0001;
+correlations_eof1(1,1)=1.0001;
+correlations_eof1(1,2)=-1.0001;
 
 contourf(lon,lat,correlations_eof1,[-1:0.1:1],'LineStyle','none');
@@ -206,5 +205,6 @@
 subplot(3,1,2);
 palette
-correlations_eof2(1,1)=1.0001; correlations_eof2(1,2)=-1.0001;
+correlations_eof2(1,1)=1.0001;
+correlations_eof2(1,2)=-1.0001;
 contourf(lon,lat,correlations_eof2,[-1:0.1:1],'LineStyle','none');
 colorbar;
@@ -224,5 +224,6 @@
 subplot(3,1,3);
 palette;
-correlations_eof3(1,1)=1.0001; correlations_eof3(1,2)=-1.0001;
+correlations_eof3(1,1)=1.0001;
+correlations_eof3(1,2)=-1.0001;
 contourf(lon,lat,correlations_eof3,[-1:0.1:1],'LineStyle','none');
 set (gca,'tickDir','out');
Index: trunk/src/SIMULS_IRCAAM/correlations_eofs_olr_jas_20.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/correlations_eofs_olr_jas_20.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/correlations_eofs_olr_jas_20.m	(revision 16)
@@ -1,9 +1,7 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
 
 % initialisation
-clear; close all;
+clear;
+close all;
 
 cd('..');
@@ -30,5 +28,6 @@
 olr1=zeros(siz,37,144);
 olr1(:,:,1:72)=olr(:,:,73:144);
-olr1(:,:,73:144)=olr(:,:,1:72); clear olr;
+olr1(:,:,73:144)=olr(:,:,1:72);
+clear olr;
 
 % on permture le temps et l'espce
@@ -42,16 +41,14 @@
       vecteur=zeros(siz,1);
       for c=1:siz;
-           vecteur(c)=olr1(a,b,c);    
+           vecteur(c)=olr1(a,b,c);
       end
       std_c=nanmean(vecteur);
       for c=1:siz;
-          olr1(a,b,c)=olr1(a,b,c)-std_c;    
-      end 
+          olr1(a,b,c)=olr1(a,b,c)-std_c;
+      end
    end
-end;   
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+end;
+
 % on met sous la forme longitude latitude jour
-
 
 % on selectionne les mois d ete (attention aux annees bixestiles!)
@@ -153,8 +150,7 @@
 %olr=zeros(37,144,92,28);
 
-
-olr1=permute(olr,[3 1 2 4]); clear olr;
-olr(:,:,:)=nanmean(olr1); 
-
+olr1=permute(olr,[3 1 2 4]);
+clear olr;
+olr(:,:,:)=nanmean(olr1);
 
 load eof3_noaa_annuel_20.txt
@@ -167,5 +163,5 @@
 correlations_eof3=zeros(37,144);
 
-lat=lat(5:41)'; 
+lat=lat(5:41)';
 lon=lon-180;
 
@@ -177,15 +173,19 @@
            y(c)=olr(a,b,c);
         end
-        clear coco; coco=corrcoef(y,eof1_noaa_annuel_20);
+        clear coco;
+        coco=corrcoef(y,eof1_noaa_annuel_20);
         correlations_eof1(a,b)=coco(2,1);
-        clear coco; coco=corrcoef(y,eof2_noaa_annuel_20);
+        clear coco;
+        coco=corrcoef(y,eof2_noaa_annuel_20);
         correlations_eof2(a,b)=coco(2,1);
-        clear coco; coco=corrcoef(y,eof3_noaa_annuel_20);
+        clear coco;
+        coco=corrcoef(y,eof3_noaa_annuel_20);
         correlations_eof3(a,b)=coco(2,1);
-    end    
+    end
 end
 
 subplot(3,1,1);
-correlations_eof1(1,1)=1.0001; correlations_eof1(1,2)=-1.0001;
+correlations_eof1(1,1)=1.0001;
+correlations_eof1(1,2)=-1.0001;
 
 contourf(lon,lat,correlations_eof1,[-1:0.1:1],'LineStyle','none');
@@ -205,5 +205,6 @@
 subplot(3,1,2);
 palette
-correlations_eof2(1,1)=1.0001; correlations_eof2(1,2)=-1.0001;
+correlations_eof2(1,1)=1.0001;
+correlations_eof2(1,2)=-1.0001;
 contourf(lon,lat,correlations_eof2,[-1:0.1:1],'LineStyle','none');
 colorbar;
@@ -223,5 +224,6 @@
 subplot(3,1,3);
 palette;
-correlations_eof3(1,1)=1.0001; correlations_eof3(1,2)=-1.0001;
+correlations_eof3(1,1)=1.0001;
+correlations_eof3(1,2)=-1.0001;
 contourf(lon,lat,correlations_eof3,[-1:0.1:1],'LineStyle','none');
 set (gca,'tickDir','out');
Index: trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030.m	(revision 16)
@@ -1,6 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf10-30.80.dat','r');
@@ -8,7 +8,7 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,360,3538); clear v;
+olr=reshape(v,360,3538);
+clear v;
 
- 
 % calcul de la matrice de covariance
 vaudou=zeros(360,360);
@@ -16,6 +16,6 @@
     for b=1:360;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -26,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_1030_ircaam.mat');
 save('eof_1030_ircaam.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_as.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_as.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_as.m	(revision 16)
@@ -1,6 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf10-30_as.80.dat','r');
@@ -8,7 +8,7 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,360,3538); clear v;
+olr=reshape(v,360,3538);
+clear v;
 
- 
 % calcul de la matrice de covariance
 vaudou=zeros(360,360);
@@ -16,6 +16,6 @@
     for b=1:360;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -26,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_1030_ircaam_as.mat');
 save('eof_1030_ircaam_as.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl.m	(revision 16)
@@ -1,6 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf10-30_ctl.80.dat','r');
@@ -8,7 +8,7 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,360,3538); clear v;
+olr=reshape(v,360,3538);
+clear v;
 
- 
 % calcul de la matrice de covariance
 vaudou=zeros(360,360);
@@ -16,6 +16,6 @@
     for b=1:360;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -26,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_1030_ircaam_ctl.mat');
 save('eof_1030_ircaam_ctl.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl_clim.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl_clim.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl_clim.m	(revision 16)
@@ -1,6 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf10-30_clim_sst.80.dat','r');
@@ -8,7 +8,7 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,360,3538); clear v;
+olr=reshape(v,360,3538);
+clear v;
 
- 
 % calcul de la matrice de covariance
 vaudou=zeros(360,360);
@@ -16,6 +16,6 @@
     for b=1:360;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -26,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_1030_ircaam_ctl_clim.mat');
 save('eof_1030_ircaam_ctl_clim.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_tr.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_tr.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_tr.m	(revision 16)
@@ -1,6 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf10-30_tr.80.dat','r');
@@ -8,7 +8,7 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,360,3538); clear v;
+olr=reshape(v,360,3538);
+clear v;
 
- 
 % calcul de la matrice de covariance
 vaudou=zeros(360,360);
@@ -16,6 +16,6 @@
     for b=1:360;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -26,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_1030_ircaam_tr.mat');
 save('eof_1030_ircaam_tr.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100.m	(revision 16)
@@ -1,6 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf30-100.80.dat','r');
@@ -8,5 +8,6 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,360,3538); clear v;
+olr=reshape(v,360,3538);
+clear v;
 
 % calcul de la matrice de covariance
@@ -15,6 +16,6 @@
     for b=1:360;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -25,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_30100_ircaam.mat');
 save('eof_30100_ircaam.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_as.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_as.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_as.m	(revision 16)
@@ -1,6 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf30-100_as.80.dat','r');
@@ -8,5 +8,6 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,360,3538); clear v;
+olr=reshape(v,360,3538);
+clear v;
 
 % calcul de la matrice de covariance
@@ -15,6 +16,6 @@
     for b=1:360;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -25,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_30100_ircaam_as.mat');
 save('eof_30100_ircaam_as.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_ctl.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_ctl.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_ctl.m	(revision 16)
@@ -1,6 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf30-100_ctl.80.dat','r');
@@ -8,7 +8,7 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,360,3538); clear v;
+olr=reshape(v,360,3538);
+clear v;
 
- 
 % calcul de la matrice de covariance
 vaudou=zeros(360,360);
@@ -16,6 +16,6 @@
     for b=1:360;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -26,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_30100_ircaam_ctl.mat');
 save('eof_30100_ircaam_ctl.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_tr.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_tr.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_30100_tr.m	(revision 16)
@@ -1,6 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf30-100_tr.80.dat','r');
@@ -8,5 +8,6 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,360,3538); clear v;
+olr=reshape(v,360,3538);
+clear v;
 
 % calcul de la matrice de covariance
@@ -15,6 +16,6 @@
     for b=1:360;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -25,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_30100_ircaam_tr.mat');
 save('eof_30100_ircaam_tr.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas.m	(revision 16)
@@ -1,6 +1,6 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrint.80.dat','r');
@@ -8,6 +8,6 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr1=reshape(v,25,17,10500); clear v;
-
+olr1=reshape(v,25,17,10500);
+clear v;
 
 % on selectionne les mois d ete (attention aux annees bixestiles!)
@@ -101,11 +101,11 @@
 clear siz28 siz28bis;
 
-
-
 clear olr1;
 
 olr=reshape(olr,425,92,28);
-olr1=permute(olr,[2 1 3]); clear olr
-olr(:,:)=mean(olr1); clear olr1;
+olr1=permute(olr,[2 1 3]);
+clear olr;
+olr(:,:)=mean(olr1);
+clear olr1;
 
 % calcul de la matrice de covariance
@@ -114,6 +114,6 @@
     for b=1:425;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -124,9 +124,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_olr_noaa_annuel_jas_1020.mat');
 save('eof_olr_noaa_annuel_jas_1020.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_1_8.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_1_8.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_1_8.m	(revision 16)
@@ -1,4 +1,6 @@
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf1-8_annuel.dat','r');
@@ -6,5 +8,6 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,425,28); clear v;
+olr=reshape(v,425,28);
+clear v;
 
 % calcul de la matrice de covariance
@@ -13,6 +16,6 @@
     for b=1:425;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -23,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_noaa_annuel_1_8.mat');
 save('eof_noaa_annuel_1_8.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_20.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_20.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_20.m	(revision 16)
@@ -1,4 +1,4 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
+%
+
 clear;
 close all;
@@ -8,5 +8,6 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr1=reshape(v,25,17,10500); clear v;
+olr1=reshape(v,25,17,10500);
+clear v;
 
 cd ('/usr/temp/seglod/SIMULS_IRCAAM/');
@@ -102,6 +103,4 @@
 clear siz28 siz28bis;
 
-
-
 clear olr1;
 
@@ -110,6 +109,8 @@
 olr=reshape(olr,325,92,28);
 
-olr1=permute(olr,[2 1 3]); clear olr
-olr(:,:)=mean(olr1); clear olr1;
+olr1=permute(olr,[2 1 3]);
+clear olr;
+olr(:,:)=mean(olr1);
+clear olr1;
 
 % calcul de la matrice de covariance
@@ -118,6 +119,6 @@
     for b=1:325;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -128,9 +129,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_olr_noaa_annuel_jas_1020.mat');
 save('eof_olr_noaa_annuel_jas_1020.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_8_28.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_8_28.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/eof_olr_noaa_annuel_jas_8_28.m	(revision 16)
@@ -1,4 +1,6 @@
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf8-28_annuel.dat','r');
@@ -6,5 +8,6 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr=reshape(v,425,28); clear v;
+olr=reshape(v,425,28);
+clear v;
 
 % calcul de la matrice de covariance
@@ -13,6 +16,6 @@
     for b=1:425;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -23,9 +26,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_noaa_annuel_8_28.mat');
 save('eof_noaa_annuel_8_28.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/palette.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/palette.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/palette.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 palette2=zeros(20,3);
 palette2(20,:)= [0.2 0 0];          % noir
Index: trunk/src/SIMULS_IRCAAM/palette1.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/palette1.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/palette1.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 palette2=zeros(20,3);
 palette2(20,:)= [0.2 0 0];          % noir
Index: trunk/src/SIMULS_IRCAAM/palettecomplet.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/palettecomplet.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/palettecomplet.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 palette2=zeros(20,3);
 palette2(20,:)= [0.2 0 0];          % noir
Index: trunk/src/SIMULS_IRCAAM/prepare_hgt500_tr.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/prepare_hgt500_tr.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/prepare_hgt500_tr.m	(revision 16)
@@ -1,5 +1,7 @@
+%
+
 % initialisation
-clear; close all;
-% 122     9    64   128
+clear;
+close all;
 
 cd('GEOPOT_TROP');
@@ -125,6 +127,2 @@
 cd('..');
 save hgt500_trop.mat hgt500;
-
-
-
-
Index: trunk/src/SIMULS_IRCAAM/prepare_olr_AFR_annuel.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/prepare_olr_AFR_annuel.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/prepare_olr_AFR_annuel.m	(revision 16)
@@ -1,2 +1,3 @@
+%
 
 % ncload('rlut_d.AfNQIVIV.197106-09.nc')
@@ -4,9 +5,9 @@
 % Name        Size                  Bytes  Class     Attributes
 %
-% ans         1x4                     268  cell                
-% lat        64x1                     512  double              
-% lon       128x1                    1024  double              
-% rlut      122x64x128            7995392  double              
-% time      122x1                     976  double              
+% ans         1x4                     268  cell
+% lat        64x1                     512  double
+% lon       128x1                    1024  double
+% rlut      122x64x128            7995392  double
+% time      122x1                     976  double
 %
 
@@ -15,5 +16,4 @@
 
 olr=zeros(122,30,64,128);
-
 
 ncload('rlut_d.AfNQIVIV.197106-09.nc','rlut');
@@ -111,6 +111,7 @@
 olr1(:,:,:,1:64)=olr(:,:,:,65:128);
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
-clear olr
-olr=olr1; clear olr1;
+clear olr;
+olr=olr1;
+clear olr1;
 olr=olr(:,:,29:43,54:77);
 taille=(43-29+1)*(77-54+1);
@@ -118,7 +119,9 @@
 % taille de OLR
 % 122 28 14 24
- olr=olr(31:122,:,:,:);
-olr1(:,:,:)=mean(olr); clear olr;
-olr=permute(olr1,[3 2 1]); clear olr1;
+olr=olr(31:122,:,:,:);
+olr1(:,:,:)=mean(olr);
+clear olr;
+olr=permute(olr1,[3 2 1]);
+clear olr1;
 olr=reshape(olr,360,30);
 for a=1:360;
@@ -130,6 +133,4 @@
 end
 
-
-
 % calcul de la matrice de covariance
 vaudou=zeros(360,360);
@@ -137,6 +138,6 @@
     for b=1:360;
       clear e d covaria;
-      e=olr(b,:); 
-      d=olr(a,:); 
+      e=olr(b,:);
+      d=olr(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -147,9 +148,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_annuel_AFR.mat');
 save('eof_annuel_AFR.mat','C','L','olr')
Index: trunk/src/SIMULS_IRCAAM/prepare_olr_filtre.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/prepare_olr_filtre.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/prepare_olr_filtre.m	(revision 16)
@@ -1,5 +1,7 @@
+%
 
 % initialisation
-clear; close all;
+clear;
+close all;
 
 fid=fopen('olrint.80.dat','r');
@@ -7,6 +9,6 @@
 v=fread(fid,siz,'float');
 fclose(fid);
-olr1=reshape(v,25,17,10500); clear v;
-
+olr1=reshape(v,25,17,10500);
+clear v;
 
 % on selectionne les mois d ete (attention aux annees bixestiles!)
@@ -100,11 +102,11 @@
 clear siz28 siz28bis;
 
-
-
 clear olr1;
 
 olr=reshape(olr,425,92,28);
-olr1=permute(olr,[2 1 3]); clear olr
-olr(:,:)=mean(olr1); clear olr1;
+olr1=permute(olr,[2 1 3]);
+clear olr;
+olr(:,:)=mean(olr1);
+clear olr1;
 %olr=reshape(olr,25,17,28);
 % size olr : 425 28
Index: trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_AFR.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_AFR.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_AFR.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 % ce programme prepare les fichiers d'OLR de simulations IRCAAM CNRM
 % pour le programme de filtrage
@@ -5,9 +7,9 @@
 % Name        Size                  Bytes  Class     Attributes
 %
-% ans         1x4                     268  cell                
-% lat        64x1                     512  double              
-% lon       128x1                    1024  double              
-% rlut      122x64x128            7995392  double              
-% time      122x1                     976  double              
+% ans         1x4                     268  cell
+% lat        64x1                     512  double
+% lon       128x1                    1024  double
+% rlut      122x64x128            7995392  double
+% time      122x1                     976  double
 %
 
@@ -16,5 +18,4 @@
 
 olr=zeros(122,29,64,128);
-
 
 ncload('rlut_d.AfNQIVIV.197106-09.nc','rlut');
@@ -110,10 +111,11 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr
-olr=olr1; clear olr1;
+olr=olr1;
+clear olr1;
 olr=olr(:,:,29:43,54:77);
 taille=(43-29+1)*(77-54+1);
 tps=122*29;
 % taille de OLR
-% 122 28 14 24 
+% 122 28 14 24
 olr=reshape(olr,3538,15,24);
 olr=permute(olr,[3 2 1]);
Index: trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_AS.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_AS.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_AS.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 % ce programme prepare les fichiers d'OLR de simulations IRCAAM CNRM
 % pour le programme de filtrage
@@ -5,9 +7,9 @@
 % Name        Size                  Bytes  Class     Attributes
 %
-% ans         1x4                     268  cell                
-% lat        64x1                     512  double              
-% lon       128x1                    1024  double              
-% rlut      122x64x128            7995392  double              
-% time      122x1                     976  double              
+% ans         1x4                     268  cell
+% lat        64x1                     512  double
+% lon       128x1                    1024  double
+% rlut      122x64x128            7995392  double
+% time      122x1                     976  double
 %
 
@@ -111,10 +113,11 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-olr=olr1; clear olr1;
+olr=olr1;
+clear olr1;
 olr=olr(:,:,29:43,54:77);
 taille=(43-29+1)*(77-54+1);
 tps=122*29;
 % taille de OLR
-% 122 28 14 24 
+% 122 28 14 24
 olr=reshape(olr,3538,15,24);
 olr=permute(olr,[3 2 1]);
Index: trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_CTL.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_CTL.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_CTL.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 % ce programme prepare les fichiers d'OLR de simulations IRCAAM CNRM
 % pour le programme de filtrage
@@ -5,9 +7,9 @@
 % Name        Size                  Bytes  Class     Attributes
 %
-% ans         1x4                     268  cell                
-% lat        64x1                     512  double              
-% lon       128x1                    1024  double              
-% rlut      122x64x128            7995392  double              
-% time      122x1                     976  double              
+% ans         1x4                     268  cell
+% lat        64x1                     512  double
+% lon       128x1                    1024  double
+% rlut      122x64x128            7995392  double
+% time      122x1                     976  double
 %
 
@@ -111,10 +113,11 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr
-olr=olr1; clear olr1;
+olr=olr1;
+clear olr1;
 olr=olr(:,:,29:43,54:77);
 taille=(43-29+1)*(77-54+1);
 tps=122*29;
 % taille de OLR
-% 122 28 14 24 
+% 122 28 14 24
 olr=reshape(olr,3538,15,24);
 olr=permute(olr,[3 2 1]);
Index: trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_CTL_clim.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_CTL_clim.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_CTL_clim.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 % ce programme prepare les fichiers d'OLR de simulations IRCAAM CNRM
 % pour le programme de filtrage
@@ -5,9 +7,9 @@
 % Name        Size                  Bytes  Class     Attributes
 %
-% ans         1x4                     268  cell                
-% lat        64x1                     512  double              
-% lon       128x1                    1024  double              
-% rlut      122x64x128            7995392  double              
-% time      122x1                     976  double              
+% ans         1x4                     268  cell
+% lat        64x1                     512  double
+% lon       128x1                    1024  double
+% rlut      122x64x128            7995392  double
+% time      122x1                     976  double
 %
 
@@ -111,10 +113,11 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr
-olr=olr1; clear olr1;
+olr=olr1;
+clear olr1;
 olr=olr(:,:,29:43,54:77);
 taille=(43-29+1)*(77-54+1);
 tps=122*29;
 % taille de OLR
-% 122 28 14 24 
+% 122 28 14 24
 olr=reshape(olr,3538,15,24);
 olr=permute(olr,[3 2 1]);
Index: trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_TR.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_TR.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/prepare_olr_filtre_TR.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 % ce programme prepare les fichiers d'OLR de simulations IRCAAM CNRM
 % pour le programme de filtrage
@@ -4,9 +6,9 @@
 % Name        Size                  Bytes  Class     Attributes
 %
-% ans         1x4                     268  cell                
-% lat        64x1                     512  double              
-% lon       128x1                    1024  double              
-% rlut      122x64x128            7995392  double              
-% time      122x1                     976  double              
+% ans         1x4                     268  cell
+% lat        64x1                     512  double
+% lon       128x1                    1024  double
+% rlut      122x64x128            7995392  double
+% time      122x1                     976  double
 %
 
@@ -110,10 +112,11 @@
 olr1(:,:,:,65:128)=olr(:,:,:,1:64);
 clear olr;
-olr=olr1; clear olr1;
+olr=olr1;
+clear olr1;
 olr=olr(:,:,29:43,54:77);
 taille=(43-29+1)*(77-54+1);
 tps=122*29;
 % taille de OLR
-% 122 28 14 24 
+% 122 28 14 24
 olr=reshape(olr,3538,15,24);
 olr=permute(olr,[3 2 1]);
Index: trunk/src/SIMULS_IRCAAM/prepare_pluie_AFR_annuel.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/prepare_pluie_AFR_annuel.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/prepare_pluie_AFR_annuel.m	(revision 16)
@@ -1,2 +1,3 @@
+%
 
 % ncload('pr_d.AfNQIVIV.197106-09.nc')
@@ -4,9 +5,9 @@
 % Name        Size                  Bytes  Class     Attributes
 %
-% ans         1x4                     268  cell                
-% lat        64x1                     512  double              
-% lon       128x1                    1024  double              
-% pr      122x64x128            7995392  double              
-% time      122x1                     976  double              
+% ans         1x4                     268  cell
+% lat        64x1                     512  double
+% lon       128x1                    1024  double
+% pr      122x64x128            7995392  double
+% time      122x1                     976  double
 %
 
@@ -112,5 +113,6 @@
 pluie1(:,:,:,65:128)=pluie(:,:,:,1:64);
 clear pluie
-pluie=pluie1; clear pluie1;
+pluie=pluie1;
+clear pluie1;
 pluie=pluie(:,:,29:43,54:77);
 taille=(43-29+1)*(77-54+1);
@@ -118,7 +120,9 @@
 % taille de PLUIE
 % 122 28 14 24
- pluie=pluie(31:122,:,:,:);
-pluie1(:,:,:)=mean(pluie); clear pluie;
-pluie=permute(pluie1,[3 2 1]); clear pluie1;
+pluie=pluie(31:122,:,:,:);
+pluie1(:,:,:)=mean(pluie);
+clear pluie;
+pluie=permute(pluie1,[3 2 1]);
+clear pluie1;
 pluie=reshape(pluie,360,30);
 for a=1:360;
@@ -137,6 +141,6 @@
     for b=1:360;
       clear e d covaria;
-      e=pluie(b,:); 
-      d=pluie(a,:); 
+      e=pluie(b,:);
+      d=pluie(a,:);
       covaria=cov(e,d);
       vaudou(a,b)=covaria(2,1);
@@ -147,9 +151,4 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_pluie_annuel_AFR.mat');
 save('eof_pluie_annuel_AFR.mat','C','L','pluie');
Index: trunk/src/SIMULS_IRCAAM/time_serie_afr_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/time_serie_afr_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/time_serie_afr_1030.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 close all;
@@ -26,16 +28,20 @@
 for a=1:29;
    if a<12;
-      figure(1); subplot(4,3,a);
+      figure(1);
+      subplot(4,3,a);
    elseif a<23;
-      figure(2); subplot(4,3,a-11);
+      figure(2);
+      subplot(4,3,a-11);
    else
-      figure(3); subplot(4,3,a-22);
+      figure(3);
+      subplot(4,3,a-22);
    end
-   clear koro1 
+   clear koro1
    debut=(a-1)*122+1;
    fin=a*122;
    koro1=time_serie_olr1(debut:fin);
    koro2=time_serie_olr2(debut:fin);
-   clear x; x=[1:122]';
+   clear x;
+   x=[1:122]';
    plot(x,koro1,'r');
    hold on
@@ -53,5 +59,5 @@
    set (gca,'tickDir','out');
    axis([1 122 -3 3]);
-   
+
 
    set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6);
@@ -59,6 +65,8 @@
 end;
 
-figure(1); print -depsc2 time_serie_eof_afr_1030a.eps;
-figure(2); print -depsc2 time_serie_eof_afr_1030b.eps;
-figure(3); print -depsc2 time_serie_eof_afr_1030c.eps;
-
+figure(1);
+print -depsc2 time_serie_eof_afr_1030a.eps;
+figure(2);
+print -depsc2 time_serie_eof_afr_1030b.eps;
+figure(3);
+print -depsc2 time_serie_eof_afr_1030c.eps;
Index: trunk/src/SIMULS_IRCAAM/time_serie_afr_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/time_serie_afr_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/time_serie_afr_30100.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 
@@ -4,5 +6,4 @@
 olr=olr';
 PC1=olr*C;
-
 
 %%%%%%% cronique de la VP1
@@ -25,16 +26,20 @@
 for a=1:29;
    if a<12;
-      figure(1); subplot(4,3,a);
+      figure(1);
+      subplot(4,3,a);
    elseif a<23;
-      figure(2); subplot(4,3,a-11);
+      figure(2);
+      subplot(4,3,a-11);
    else
-      figure(3); subplot(4,3,a-22);
+      figure(3);
+      subplot(4,3,a-22);
    end
-   clear koro1 
+   clear koro1
    debut=(a-1)*122+1;
    fin=a*122;
    koro1=time_serie_olr1(debut:fin);
    koro2=time_serie_olr2(debut:fin);
-   clear x; x=[1:122]';
+   clear x;
+   x=[1:122]';
    plot(x,koro1,'r');
    hold on
@@ -52,5 +57,5 @@
    set (gca,'tickDir','out');
    axis([1 122 -3 3]);
-   
+
 
    set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6);
@@ -58,6 +63,8 @@
 end;
 
-figure(1); print -depsc2 time_serie_eof_afr_30100a.eps;
-figure(2); print -depsc2 time_serie_eof_afr_30100b.eps;
-figure(3); print -depsc2 time_serie_eof_afr_30100c.eps;
-
+figure(1);
+print -depsc2 time_serie_eof_afr_30100a.eps;
+figure(2);
+print -depsc2 time_serie_eof_afr_30100b.eps;
+figure(3);
+print -depsc2 time_serie_eof_afr_30100c.eps;
Index: trunk/src/SIMULS_IRCAAM/time_serie_as_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/time_serie_as_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/time_serie_as_1030.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 close all;
@@ -27,16 +29,20 @@
 for a=1:29;
    if a<12;
-      figure(1); subplot(4,3,a);
+      figure(1);
+      subplot(4,3,a);
    elseif a<23;
-      figure(2); subplot(4,3,a-11);
+      figure(2);
+      subplot(4,3,a-11);
    else
-      figure(3); subplot(4,3,a-22);
+      figure(3);
+      subplot(4,3,a-22);
    end
-   clear koro1 
+   clear koro1;
    debut=(a-1)*122+1;
    fin=a*122;
    koro1=time_serie_olr1(debut:fin);
    koro2=time_serie_olr2(debut:fin);
-   clear x; x=[1:122]';
+   clear x;
+   x=[1:122]';
    plot(x,koro1,'r');
    hold on
@@ -54,5 +60,5 @@
    set (gca,'tickDir','out');
    axis([1 122 -3 3]);
-   
+
 
    set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6);
@@ -60,6 +66,8 @@
 end;
 
-figure(1); print -depsc2 time_serie_eof_as_1030a.eps;
-figure(2); print -depsc2 time_serie_eof_as_1030b.eps;
-figure(3); print -depsc2 time_serie_eof_as_1030c.eps;
-
+figure(1);
+print -depsc2 time_serie_eof_as_1030a.eps;
+figure(2);
+print -depsc2 time_serie_eof_as_1030b.eps;
+figure(3);
+print -depsc2 time_serie_eof_as_1030c.eps;
Index: trunk/src/SIMULS_IRCAAM/time_serie_as_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/time_serie_as_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/time_serie_as_30100.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 close all;
@@ -27,16 +29,20 @@
 for a=1:29;
    if a<12;
-      figure(1); subplot(4,3,a);
+      figure(1);
+      subplot(4,3,a);
    elseif a<23;
-      figure(2); subplot(4,3,a-11);
+      figure(2);
+      subplot(4,3,a-11);
    else
-      figure(3); subplot(4,3,a-22);
+      figure(3);
+      subplot(4,3,a-22);
    end
-   clear koro1 
+   clear koro1
    debut=(a-1)*122+1;
    fin=a*122;
    koro1=time_serie_olr1(debut:fin);
    koro2=time_serie_olr2(debut:fin);
-   clear x; x=[1:122]';
+   clear x;
+   x=[1:122]';
    plot(x,koro1,'r');
    hold on
@@ -54,5 +60,5 @@
    set (gca,'tickDir','out');
    axis([1 122 -3 3]);
-   
+
 
    set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6);
@@ -60,6 +66,8 @@
 end;
 
-figure(1); print -depsc2 time_serie_eof_as_30100a.eps;
-figure(2); print -depsc2 time_serie_eof_as_30100b.eps;
-figure(3); print -depsc2 time_serie_eof_as_30100c.eps;
-
+figure(1);
+print -depsc2 time_serie_eof_as_30100a.eps;
+figure(2);
+print -depsc2 time_serie_eof_as_30100b.eps;
+figure(3);
+print -depsc2 time_serie_eof_as_30100c.eps;
Index: trunk/src/SIMULS_IRCAAM/time_serie_ctl_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/time_serie_ctl_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/time_serie_ctl_1030.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 close all;
@@ -26,16 +28,20 @@
 for a=1:29;
    if a<12;
-      figure(1); subplot(4,3,a);
+      figure(1);
+      subplot(4,3,a);
    elseif a<23;
-      figure(2); subplot(4,3,a-11);
+      figure(2);
+      subplot(4,3,a-11);
    else
-      figure(3); subplot(4,3,a-22);
+      figure(3);
+      subplot(4,3,a-22);
    end
-   clear koro1 
+   clear koro1
    debut=(a-1)*122+1;
    fin=a*122;
    koro1=time_serie_olr1(debut:fin);
    koro2=time_serie_olr2(debut:fin);
-   clear x; x=[1:122]';
+   clear x;
+   x=[1:122]';
    plot(x,koro1,'r');
    hold on
@@ -53,5 +59,5 @@
    set (gca,'tickDir','out');
    axis([1 122 -3 3]);
-   
+
 
    set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6);
@@ -59,6 +65,8 @@
 end;
 
-figure(1); print -depsc2 time_serie_eof_ctl_1030a.eps;
-figure(2); print -depsc2 time_serie_eof_ctl_1030b.eps;
-figure(3); print -depsc2 time_serie_eof_ctl_1030c.eps;
-
+figure(1);
+print -depsc2 time_serie_eof_ctl_1030a.eps;
+figure(2);
+print -depsc2 time_serie_eof_ctl_1030b.eps;
+figure(3);
+print -depsc2 time_serie_eof_ctl_1030c.eps;
Index: trunk/src/SIMULS_IRCAAM/time_serie_ctl_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/time_serie_ctl_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/time_serie_ctl_30100.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 close all;
@@ -26,16 +28,20 @@
 for a=1:29;
    if a<12;
-      figure(1); subplot(4,3,a);
+      figure(1);
+      subplot(4,3,a);
    elseif a<23;
-      figure(2); subplot(4,3,a-11);
+      figure(2);
+      subplot(4,3,a-11);
    else
-      figure(3); subplot(4,3,a-22);
+      figure(3);
+      subplot(4,3,a-22);
    end
-   clear koro1 
+   clear koro1
    debut=(a-1)*122+1;
    fin=a*122;
    koro1=time_serie_olr1(debut:fin);
    koro2=time_serie_olr2(debut:fin);
-   clear x; x=[1:122]';
+   clear x;
+   x=[1:122]';
    plot(x,koro1,'r');
    hold on
@@ -53,5 +59,5 @@
    set (gca,'tickDir','out');
    axis([1 122 -3 3]);
-   
+
 
    set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6);
@@ -59,6 +65,8 @@
 end;
 
-figure(1); print -depsc2 time_serie_eof_ctl_30100a.eps;
-figure(2); print -depsc2 time_serie_eof_ctl_30100b.eps;
-figure(3); print -depsc2 time_serie_eof_ctl_30100c.eps;
-
+figure(1);
+print -depsc2 time_serie_eof_ctl_30100a.eps;
+figure(2);
+print -depsc2 time_serie_eof_ctl_30100b.eps;
+figure(3);
+print -depsc2 time_serie_eof_ctl_30100c.eps;
Index: trunk/src/SIMULS_IRCAAM/time_serie_noaa_annuel.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/time_serie_noaa_annuel.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/time_serie_noaa_annuel.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 close all;
@@ -38,5 +40,6 @@
 koro3=time_serie_olr3;
 
-clear x; x=[1979:2006]';
+clear x;
+x=[1979:2006]';
 aa=plot(x,-koro1,'r');
 hold on
@@ -54,3 +57,2 @@
 set (gca,'tickDir','out');
 print -depsc2 time_serie_eof_noaa_annuel.eps;
-
Index: trunk/src/SIMULS_IRCAAM/time_serie_noaa_annuel_20.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/time_serie_noaa_annuel_20.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/time_serie_noaa_annuel_20.m	(revision 16)
@@ -1,2 +1,3 @@
+%
 clear;
 close all;
@@ -37,5 +38,6 @@
 koro3=time_serie_olr3;
 
-clear x; x=[1979:2006]';
+clear x;
+x=[1979:2006]';
 aa=plot(x,-koro1,'r');
 hold on
@@ -53,3 +55,2 @@
 set (gca,'tickDir','out');
 print -depsc2 time_serie_eof_noaa_annuel_20.eps;
-
Index: trunk/src/SIMULS_IRCAAM/time_serie_tr_1030.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/time_serie_tr_1030.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/time_serie_tr_1030.m	(revision 16)
@@ -1,2 +1,3 @@
+%
 clear;
 close all;
@@ -26,16 +27,20 @@
 for a=1:29;
    if a<12;
-      figure(1); subplot(4,3,a);
+      figure(1);
+      subplot(4,3,a);
    elseif a<23;
-      figure(2); subplot(4,3,a-11);
+      figure(2);
+      subplot(4,3,a-11);
    else
-      figure(3); subplot(4,3,a-22);
+      figure(3);
+      subplot(4,3,a-22);
    end
-   clear koro1 
+   clear koro1
    debut=(a-1)*122+1;
    fin=a*122;
    koro1=time_serie_olr1(debut:fin);
    koro2=time_serie_olr2(debut:fin);
-   clear x; x=[1:122]';
+   clear x;
+   x=[1:122]';
    plot(x,koro1,'r');
    hold on
@@ -53,5 +58,5 @@
    set (gca,'tickDir','out');
    axis([1 122 -3 3]);
-   
+
 
    set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6);
@@ -59,6 +64,8 @@
 end;
 
-figure(1); print -depsc2 time_serie_eof_tr_1030a.eps;
-figure(2); print -depsc2 time_serie_eof_tr_1030b.eps;
-figure(3); print -depsc2 time_serie_eof_tr_1030c.eps;
-
+figure(1);
+print -depsc2 time_serie_eof_tr_1030a.eps;
+figure(2);
+print -depsc2 time_serie_eof_tr_1030b.eps;
+figure(3);
+print -depsc2 time_serie_eof_tr_1030c.eps;
Index: trunk/src/SIMULS_IRCAAM/time_serie_tr_30100.m
===================================================================
--- trunk/src/SIMULS_IRCAAM/time_serie_tr_30100.m	(revision 15)
+++ trunk/src/SIMULS_IRCAAM/time_serie_tr_30100.m	(revision 16)
@@ -1,2 +1,4 @@
+%
+
 clear;
 close all;
@@ -26,16 +28,20 @@
 for a=1:29;
    if a<12;
-      figure(1); subplot(4,3,a);
+      figure(1);
+      subplot(4,3,a);
    elseif a<23;
-      figure(2); subplot(4,3,a-11);
+      figure(2);
+      subplot(4,3,a-11);
    else
-      figure(3); subplot(4,3,a-22);
+      figure(3);
+      subplot(4,3,a-22);
    end
-   clear koro1 
+   clear koro1
    debut=(a-1)*122+1;
    fin=a*122;
    koro1=time_serie_olr1(debut:fin);
    koro2=time_serie_olr2(debut:fin);
-   clear x; x=[1:122]';
+   clear x;
+   x=[1:122]';
    plot(x,koro1,'r');
    hold on
@@ -53,5 +59,5 @@
    set (gca,'tickDir','out');
    axis([1 122 -3 3]);
-   
+
 
    set (gca,'YTick',[-3:1:3],'YTickLabel',[-3:1:3],'fontname','Arial','fontsize',6);
@@ -59,6 +65,8 @@
 end;
 
-figure(1); print -depsc2 time_serie_eof_tr_30100a.eps;
-figure(2); print -depsc2 time_serie_eof_tr_30100b.eps;
-figure(3); print -depsc2 time_serie_eof_tr_30100c.eps;
-
+figure(1);
+print -depsc2 time_serie_eof_tr_30100a.eps;
+figure(2);
+print -depsc2 time_serie_eof_tr_30100b.eps;
+figure(3);
+print -depsc2 time_serie_eof_tr_30100c.eps;
