*** empty log message ***

diff --git a/src/imach.c b/src/imach.c
index 5ba0474b40bcacc6af8a5f747863bce0efbe8940..bc64e0b530c52b88bf193e7db008823abd8b3209 100644 (file)
--- 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++)\r
              fprintf(ficrespij," %1d-%1d",i,j);\r
          fprintf(ficrespij,"\n");\r
-         for (h=0; h<=nhstepm; h++){\r
+          for (h=0; h<=nhstepm; h++){\r
            fprintf(ficrespij,"%d %.0f %.0f",k,agedeb, agedeb+ h*hstepm/YEARM*stepm );\r
            for(i=1; i<=nlstate;i++)\r
              for(j=1; j<=nlstate+ndeath;j++)\r
                fprintf(ficrespij," %.5f", p3mat[i][j][h]);\r
            fprintf(ficrespij,"\n");\r
-         }\r
+            }\r
          free_ma3x(p3mat,1,nlstate+ndeath,1, nlstate+ndeath, 0,nhstepm);\r
          fprintf(ficrespij,"\n");\r
        }\r