*** empty log message ***

diff --git a/src/ChangeLog b/src/ChangeLog
index aff98bc5226b39c77aaecd3a037a99ce62613264..ad708fa72a2615d0873b87d695b5be2fe7bfb9b9 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2023-05-08  Nicolas Brouard   <brouard@ined.fr>
+
+       *  (Module): Error V0 when result:. and model 1+age+V1: fixed
+
 2023-04-29  Nicolas Brouard  <brouard@ined.fr>
 
        * imach.c (Module): Inverting the model equation and fixingg bugs

diff --git a/src/imach.c b/src/imach.c
index 5187d71e9a378ab8f4d1c7357c1287403ae89d8c..bf417933e9c9ecda026e254014aa2759c95186e7 100644 (file)
--- a/src/imach.c
+++ b/src/imach.c
@@ -1,6 +1,9 @@
 /* $Id$
   $State$
   $Log$
+  Revision 1.352  2023/04/29 10:46:21  brouard
+  *** empty log message ***
+
   Revision 1.351  2023/04/29 10:43:47  brouard
   Summary: 099r45
 
@@ -11119,14 +11122,15 @@ int decoderesult( char resultline[], int nres)
   if (strlen(resultsav) >1){
     j=nbocc(resultsav,'='); /**< j=Number of covariate values'=' in this resultline */
   }
-  if(j == 0){ /* Resultline but no = */
+  if(j == 0 && cptcovs== 0){ /* Resultline but no =  and no covariate in the model */
     TKresult[nres]=0; /* Combination for the nresult and the model */
     return (0);
   }
   if( j != cptcovs ){ /* Be careful if a variable is in a product but not single */
-    printf("ERROR: the number of variables in the resultline which is %d, differs from the number %d of single variables used in the model line, %s.\n",j, cptcovs, model);
-    fprintf(ficlog,"ERROR: the number of variables in the resultline which is %d, differs from the number %d of single variables used in the model line, %s.\n",j, cptcovs, model);
-    /* return 1;*/
+    fprintf(ficlog,"ERROR: the number of variables in the resultline which is %d, differs from the number %d of single variables used in the model line, 1+age+%s.\n",j, cptcovs, model);fflush(ficlog);
+    printf("ERROR: the number of variables in the resultline which is %d, differs from the number %d of single variables used in the model line, 1+age+%s.\n",j, cptcovs, model);fflush(stdout);
+    if(j==0)
+      return 1;
   }
   for(k=1; k<=j;k++){ /* Loop on any covariate of the RESULT LINE */
     if(nbocc(resultsav,'=') >1){