Sponsored links: Algebra eBooks
 

Related

dontfactor-expandwrt-ratsimp

im:(1/2)*((z+1)/(z-1));

fm:(1/2)*((z+1)/(z-1));

pid:p+i*ts*im+d*(n/(1...

Calculate

dontfactor-expandwrt-ratsimp

im:(1/2)*((z+1)/(z-1));

fm:(1/2)*((z+1)/(z-1));

pid:p+i*ts*im+d*(n/(1...

Calculate

dontfactor-expand-solve

eq1:V = F * ((C*(1 - ...

res:solve(eq1, Y);

dontfactor:[H, V, M, ...

Calculate

dontfactor-expandwrt-ratsimp

im:(1/2)*((z+1)/(z-1));

fm:(1/2)*((z+1)/(z-1));

pid:p+i*ts*im+d*(n/(1...

Calculate

dontfactor-expand-solve

eq1:V = F * ((C*(1 - ...

res:solve(eq1, Y);

dontfactor:[H, V, M, ...

Calculate

dontfactor-expand-solve

eq1:V = F * ((C*(1 - ...

res:solve(eq1, Y);

dontfactor:[H, V, M, ...

Calculate

dontfactor-ratsimp

im:(1/2)*((z+1)/(z-1));

fm:(1/2)*((z+1)/(z-1));

pid:p+i*ts*im+d*(n/(1...

Calculate

dontfactor

? dontfactor;

Calculate

dontfactor-solve

eq1:V = F * ((C*(1 - ...

res:solve(eq1, Y);

dontfactor:[H, V, M, ...

Calculate

dontfactor-ratsimp

im:(1/2)*((z+1)/(z-1));

fm:(1/2)*((z+1)/(z-1));

pid:p+i*ts*im+d*(n/(1...

Calculate

dontfactor

Run Example
(%i1)M:matrix([m*s^2+2*k,-k,0],[-k,m*s^2+2*k,-k],[0,-k,m*s^2+2*k]);
                    [    2                               ]
                    [ m s  + 2 k     - k          0      ]
                    [                                    ]
(%o1)               [                2                   ]
                    [    - k      m s  + 2 k     - k     ]
                    [                                    ]
                    [                            2       ]
                    [     0          - k      m s  + 2 k ]
(%i2) dM:determinant(M);
                  2             2       2    2     2     2
(%o2)         (m s  + 2 k) ((m s  + 2 k)  - k ) - k  (m s  + 2 k)
(%i3) fdM:dM=0.;
                2             2       2    2     2     2
(%o3)       (m s  + 2 k) ((m s  + 2 k)  - k ) - k  (m s  + 2 k) = 0
(%i4) solve(fdM,s^2);
                                2  4      2
                         2     m  s  + 2 k    2     2 k
(%o4)                  [s  = - ------------, s  = - ---]
                                  4 k m              m
(%i5) f:s^2+(m^2*s^4+2*k^2)/(4*k*m)=0.;
                              2  4      2
                             m  s  + 2 k     2
(%o5)                        ------------ + s  = 0
                                4 k m
(%i6) solve(f,s^2);
                                      2  4      2
                               2     m  s  + 2 k
(%o6)                        [s  = - ------------]
                                        4 k m
(%i7) factor(f),dontfactor:[m,k];
                           2  4          2      2
                          m  s  + 4 k m s  + 2 k
(%o7)                     ----------------------- = 0
                                   4 k m
(%i8) 
Run Example
im:(1/2)*((z+1)/(z-1));
                                     z + 1
(%o1)                              ---------
                                   2 (z - 1)
(%i2) fm:(1/2)*((z+1)/(z-1));
                                     z + 1
(%o2)                              ---------
                                   2 (z - 1)
(%i3) pid:p+i*ts*im+d*(n/(1+n*ts*fm))=u;
                          d n          i ts (z + 1)
(%o3)               ---------------- + ------------ + p = u
                    n ts (z + 1)        2 (z - 1)
                    ------------ + 1
                     2 (z - 1)
(%i4) dontfactor:[p, i, d, ts, n];
(%o4)                          [p, i, d, ts, n]
(%i5) ratsimp(pid);
              2                                    2
(%o5) ((i n ts  + (2 n p + 2 i) ts + 4 p + 4 d n) z
            2                          2
 + (2 i n ts  - 8 p - 8 d n) z + i n ts  + (- 2 n p - 2 i) ts + 4 p + 4 d n)
                2
/((2 n ts + 4) z  - 8 z - 2 n ts + 4) = u
(%i6) expandwrt(pid, 0);
                          d n          i ts (z + 1)
(%o6)               ---------------- + ------------ + p = u
                    n ts (z + 1)        2 (z - 1)
                    ------------ + 1
                     2 (z - 1)
(%i7) factor(pid);
             2  2             2           2        2          2           2
(%o7) (i n ts  z  + 2 n p ts z  + 2 i ts z  + 4 p z  + 4 d n z  + 2 i n ts  z
                           2
 - 8 p z - 8 d n z + i n ts  - 2 n p ts - 2 i ts + 4 p + 4 d n)
/(2 (z - 1) (n ts z + 2 z + n ts - 2)) = u
(%i8) 
Run Example
eq1:V = F * ((C*(1 - (1/(1 + Y))^(M*H)) / H*Y) + (1 / (1 + Y))^(M*H));
                                                    1
                                       C Y (1 - ----------)
                                                       H M
                              1                 (Y + 1)
(%o1)              V = F (---------- + --------------------)
                                 H M            H
                          (Y + 1)
(%i2) res:solve(eq1, Y);
                                          H M
                               H V (Y + 1)    - F H
(%o2)                     [Y = --------------------]
                                          H M
                               C F (Y + 1)    - C F
(%i3) dontfactor:[H, V, M, F, C];
(%o3)                           [H, V, M, F, C]
(%i4) factor(res);
                                           H M
                               H (V (Y + 1)    - F)
(%o4)                     [Y = --------------------]
                                           H M
                               C F ((Y + 1)    - 1)
(%i5) eq2:(Y+1)^n;
                                          n
(%o5)                              (Y + 1)
(%i6) expand(eq2);
                                          n
(%o6)                              (Y + 1)
(%i7) 

Related Help

Help for Dontfactor