imach/src/imach.c - diff

Return to imach.c CVS log

Up to [Local Repository] / imach / src

version 1.128, 2006/06/30 13:02:05	version 1.129, 2007/08/31 13:49:27
Line 1	Line 1
/* $Id$	/* $Id$
$State$	$State$
$Log$	$Log$
	Revision 1.129 2007/08/31 13:49:27 lievre
	Modification of the way of exiting when the covariate is not binary in order to see on the window the error message before exiting

Revision 1.128 2006/06/30 13:02:05 brouard	Revision 1.128 2006/06/30 13:02:05 brouard
(Module): Clarifications on computing e.j	(Module): Clarifications on computing e.j

Line 4915 run imach with mle=-1 to get a correct t	Line 4918 run imach with mle=-1 to get a correct t
and V1=0 V2=1 for (3). V1=1 V2=1 should not exist and the corresponding\n \	and V1=0 V2=1 for (3). V1=1 V2=1 should not exist and the corresponding\n \
output of IMaCh is often meaningless.\n \	output of IMaCh is often meaningless.\n \
Exiting.\n",lval,linei, i,line,j);	Exiting.\n",lval,linei, i,line,j);
exit(1);	goto end;
}	}
covar[j][i]=(double)(lval);	covar[j][i]=(double)(lval);
strcpy(line,stra);	strcpy(line,stra);
}	}
lstra=strlen(stra);	lstra=strlen(stra);

if(lstra > 9){ /* More than 2*32 or max of what printf can write with %ld /	if(lstra > 9){ /* More than 2*32 or max of what printf can write with %ld /
stratrunc = &(stra[lstra-9]);	stratrunc = &(stra[lstra-9]);
num[i]=atol(stratrunc);	num[i]=atol(stratrunc);