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); |