Changeset 143 for altifloat/src/floater.h

Timestamp:

03/31/15 16:31:55 (9 years ago)

Author:

jbrlod

Message:

modif to perform and plot model experiment

File:

• altifloat/src/floater.h (modified) (5 diffs)

altifloat/src/floater.h

@@ -2 +2 @@
 
 //constantes
-YREAL rdtflo=2*3600;
+//YREAL rdtflo=2*3600;
+YREAL rdtflo=3600;
 //YREAL rdtflo=1;
 YREAL ur_dx=0;
@@ -80 +81 @@
       pmask[i][j]=0;
       }
-
+ /*
 char L1[50]="read_obs";
 char L2[50]="../obs_float/obs_float_test.dat";
@@ -86 +87 @@
  L[0]=L1;
  L[1]=L2;
- read_obs(2,L);
+ read_obs(2,L);*/
  //Test de isactiv
  //printf("isactiv(0,0):%d\n",is_activ(0,0));
@@ -448 +449 @@
   int jfl;
   int Yifloat=0;
-int nfobs=0;
-int jptend=it+1+jtlag;
+  int nfobs=0;
+  int ninit=0;
+  int jptend=it+1+jtlag;
   for (jfl=0;jfl<jpnfl;jfl++) {
     nfobs=0;
+    ninit=0;
     if (pmask[it][jfl]==1 && is_activ(jfl,it)>0) {
       //Chargemente de l'init
       YS1_r_float(Yifloat,0)=pjobs[it][jfl];
       YS2_r_float(Yifloat,0)=piobs[it][jfl];
+      ninit++;
       //Chargement des obs
       for (int itfl=it+1;itfl<jptend;itfl++) {
@@ -467 +471 @@
      
       Yifloat++; 
-      printf("--Float nr %d : %d obs loaded\n",Yifloat,nfobs); 
+      printf("--Float nr %d : %d initial position / %d obs loaded\n",Yifloat,ninit,nfobs); 
     } //if pmask==1