Branch Coverage

lib/PDL/Stats/GLM-pp-stddz.c

Criterion	Covered	Total	%
branch	63	196	32.1

line	true	false	branch
34	0	3	if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in stddz:" "broadcast.incs NULL");
70	1	2	if ( __privtrans->bvalflag ) { /* ** do 'bad' Code ** */
75	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
76	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
79	0	0	{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
80	0	0	PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan)) continue;,)
	0	0	PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan)) continue;,)
85	0	0	PDL_IF_BAD(if (N < 1) { {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (b_datap)[0+(__inc_b_n*(n))]=b_badval; }} /* Close n */ continue; },)
	0	0	PDL_IF_BAD(if (N < 1) { {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (b_datap)[0+(__inc_b_n*(n))]=b_badval; }} /* Close n */ continue; },)
88	0	0	{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
89	0	0	PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan)) { (b_datap)[0+(__inc_b_n*(n))]=b_badval; continue; },)
	0	0	PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,F,a_badval_isnan)) { (b_datap)[0+(__inc_b_n*(n))]=b_badval; continue; },)
91	0	0	(b_datap)[0+(__inc_b_n*(n))] = (sd>0)? (((a_datap)[0+(__inc_a_n*(n))] - m) / sd) : 0;
93	0	0	}PDL_BROADCASTLOOP_END_stddz_readdata
	0	0	}PDL_BROADCASTLOOP_END_stddz_readdata
96	0	1	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	1	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	0	1	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	0	1	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	0	1	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	1	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	0	1	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	0	1	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
97	0	1	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	1	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	1	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	1	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	1	PDL_BROADCASTLOOP_START_stddz_readdata {
	1	1	PDL_BROADCASTLOOP_START_stddz_readdata {
	1	1	PDL_BROADCASTLOOP_START_stddz_readdata {
100	6	1	{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
101	0	6	PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan)) continue;,)
	1	5	PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan)) continue;,)
106	0	1	PDL_IF_BAD(if (N < 1) { {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (b_datap)[0+(__inc_b_n*(n))]=b_badval; }} /* Close n */ continue; },)
	0	0	PDL_IF_BAD(if (N < 1) { {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) { (b_datap)[0+(__inc_b_n*(n))]=b_badval; }} /* Close n */ continue; },)
109	6	1	{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
110	0	6	PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan)) { (b_datap)[0+(__inc_b_n*(n))]=b_badval; continue; },)
	1	5	PDL_IF_BAD(if (PDL_ISBAD2((a_datap)[0+(__inc_a_n*(n))],a_badval,D,a_badval_isnan)) { (b_datap)[0+(__inc_b_n*(n))]=b_badval; continue; },)
112	5	0	(b_datap)[0+(__inc_b_n*(n))] = (sd>0)? (((a_datap)[0+(__inc_a_n*(n))] - m) / sd) : 0;
114	0	1	}PDL_BROADCASTLOOP_END_stddz_readdata
	0	1	}PDL_BROADCASTLOOP_END_stddz_readdata
124	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
	0	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Float,F)
125	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	0	PDL_BROADCASTLOOP_START_stddz_readdata {
128	0	0	{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
137	0	0	{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
140	0	0	(b_datap)[0+(__inc_b_n*(n))] = (sd>0)? (((a_datap)[0+(__inc_a_n*(n))] - m) / sd) : 0;
142	0	0	}PDL_BROADCASTLOOP_END_stddz_readdata
	0	0	}PDL_BROADCASTLOOP_END_stddz_readdata
145	0	2	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	2	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	0	2	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	0	2	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	0	2	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	2	0	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	0	2	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
	0	2	PDL_DECLARE_PARAMS_stddz_1(PDL_Double,D)
146	0	2	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	2	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	2	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	2	PDL_BROADCASTLOOP_START_stddz_readdata {
	0	2	PDL_BROADCASTLOOP_START_stddz_readdata {
	3	2	PDL_BROADCASTLOOP_START_stddz_readdata {
	2	2	PDL_BROADCASTLOOP_START_stddz_readdata {
149	11	3	{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
158	11	3	{/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {
161	5	6	(b_datap)[0+(__inc_b_n*(n))] = (sd>0)? (((a_datap)[0+(__inc_a_n*(n))] - m) / sd) : 0;
163	0	2	}PDL_BROADCASTLOOP_END_stddz_readdata
	0	2	}PDL_BROADCASTLOOP_END_stddz_readdata
197	0	3	if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0};
199	0	3	if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans");
202	0	3	PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans));
203	0	3	PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans));