imach/src/imach.c - diff

Return to imach.c CVS log

Up to [Local Repository] / imach / src

version 1.220, 2016/02/15 23:22:02	version 1.221, 2016/02/15 23:35:36
Line 1	Line 1
/* $Id$	/* $Id$
$State$	$State$
$Log$	$Log$
Revision 1.220 2016/02/15 23:22:02 brouard	Revision 1.221 2016/02/15 23:35:36 brouard
Summary: 0.99r2	Summary: minor bug

Revision 1.219 2016/02/15 00:48:12 brouard	Revision 1.219 2016/02/15 00:48:12 brouard
* empty log message *	* empty log message *
Line 3962 Title=%s <br>Datafile=%s Firstpass=%d La	Line 3962 Title=%s <br>Datafile=%s Firstpass=%d La
fprintf(ficresphtm,"<tr><th>Tot</th>");	fprintf(ficresphtm,"<tr><th>Tot</th>");
for(jk=1; jk <=nlstate ; jk++){	for(jk=1; jk <=nlstate ; jk++){
if(posproptt < 1.e-5){	if(posproptt < 1.e-5){
fprintf(ficresphtm,"<td>%.5f</td><td>%.0f</td><td>%.0f</td>",pospropt[jk]/posproptt,pospropt[jk],posproptt);	fprintf(ficresphtm,"<td>Nanq</td><td>%.0f</td><td>%.0f</td>",pospropt[jk],posproptt);
}else{	}else{
fprintf(ficresphtm,"<td>Nanq</td><td>%.0f</td><td>%.0f</td>",pospropt[jk]/posproptt,pospropt[jk],posproptt);	fprintf(ficresphtm,"<td>%.5f</td><td>%.0f</td><td>%.0f</td>",pospropt[jk]/posproptt,pospropt[jk],posproptt);
}	}
}	}
fprintf(ficresphtm,"</tr>\n");	fprintf(ficresphtm,"</tr>\n");