### Related

##### ratcoef-sqrt

f(x):=x*(x-(33-sqrt(4...

f((33-sqrt(495+66*sqr...

ratcoef(x*(x-(33-sqrt...

Calculate

##### ratcoef-sqrt

ratcoef(x*(x-(33-sqrt...

Calculate

##### ratcoef-sqrt

ratcoef(x*(x-(33-sqrt...

Calculate

##### ratcoef

poly:(x-a)*(x-b)*(x-c...

ratcoef(poly,x);

Calculate

##### ratcoef-sqrt

ratcoef(x*(x-(33-sqrt...

Calculate

##### ratcoef

s: a*x + b*x*x + 5;

ratcoef (s, a + b);

Calculate

##### ratcoef

s: a*x + b*x*x + 5;

ratcoef (s, a + b);

Calculate

##### ratcoef-ratsimp

poly:(x-a)*(x-b)*(x-c...

ratsimp(poly);

ratcoef(poly,1);

Calculate

##### ratcoef

s: a*x*2 + b*x + 5;

ratcoef (s, a + b);

Calculate

##### ratcoef

eq1:((v-v0)/Ta*T) + v...

ratcoef(eq1,T);

Calculate

### ratcoef

Run Example
```(%i1)algebraic:true;
(%o1)                                true
(%i2) s:(1-z^-1)/(1+z^-1);
1
1 - -
z
(%o2)                                -----
1
- + 1
z
(%i3) numerator:expand((s^2+w1*w2)^2);
1                           4
(%o3) -------------------------- - -----------------------
4      3      2              3      2         1
z  + 4 z  + 6 z  + 4 z + 1   z  + 4 z  + 6 z + - + 4
z
6               2 w1 w2               4             4 w1 w2
+ --------------------- + ------------ - ------------------- - ---------
2         4   1         2                 6   4    1            1
z  + 4 z + - + -- + 6   z  + 2 z + 1   z + - + -- + -- + 4   z + - + 2
z    2                          z    2    3           z
z                               z    z
1              2 w1 w2       2   2
+ -------------------- + ---------- + w1  w2
4   6    4    1        2   1
- + -- + -- + -- + 1   - + -- + 1
z    2    3    4       z    2
z    z    z            z
(%i4) ratcoef(numerator,z,4);
(%o4)                                  0
(%i5) ratcoef(numerator,s,4);
2   2
(%o5)                        w1  w2  + 2 w1 w2 + 1
(%i6) ```
Run Example
```value(n,m):=block([x,s],x:prod((z^k-1)/(z-1),k,1,n)/n!,s:0,for i:0 thru m do s:s + ratcoef(x,z,i),2*s);
k
z  - 1
product(------, k, 1, n)
z - 1
(%o1) value(n, m) := block([x, s], x : ------------------------, s : 0,
n!
for i from 0 thru m do s : s + ratcoef(x, z, i), 2 s)
(%i2) value(5,5);
71
(%o2)                                 --
60
(%i3) ```
Run Example
```Z1: (Rs+Rb)+s*L;
(%o1)                            s L + Rs + Rb
(%i2) Z3: s*L + Rb;
(%o2)                              s L + Rb
(%i3) Y4: s*Co + 1/Ro;
1
(%o3)                              Co s + --
Ro
(%i4) Y2: s*C + 1/(Z3+1/Y4);
1
(%o4)                     -------------------- + s C
1
s L + --------- + Rb
1
Co s + --
Ro
(%i5) H: 1/(1+Z1*Y2) / (1+Z3*Y4);
1
(%o5) 1/(((Co s + --) (s L + Rb) + 1) ((s L + Rs + Rb)
Ro
1
(-------------------- + s C) + 1))
1
s L + --------- + Rb
1
Co s + --
Ro
(%i6) rat(factor(num(H)),s);
(%o6)/R/                               1
(%i7) factor(ratcoef(factor(denom(H)),s,3));
C L (L + Co Ro Rs + 2 Co Rb Ro)
(%o7)                   -------------------------------
Ro
(%i8) ```

Help for Ratcoef