| line |
true |
false |
branch |
|
108
|
0 |
3 |
PDL_RETERROR(PDL_err, PDL->redodims_default(__privtrans)); |
|
121
|
0 |
3 |
if (!__privtrans->broadcast.incs) return PDL->make_error(PDL_EUSERERROR, "Error in Ctricpy:" "broadcast.incs NULL"); |
|
160
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_SByte,A) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_SByte,A) |
|
162
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
163
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
165
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
170
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Byte,B) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Byte,B) |
|
172
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
173
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
175
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
180
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Short,S) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Short,S) |
|
182
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
183
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
185
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
190
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Ushort,U) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Ushort,U) |
|
192
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
193
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
195
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
200
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Long,L) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Long,L) |
|
202
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
203
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
205
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
210
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULong,K) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULong,K) |
|
212
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
213
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
215
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
220
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Indx,N) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Indx,N) |
|
222
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
223
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
225
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
230
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULongLong,P) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_ULongLong,P) |
|
232
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
233
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
235
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
240
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LongLong,Q) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LongLong,Q) |
|
242
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
243
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
245
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
250
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Float,F) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Float,F) |
|
252
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
253
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
255
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
260
|
3 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Double,D) |
|
|
3 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Double,D) |
|
|
0 |
3 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Double,D) |
|
|
0 |
3 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Double,D) |
|
|
3 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Double,D) |
|
|
0 |
3 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_Double,D) |
|
262
|
1 |
2 |
if (__params->uplo) { /* lower */ |
|
263
|
0 |
1 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
12 |
6 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
6 |
3 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
3 |
1 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
1 |
1 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
1 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
265
|
0 |
2 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
24 |
12 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
12 |
6 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
6 |
2 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
2 |
2 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
2 |
2 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
2 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
270
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LDouble,E) |
|
|
0 |
0 |
PDL_DECLARE_PARAMS_Ctricpy_1(PDL_LDouble,E) |
|
272
|
0 |
0 |
if (__params->uplo) { /* lower */ |
|
273
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=:n+1 */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
275
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
|
0 |
0 |
PDL_BROADCASTLOOP_START_Ctricpy_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) {{/* Open c */ PDL_EXPAND2(register PDL_Indx c=0, __c_stop=(__c_size)); for(; c<__c_stop; c+=1) { (C_datap)[0+(__inc_C_c*(c))+(__inc_C_m*(m))+(__inc_C_n*(n))] = (A_datap)[0+(__inc_A_c*(c))+(__inc_A_m*(m))+(__inc_A_n*(n))]; }} /* Close n */}} /* Close m=n */}} /* Close c */ PDL_BROADCASTLOOP_END_Ctricpy_readdata |
|
310
|
0 |
3 |
if (!PDL) return (pdl_error){PDL_EFATAL, "PDL core struct is NULL, can't continue",0}; |
|
312
|
0 |
3 |
if (!__privtrans) return PDL->make_error_simple(PDL_EFATAL, "Couldn't create trans"); |
|
316
|
0 |
3 |
PDL_RETERROR(PDL_err, PDL->type_coerce(__privtrans)); |
|
318
|
0 |
3 |
PDL_RETERROR(PDL_err, PDL->make_trans_mutual(__privtrans)); |