<HTML>
<HEAD>
<TITLE>#include "stdio.h"</TITLE>
</HEAD>
<BODY BGCOLOR="#FFFFFF"><FONT SIZE=4>#include "stdio.h"</FONT><FONT SIZE=2><P><A HREF="1st.htm">Back to higher level</A><P></FONT>

<PRE>#include "alloc.h"
#define OTUNO 54  /*number of OTUs*/
#define CHNO 95   /*number of tests*/
#include <A HREF="../../comp/c_code/my.h>"my.h"</A>

main()
{
FILE *in,*out;
register int ite,iot;
char c[OTUNO][CHNO];

in=fopen("fenlei.f","rt");
	/*"fenlei.f" has been transformed from dataset.tax using 
	the fclean.c code*/   
out=fopen("tmp.out","at");
for (ite=0;ite<CHNO;ite++)
	for (iot=0;iot<OTUNO;iot++)
		c[iot][ite]=eval(getc(in));
clusterit(c,OTUNO,out);
return;
}
ÿ</PRE></BODY>
</HTML>
