From: N. Brouard <brouard@ined.fr>
Date: Mon, 8 May 2023 18:48:22 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: imach-099s7~48
X-Git-Url: https://henry.ined.fr/git/?a=commitdiff_plain;h=be94f32541bd1a0058ccc9e867a9d0a29ec354b5;p=.git

*** empty log message ***
---

diff --git a/src/ChangeLog b/src/ChangeLog
index aff98bc..ad708fa 100644
--- 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 5187d71..bf41793 100644
--- 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){