From febdd0696ae7eb8ff0b1caa356ad68fd08583969 Mon Sep 17 00:00:00 2001
From: NBrouard <brouard@ined.fr>
Date: Tue, 27 Aug 2024 15:46:27 +0200
Subject: [PATCH] Just a new version

---
 src/imach.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/imach.c b/src/imach.c
index 5980146..cb93ae3 100644
--- a/src/imach.c
+++ b/src/imach.c
@@ -8007,7 +8007,7 @@ void  concatwav(int wav[], int **dh, int **bh,  int **mw, int **s, double *agedc
   for(i=1; i<=imx; i++){
     for(mi=1; mi<wav[i];mi++){
       if (stepm <=0)
-	dh[mi][i]=1;
+	dh[mi][i]=1; /* be careful dh starts at 1 to lastpass-firstpass */
       else{
 	if (s[mw[mi+1][i]][i] > nlstate) { /* A death, but what if date is unknown? */
 	  if (agedc[i] < 2*AGESUP) {
-- 
2.43.0