/*
 * asfix.c
 *
 * fix the absurd "nucleus" decision in autosplit
 */
#include <stdio.h>
#include <wstruct.h>
#include <chromanal.h>
main()
{
	int i,n,a,nc;
	struct chromosome *o, *readobj(), *ol[500];
	a = nc = n = 0;
	while ((o=readobj(stdin)) != NULL) {
		ol[n++] = o;
		if (o->plist->otype <= 1) {
			nc++;
			a += area(o);
		}
	}
	a = 4 * a / nc;
	for (i=0; i<n; i++) {
		o = ol[i];
		if (o->plist->otype == 5 && area(o) < a) {
			o->plist->otype = 0;
			o->plist->Cotype = 0;
		}
		writeobj(stdout,ol[i]);
	}
}