| line |
true |
false |
branch |
|
40
|
0 |
5 |
if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in tricpy:" "broadcast.incs NULL"); |
|
79
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_SByte,A) |
|
81
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
82
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
84
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
89
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Byte,B) |
|
91
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
92
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
94
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
99
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Short,S) |
|
101
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
102
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
104
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
109
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Ushort,U) |
|
111
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
112
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
114
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
119
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Long,L) |
|
121
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
122
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
124
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
129
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULong,K) |
|
131
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
132
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
134
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
139
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Indx,N) |
|
141
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
142
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
144
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
149
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_ULongLong,P) |
|
151
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
152
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
154
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
159
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LongLong,Q) |
|
161
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
162
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
164
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
169
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Float,F) |
|
171
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
172
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
174
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
179
|
0 |
5 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Double,D) |
|
|
5 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Double,D) |
|
|
0 |
5 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Double,D) |
|
|
0 |
5 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Double,D) |
|
|
5 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Double,D) |
|
|
0 |
5 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_Double,D) |
|
181
|
2 |
3 |
if (__params->uplo) { /* lower */ |
|
182
|
0 |
2 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
12 |
6 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
6 |
2 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
2 |
2 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
2 |
2 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
184
|
0 |
3 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
3 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
3 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
3 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
3 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
18 |
9 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
9 |
3 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
3 |
3 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
3 |
3 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
3 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
3 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
189
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_LDouble,E) |
|
191
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
192
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
194
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
199
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CFloat,G) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CFloat,G) |
|
201
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
202
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
204
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
209
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CDouble,C) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CDouble,C) |
|
211
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
212
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
214
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
219
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CLDouble,H) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_tricpy_1(PDL_CLDouble,H) |
|
221
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
222
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=:n+1 */ PDL_EXPAND2(register PDL_Indx m=0, __m_stop=PDLMIN(n+1, (__m_size))); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
224
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_tricpy_readdata {/* Open n */ PDL_EXPAND2(register PDL_Indx n=0, __n_stop=(__n_size)); for(; n<__n_stop; n+=1) {{/* Open m=n */ PDL_EXPAND2(register PDL_Indx m=PDLMAX((n),0), __m_stop=(__m_size)); for(; m<__m_stop; m+=1) { (C_datap)[0+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */ PDL_BROADCASTLOOP_END_tricpy_readdata |
|
259
|
0 |
5 |
if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0}; |
|
261
|
0 |
5 |
if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans"); |
|
265
|
0 |
5 |
PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans)); |
|
267
|
0 |
5 |
PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans)); |