--- imach/src/imach.c	2001/05/02 18:44:18	1.9
+++ imach/src/imach.c	2001/05/09 14:25:42	1.10
@@ -1304,17 +1304,18 @@ jmean=0.;
 	dh[mi][i]=1;
       else{
 	if (s[mw[mi+1][i]][i] > nlstate) {
+	  if (agedc[i] < 2*AGESUP) {
 	  j= rint(agedc[i]*12-agev[mw[mi][i]][i]*12); 
-	  /*if ((j<0) || (j>28)) printf("j=%d num=%d ",j,i);*/
 	  if(j==0) j=1;  /* Survives at least one month after exam */
 	  k=k+1;
 	  if (j >= jmax) jmax=j;
 	  else if (j <= jmin)jmin=j;
 	  sum=sum+j;
+	  if (j<0) printf("j=%d num=%d ",j,i); 
+	  }
 	}
 	else{
 	  j= rint( (agev[mw[mi+1][i]][i]*12 - agev[mw[mi][i]][i]*12));
-	  /*if ((j<0) || (j>28)) printf("j=%d num=%d ",j,i);*/
 	  k=k+1;
 	  if (j >= jmax) jmax=j;
 	  else if (j <= jmin)jmin=j;
@@ -1676,7 +1677,7 @@ int main()
   double ***eij, ***vareij;
   double **varpl; /* Variances of prevalence limits by age */
   double *epj, vepp;
-  char version[80]="Imach version 62c, May 1999, INED-EUROREVES ";
+  char version[80]="Imach version 64b, May 2001, INED-EUROREVES ";
   char *alph[]={"a","a","b","c","d","e"}, str[4];
 
   char z[1]="c", occ;
@@ -2680,7 +2681,7 @@ strcpy(fileresvpl,"vpl");
     if (z[0] == 'c') system("./imach");
     else if (z[0] == 'e') {
       chdir(path);
-      system("index.htm");
+      system(optionfilehtm);
     }
     else if (z[0] == 'q') exit(0);
   }