/*
 * dccandsummary.c		Jim Piper	18-09-86
 *
 * Dicentric finding system - print out summary about candidates
 */
#include <stdio.h>
#include <wstruct.h>
#include <dicen.h>
#include <otypes.h>

dccandsummary(chc,nobjs,pf)
struct chromcands *chc;
FILE *pf;
{
	int i,j,histo[5],n,ncands;
	int D,U;
	D = U = 0;
	for (i=0; i<5; i++)
		histo[i] = 0;
	ncands= 0;
	for (i=0; i<nobjs; i++, chc++) {
		n = chc->ncands;
		ncands += n;
		if (n > 5)
			n = 5;
		histo[n]++;
		if (chc->Cbtype & DICENTRIC) {
			D++;
			if (chc->Cbtype & UNSHURE)
				U++;
		}
	}
	fprintf(pf,"%d objects analysed, %d candidates ",nobjs,ncands);
	fprintf(pf,"(histogram:");
	for (i=0; i<5; i++)
		fprintf(pf," %2d",histo[i]);
	fprintf(pf,"), D:%d (U:%d)\n",D,U);
}