Branch Coverage

lib/PDL/Ops-pp-assgn.c

Criterion	Covered	Total	%
branch	126	540	23.3

line	true	false	branch
55	0	5542	if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in assgn:" "broadcast.incs NULL");
89	14	5528	if ( __privtrans->bvalflag ) { /* ** do 'bad' Code ** */
94	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
111	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
128	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
145	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
162	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
179	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
196	0	8	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	8	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	0	8	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	0	8	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	8	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	8	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	0	8	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	0	8	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
213	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
230	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
247	0	1	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	1	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	0	1	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	0	1	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	0	1	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	1	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	0	1	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	0	1	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
264	0	5	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	5	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	0	5	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	0	5	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	3	2	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	5	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	0	5	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	0	5	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
281	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
298	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
315	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
332	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
356	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_SByte,A)
373	1	46	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	47	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	47	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	47	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	7	40	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	47	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	47	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
	0	47	PDL_DECLARE_PARAMS_assgn_1(PDL_Byte,B)
390	0	14	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	14	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	14	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	14	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	6	8	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	14	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	14	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
	0	14	PDL_DECLARE_PARAMS_assgn_1(PDL_Short,S)
407	2	5	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	7	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	7	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	7	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	3	4	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	7	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	7	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
	0	7	PDL_DECLARE_PARAMS_assgn_1(PDL_Ushort,U)
424	1	3900	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	3901	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	3901	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	3901	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	3888	13	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	3901	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	3901	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
	0	3901	PDL_DECLARE_PARAMS_assgn_1(PDL_Long,L)
441	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULong,K)
458	0	93	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	93	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	0	93	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	0	93	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	15	78	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	93	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	0	93	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
	0	93	PDL_DECLARE_PARAMS_assgn_1(PDL_Indx,N)
475	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_ULongLong,P)
492	0	2	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	2	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	2	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	2	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	2	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	2	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	2	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
	0	2	PDL_DECLARE_PARAMS_assgn_1(PDL_LongLong,Q)
509	6	29	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	35	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	0	35	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	0	35	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	4	31	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	35	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	0	35	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
	0	35	PDL_DECLARE_PARAMS_assgn_1(PDL_Float,F)
526	113	1242	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	1355	0	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	0	1355	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	0	1355	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	567	788	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	1332	23	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	0	1332	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
	6	1349	PDL_DECLARE_PARAMS_assgn_1(PDL_Double,D)
543	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_LDouble,E)
560	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CFloat,G)
577	1	73	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	74	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	74	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	74	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	74	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	74	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	3	71	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	74	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	74	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	74	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	74	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
	0	74	PDL_DECLARE_PARAMS_assgn_1(PDL_CDouble,C)
594	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
	0	0	PDL_DECLARE_PARAMS_assgn_1(PDL_CLDouble,H)
642	0	5542	if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0};
644	0	5542	if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans");
647	1	5541	PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans));
648	4	5537	PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans));