--- imach/src/imach.c	2018/05/02 20:58:27	1.288
+++ imach/src/imach.c	2018/12/13 09:16:26	1.289
@@ -1,6 +1,9 @@
-/* $Id: imach.c,v 1.288 2018/05/02 20:58:27 brouard Exp $
+/* $Id: imach.c,v 1.289 2018/12/13 09:16:26 brouard Exp $
   $State: Exp $
   $Log: imach.c,v $
+  Revision 1.289  2018/12/13 09:16:26  brouard
+  Summary: Bug for young ages (<-30) will be in r17
+
   Revision 1.288  2018/05/02 20:58:27  brouard
   Summary: Some bugs fixed
 
@@ -1070,12 +1073,12 @@ typedef struct {
 #define ODIRSEPARATOR '\\'
 #endif
 
-/* $Id: imach.c,v 1.288 2018/05/02 20:58:27 brouard Exp $ */
+/* $Id: imach.c,v 1.289 2018/12/13 09:16:26 brouard Exp $ */
 /* $State: Exp $ */
 #include "version.h"
 char version[]=__IMACH_VERSION__;
 char copyright[]="April 2018,INED-EUROREVES-Institut de longevite-Japan Society for the Promotion of Science (Grant-in-Aid for Scientific Research 25293121), Intel Software 2015-2018";
-char fullversion[]="$Revision: 1.288 $ $Date: 2018/05/02 20:58:27 $"; 
+char fullversion[]="$Revision: 1.289 $ $Date: 2018/12/13 09:16:26 $"; 
 char strstart[80];
 char optionfilext[10], optionfilefiname[FILENAMELENGTH];
 int erreur=0, nberr=0, nbwarn=0; /* Error number, number of errors number of warnings  */
@@ -10647,7 +10650,7 @@ int hPijx(double *p, int bage, int fage)
   /*if (stepm<=24) stepsize=2;*/
   
   /* agelim=AGESUP; */
-  ageminl=30;
+  ageminl=AGEINF; /* was 30 */
   hstepm=stepsize*YEARM; /* Every year of age */
   hstepm=hstepm/stepm; /* Typically 2 years, = 2/6 months = 4 */