From: N. Brouard <brouard@ined.fr>
Date: Mon, 11 Apr 2022 15:57:42 +0000 (+0000)
Subject: * imach.c (Module): Error in rewriting the 'r' file with yearsfproj or yearsbproj... 
X-Git-Tag: imach-099s7~129
X-Git-Url: https://henry.ined.fr/git/?a=commitdiff_plain;h=7cc4c308f1f414851912475469eada1cca2d0b1c;p=.git

* imach.c (Module): Error in rewriting the 'r' file with yearsfproj or yearsbproj fixed
---

diff --git a/src/imach.c b/src/imach.c
index aed1657..f7b77e6 100644
--- a/src/imach.c
+++ b/src/imach.c
@@ -1,6 +1,9 @@
 /* $Id$
   $State$
   $Log$
+  Revision 1.312  2022/04/05 21:24:39  brouard
+  *** empty log message ***
+
   Revision 1.311  2022/04/05 21:03:51  brouard
   Summary: Fixed quantitative covariates
 
@@ -12509,9 +12512,9 @@ Please run with mle=-1 to get a correct covariance matrix.\n",ageminpar,agemaxpa
           prvforecast = 1;
 	} 
 	else if((num_filled=sscanf(line,"prevforecast=%d yearsfproj=%lf mobil_average=%d\n",&prevfcast,&yrfproj,&mobilavproj)) !=EOF){/* && (num_filled == 3))*/
-	  printf("prevforecast=%d yearsfproj=%lf.2 mobil_average=%d\n",prevfcast,yrfproj,mobilavproj);
-	  fprintf(ficlog,"prevforecast=%d yearsfproj=%lf.2 mobil_average=%d\n",prevfcast,yrfproj,mobilavproj);
-	  fprintf(ficres,"prevforecast=%d yearsfproj=%lf.2 mobil_average=%d\n",prevfcast,yrfproj,mobilavproj);
+	  printf("prevforecast=%d yearsfproj=%.2lf mobil_average=%d\n",prevfcast,yrfproj,mobilavproj);
+	  fprintf(ficlog,"prevforecast=%d yearsfproj=%.2lf mobil_average=%d\n",prevfcast,yrfproj,mobilavproj);
+	  fprintf(ficres,"prevforecast=%d yearsfproj=%.2lf mobil_average=%d\n",prevfcast,yrfproj,mobilavproj);
           prvforecast = 2;
 	}
 	else {
@@ -12532,9 +12535,9 @@ Please run with mle=-1 to get a correct covariance matrix.\n",ageminpar,agemaxpa
           prvbackcast = 1;
 	} 
 	else if((num_filled=sscanf(line,"prevbackcast=%d yearsbproj=%lf mobil_average=%d\n",&prevbcast,&yrbproj,&mobilavproj)) ==3){/* && (num_filled == 3))*/
-	  printf("prevbackcast=%d yearsbproj=%lf.2 mobil_average=%d\n",prevbcast,yrbproj,mobilavproj);
-	  fprintf(ficlog,"prevbackcast=%d yearsbproj=%lf.2 mobil_average=%d\n",prevbcast,yrbproj,mobilavproj);
-	  fprintf(ficres,"prevbackcast=%d yearsbproj=%lf.2 mobil_average=%d\n",prevbcast,yrbproj,mobilavproj);
+	  printf("prevbackcast=%d yearsbproj=%.2lf mobil_average=%d\n",prevbcast,yrbproj,mobilavproj);
+	  fprintf(ficlog,"prevbackcast=%d yearsbproj=%.2lf mobil_average=%d\n",prevbcast,yrbproj,mobilavproj);
+	  fprintf(ficres,"prevbackcast=%d yearsbproj=%.2lf mobil_average=%d\n",prevbcast,yrbproj,mobilavproj);
           prvbackcast = 2;
 	}
 	else {