-- -*- M2-comint -*- hash: 2339128210225844418

i1 : R = QQ[t]

o1 = R

o1 : PolynomialRing

i2 : f = 45 - 39*t - 34*t^2 + 38*t^3 - 11*t^4 + t^5

      5      4      3      2
o2 = t  - 11t  + 38t  - 34t  - 39t + 45

o2 : R

i3 : budanFourierBound(f)

o3 = 5

i4 : g = (t + 5)*(t + 3)*(t + 1)*(t - 1)^2*(t - 4)*(t - 6)

      7     6      5      4       3       2
o4 = t  - 3t  - 40t  + 86t  + 357t  - 443t  - 318t + 360

o4 : R

i5 : budanFourierBound(g,-6,infinity)

o5 = 7

i6 : budanFourierBound(g,-1,5)

o6 = 3

i7 : budanFourierBound(g,-infinity,0)

o7 = 3

i8 : budanFourierBound(g,3,infinity)

o8 = 2

i9 : budanFourierBound(g,-infinity,infinity)

o9 = 7

i10 : 
