### Related

? dpart;

Calculate

##### dpart-part

dpart (x+y/z^2, 1, 2,...

Calculate

? dpart;

Calculate

##### dpart-part

dpart (x+y/z^2, 1, 2,...

Calculate

### dpart

Run Example
```(%i1)dpart (x+y/z^2, 1, 2, 1);
y
(%o1)                              ---- + x
2
"""
"z"
"""
(%i2) ```
Run Example
```title(exp):=disp(dpart(exp));
(%o1)                   title(exp) := disp(dpart(exp))
(%i2)  title("3-Phases, Why ?");
"""""""""""""""""
"3-Phases, Why ?"
"""""""""""""""""

(%o2)                                done
(%i3) ua:sin(x);
(%o3)                               sin(x)
(%i4) ub:sin(x+(2/3)*%pi);
2 %pi
(%o4)                           sin(x + -----)
3
(%i5) uc:sin(x-(2/3)*%pi);
2 %pi
(%o5)                           sin(x - -----)
3
(%i6) (Ra: 2, Rb: 2, Rc: 2);
(%o6)                                  2
(%i7) (ia: ua/Ra, ib: ub/Rb, ic: uc/Rc);
2 %pi
sin(x - -----)
3
(%o7)                           --------------
2
(%i8) (pa: ua*ia, pb: ub*ib, pc: uc*ic, p3: pa+pb+pc);
2     2 %pi       2     2 %pi
sin (x + -----)   sin (x - -----)      2
3                 3      sin (x)
(%o8)             --------------- + --------------- + -------
2                 2             2
(%i9) /* [wxMaxima: input   end */plot2d([ua,ub,uc,ua-ub,ua-uc,ub-uc], [x,0,4*%pi], [y,-3,3]);
(%o9)
(%i10) ```
Run Example
```title(exp):=disp(dpart(exp));
(%o1)                   title(exp) := disp(dpart(exp))
(%i2)  title("3-Phases, Why ?");
"""""""""""""""""
"3-Phases, Why ?"
"""""""""""""""""

(%o2)                                done
(%i3) ua:sin(x);
(%o3)                               sin(x)
(%i4) ub:sin(x+(2/3)*%pi);
2 %pi
(%o4)                           sin(x + -----)
3
(%i5) uc:sin(x-(2/3)*%pi);
2 %pi
(%o5)                           sin(x - -----)
3
(%i6) (Ra: 2, Rb: 2, Rc: 2);
(%o6)                                  2
(%i7) (ia: ua/Ra, ib: ub/Rb, ic: uc/Rc);
2 %pi
sin(x - -----)
3
(%o7)                           --------------
2
(%i8) (pa: ua*ia, pb: ub*ib, pc: uc*ic, p3: pa+pb+pc);
2     2 %pi       2     2 %pi
sin (x + -----)   sin (x - -----)      2
3                 3      sin (x)
(%o8)             --------------- + --------------- + -------
2                 2             2
(%i9) /* [wxMaxima: input   end   ] *//* [wxMaxima: input   start ] *//*plot 1 fase vermogen */title("Single phase: Voltage, Current & Power");
""""""""""""""""""""""""""""""""""""""""
"Single phase: Voltage, Current & Power"
""""""""""""""""""""""""""""""""""""""""

(%o9)                                done
(%i10) plot2d([ua,ia,pa],[x,0,4*%pi] ,[legend,"ua","ia","pa"] );
plot/* [wxMaxima: input   end   ] */plot2d([ua,ia,pa],[x,0,4*%pi] ,[legend,"ua","ia","pa"] );
(%o11)
(%i12) ```

Help for Dpart