Changeset 16 for trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl_clim.m

Timestamp:

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

Author:

pinsard

Message:

remove trailing blanks, split lines with multiple statements

File:

• trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl_clim.m (modified) (4 diffs)

trunk/src/SIMULS_IRCAAM/eof_olr_ircaam_1030_ctl_clim.m

@@ -1 @@
-%%%%%%%%%%%%%%% FICHIER OLR
-% ouverture / lecture du fichier
-clear
-close all
+%
+
+clear;
+close all;
 
 fid=fopen('olrf10-30_clim_sst.80.dat','r');
@@ -8 +8 @@
 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 +16 @@
     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 +26 @@
 [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')