From: Agnès Lièvre <agnes.lievre@education.gouv.fr>
Date: Fri, 19 Apr 2002 13:46:19 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: Version-0-8a~1
X-Git-Url: https://henry.ined.fr/git/?a=commitdiff_plain;h=66e5d5e6bc047b3444eed7439276684c09229515;p=.git

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

diff --git a/src/imach.c b/src/imach.c
index 5ba0474..bc64e0b 100644
--- a/src/imach.c
+++ b/src/imach.c
@@ -3227,13 +3227,13 @@ while((c=getc(ficpar))=='#' && c!= EOF){
 	    for(j=1; j<=nlstate+ndeath;j++)
 	      fprintf(ficrespij," %1d-%1d",i,j);
 	  fprintf(ficrespij,"\n");
-	  for (h=0; h<=nhstepm; h++){
+	   for (h=0; h<=nhstepm; h++){
 	    fprintf(ficrespij,"%d %.0f %.0f",k,agedeb, agedeb+ h*hstepm/YEARM*stepm );
 	    for(i=1; i<=nlstate;i++)
 	      for(j=1; j<=nlstate+ndeath;j++)
 		fprintf(ficrespij," %.5f", p3mat[i][j][h]);
 	    fprintf(ficrespij,"\n");
-	  }
+	     }
 	  free_ma3x(p3mat,1,nlstate+ndeath,1, nlstate+ndeath, 0,nhstepm);
 	  fprintf(ficrespij,"\n");
 	}