Changeset fa3c79 in git


Ignore:
Timestamp:
Oct 28, 2017, 12:54:15 PM (6 years ago)
Author:
Karim Abou Zeid <karim23697@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
31b08bdfb2b872de7d9d6ff2103b35e771edcd78
Parents:
0295e4d87eff012ab050926b956ceff356c50508
Message:
Remove debug logs in freegb.lib
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/LIB/freegb.lib

    r0295e4d rfa3c79  
    33553355 if (intvec(V[1..size(W)])-W == 0){R[1]=0;}
    33563356 for (i =2; i <=k; i++)
    3357  {// printf("dShiftDiv: for (i=%p, k=%p)", i, k);
    3358 r = 0; kill T; intvec T;
     3357 {r = 0; kill T; intvec T;
    33593358  for (j =1; j <= i; j++) {r = r + V[j];}
    33603359  //if (i==1) {T[1] = r-(i-1)*n;} else
     
    34783477"
    34793478{poly l,r,qt; int i;
    3480  printf("reduce p=%p, g=%p, s=%p", p,g,s);
    34813479 g = shiftPoly(g,s);
    34823480 list K = getlpCoeffs(lead(g),lead(p));
     
    34863484 {qt = qt + lpMult(lpMult(l,g[i]),r);
    34873485 }
    3488  poly reduced = leadcoef(qt)*p - leadcoef(p)*qt;
    3489  printf("reduced poly = %p", reduced);
    3490  return (reduced);
     3486 return((leadcoef(qt)*p - leadcoef(p)*qt));
    34913487}
    34923488
Note: See TracChangeset for help on using the changeset viewer.