/dports/math/symmetrica/symmetrica-e29c85915f368d6fb2f89d703b6695ff29ab9eae/src/ |
H A D | ma.c | 24 for (i=0L;i<S_M_HI(b);i++) 559 if (S_M_HI(a) != S_M_HI(b)) return FALSE; 1101 if ( S_M_HI(b) > S_M_HI(a) ) return -1; 1134 if ( S_M_HI(b) > S_M_HI(a) ) return -1; 1167 if ( S_M_HI(b) > S_M_HI(a) ) return(-1L); /* AK 170790 */ 1186 (S_M_HI(a) == S_M_HI(b))&& 1202 (S_M_HI(a) < S_M_HI(b)) && 1278 if (S_M_HI(a) >=S_M_HI(b)) 1290 (i<S_M_HI(a))&&(i<S_M_HI(b))&& 1800 bl = S_M_HI(b); [all …]
|
H A D | mod_dg_sbd.c | 40 for (i=0;i<S_M_HI(b);i++) 83 m_il_v(S_M_HI(e),v); 88 if (S_M_HI(e) < 2) 98 for (i=k;i<S_M_HI(e);i++) 124 for (i=k;i<S_M_HI(e);i++) 207 if (S_M_HI(e) == 0) { 217 m_il_v(S_M_HI(e),d); 254 for (i=0;i<S_M_HI(e);i++) 623 ss = S_M_HI(e); 626 m_ilih_nm(S_M_HI(e),S_M_HI(c),f); [all …]
|
H A D | gra.c | 438 SYMCHECK(S_M_HI(a) != S_M_LI(a),"add_adjacency_matrix(1):not quadratic"); 439 SYMCHECK(S_M_HI(b) != S_M_LI(b),"add_adjacency_matrix(1):not quadratic"); 441 m_ilih_nm(S_M_HI(a)+S_M_HI(b),S_M_HI(a)+S_M_HI(b),c); 442 for (i=0;i<S_M_HI(a);i++) 445 for (i=0;i<S_M_HI(b);i++) 447 if (i!=j) M_I_I(S_M_IJI(a,i,j),S_M_IJ(c,S_M_HI(a)+i,S_M_LI(a)+j)); 464 for (i=0;i<S_M_HI(a);i++) 487 for (i=0;i<S_M_HI(a);i++)
|
H A D | galois.c | 190 if (p1i >= S_M_HI(mgg_mt)) error("mult_galois_galois:I1"); in mult_galois_galois() 191 if (p2i >= S_M_HI(mgg_mt)) error("mult_galois_galois:I2"); in mult_galois_galois() 446 erg += eins_gr_given_c_d(c,d,S_M_IJ(mat,S_M_HI(mat)-1,S_M_LI(mat)-1)); 447 for (j=0;j<S_M_HI(mat)-1;j++) 450 erg += null_gr_given_c_d(c,d,S_M_IJ(mat,S_M_HI(mat)-1,j)); 476 for (ii=0;ii<S_M_HI(z);ii++) 477 for (jj=0;jj<S_M_HI(z);jj++) 480 for (jj=0;jj<S_M_HI(z);jj++) 525 for (i=0;i<S_M_HI(mat);i++)
|
H A D | ta.c | 339 for (i=0L;i<S_M_HI(mat);i++) 347 erg += m_il_integervector(S_M_HI(mat),b); 348 for (i=0L;i<S_M_HI(mat); i++) 387 for (i=S_M_HI(mat)-1L; i>=0L; i--) 527 erg += m_ilih_m(S_M_LI(a)+1,S_M_HI(a)+1,b); 529 for (i=0L;i<S_M_HI(a);i++) 1110 for (i=0L;i<S_M_HI(self);i++) 1827 for(i=0,l=0;i<S_M_HI(matrix);i++) 2257 if (si == S_M_HI(self)) inc(self); 2329 if (si == S_M_HI(self)) inc(self); [all …]
|
H A D | sc.c | 530 S_M_IJ(res,S_M_HI(res)-1L,j),NULL); 1637 for (i=(INT)0; i<S_M_HI(res); i++) 1638 for (j=(INT)0; j<S_M_HI(res); j++) 1640 for (k=(INT)0; k<S_M_HI(res); k++) 1744 for ( i=(INT)0;i<S_M_HI(res);i++) 1745 for ( j=(INT)0;j<S_M_HI(res);j++) 1789 for ( i=(INT)0;i<S_M_HI(res);i++) 1790 for ( j=(INT)0;j<S_M_HI(res);j++) 1793 for ( i=(INT)0;i<S_M_HI(res);i++) 1794 for ( j=(INT)0;j<S_M_HI(res);j++) [all …]
|
H A D | tsh.c | 173 for (i=0;i<S_M_HI(m);i++) 185 for (i=0;i<S_M_HI(m);i++) 191 for (i=0;i<S_M_HI(m);i++) 320 for (i=0;i<S_M_HI(m);i++)
|
H A D | io.c | 1049 for(j=0L;j<S_M_HI(M);++j) 1056 if(j != S_M_HI(M)-1L) 1096 for(j=0L;j<S_M_HI(M);++j) 1103 if(j != S_M_HI(M)-1L) fprintf(texout,"\\\\\\hline\n"); 1133 for(k=0L;k<S_M_HI(s_po_s(z));++k)
|
H A D | perm.c | 207 for (i=S_M_HI(e)-1;i>=0 ; i--) 256 for (i=S_M_HI(b)-1; i>=0L; i--) 871 for (i=0L;i<S_M_HI(a);i++) 879 for (i=0L;i<S_M_HI(a);i++) 1007 for (i= 0L;i<S_M_HI(m); i++) 1051 for (i1=0L;i1<S_M_HI(m);i1++) 1172 for (i=0L;i<S_M_HI(g);i+=15L) 1207 for (i=0L;i<S_M_HI(a);i++) 1287 for (i=0L;i<S_M_HI(a);i++) 2893 for (i=0;i<S_M_HI(a);i++) [all …]
|
H A D | poly.c | 1617 h = (S_M_HI(as) > S_M_HI(bs) ? S_M_HI(as) : S_M_HI(bs)); 1623 ( i<S_M_HI(as) ) && 1624 ( i<S_M_HI(bs) ) && 1631 ( i>=S_M_HI(as) ) && 1637 ( i>=S_M_HI(bs) ) && 1643 ( i<S_M_HI(as) ) && 1649 ( i<S_M_HI(bs) ) && 2026 for (i=(INT)0;i<S_M_HI(z);i++)
|
H A D | sab.c | 330 for(i=0L;i<S_M_HI(V);++i) 360 m_i_i(S_M_HI(a),n); 1920 for(i=0;i<S_M_HI(c);i++) 1941 for(i=0;i<S_M_HI(c);i++) 2167 m_i_i(S_M_HI(A),n); 2307 for(k=0L;k<S_M_HI(B);++k) 2309 for(l=0L;l<S_M_HI(B);++l) 2539 f_D = S_M_HI(B); 2772 for(k=0L;k<S_M_HI(S_PO_S(z));++k)
|
H A D | zo.c | 518 m_ilih_nm(S_M_LI(b),S_M_HI(a),c); 520 for (i=0L;i<S_M_HI(a);i++) /* ueber zeilen der linken Matrix */
|
H A D | bar.c | 388 for (i=0L;i<S_M_HI(a);i++) 438 m_il_p(S_M_HI(a),b); 440 for (i=0L;i<S_M_HI(a);i++)
|
H A D | nc.c | 559 for (i=0;i<S_M_HI(b);i++) 1989 for (i=1;i<S_M_HI(m);i++) eins(S_PO_K(p),S_M_IJ(m,i,i-1)); 2039 for (j=0;j<S_M_HI(m);j++) eins_ff_given_q(q,S_M_IJ(m,j,j)); 2040 for (j=1;j<S_M_HI(m);j++) eins_ff_given_q(q,S_M_IJ(m,j,j-1)); 2120 for (i=0;i<S_M_HI(f);i++)
|
H A D | na.c | 79 if (S_M_LI(a) != S_M_HI(b)) 87 COPY_INTEGER(S_M_H(a),height); ha=S_M_HI(a);
|
H A D | sr.c | 1957 for (i=0;i<S_M_HI(c);i++) 1976 for (i=0;i<S_M_HI(c);i++) 4106 for (i=0;i<S_M_HI(c);i++) 4124 for (i=0;i<S_M_HI(c);i++) 5119 for (i=0;i<S_M_HI(b);i++) 5150 for (i=0;i<S_M_HI(b);i++) 5171 for (i=0;i<S_M_HI(b);i++) 5182 for (i=0;i<S_M_HI(b);i++) 5195 for (i=0;i<S_M_HI(b);i++)
|
H A D | ko.c | 955 for (i=0;i<S_M_HI(c); i++) 956 for (j=0;j<S_M_HI(c); j++)
|
H A D | mo.c | 2145 bz = (TL_BYTE *) TL_calloc(S_M_HI(m) * S_M_LI(m), sizeof(TL_BYTE)); 2147 for (i=0,z=bz;i<S_M_HI(m);i++) 2150 i= k_dimmod(bz,S_M_HI(m),S_I_I(p)); 3743 row=S_M_HI(dcm);
|
H A D | boe.c | 98 for (i=0L;i<S_M_HI(c);i++) 102 for (j=0L;j<S_M_HI(c);j++)
|
H A D | macro.h | 239 #define S_M_HI(a) ((((((a)->ob_self).ob_matrix)->m_height)->ob_self).ob_INT) macro 380 #define S_T_HI(a) S_M_HI(S_T_S(a)) 978 INT I=S_M_HI(a)*S_M_LI(a)-1;\
|
H A D | rest.c | 1150 if (S_M_HI(a)==S_M_LI(a)) { 1154 for (i=0;i<S_M_HI(b);i++) 2847 INT i = S_M_HI(b)*S_M_LI(b);
|
H A D | part.c | 1066 for (i=0;i<S_M_HI(m);i++) 4223 for (i=0;i<S_M_HI(c);i++)
|
H A D | bruch.c | 2362 m_ilih_m(S_M_LI(ma0),S_M_HI(ma0),ma);
|
H A D | vc.c | 1983 SYMCHECK(S_V_LI(a)!=S_M_HI(b),"mult_vector_matrix:length of vector != height of matrix");
|
H A D | hiccup.c | 3478 for (i=0;i<S_M_HI(mat);i++)
|