Changeset 16 for trunk/src/mode_sahelien/olr_eof_1025.m

Timestamp:

01/06/09 10:53:18 (15 years ago)

Author:

pinsard

Message:

remove trailing blanks, split lines with multiple statements

File:

• trunk/src/mode_sahelien/olr_eof_1025.m (modified) (5 diffs)

trunk/src/mode_sahelien/olr_eof_1025.m

@@ +1 @@
+%
+
 %%%%%%%%%%%%%%% FICHIER OLR
 % ouverture / lecture du fichier
@@ -8 +10 @@
 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 +103 @@
 clear siz28 siz28bis;
 
-
-
 clear olr1;
 olr=reshape(olr,425,3416);
- 
+
 % calcul de la matrice de covariance
 vaudou=zeros(425,425);
@@ -111 +111 @@
     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);
@@ -121 +121 @@
 [C,L]=eig(vaudou);
 
-% spatialisation du premier mode
-
-
-% serie temporelle de la premiere vP
-
 delete('eof_1025_jjas.mat');
 save('eof_1025_jjas.mat','C','L','olr')