Sponsored links: Algebra eBooks
 

Related

define-sum

define(E(m),sum((m!/(...

E(1);

Calculate

define-plot2d
plot2d (r(x), [x, -5, 5], [y, -1000, 1000]);

define (n(x), x^3+3*x...

define (d(x), x^3+13);

define (r(x), n(x)/d(...

Calculate

define

define(g(x), x^2 + 4*...

Calculate

define-float-plot2d-realroots
plot2d([g(x),h(x)], [x,-5,0]);

define(g(x), x^2+4*x-3);

define(h(x),x^3+13);

r:realroots(g(x)=h(x));

Calculate

define-diff-find_root-float-log-sin

define(f(x), log(x^2+...

float(f(2));

define(fp(x),diff(f(x...

Calculate

define-float-pi-plot2d
plot2d(r(x), [x, -5, 5], [y, -1000, 1000]);

define(n(x), x^3 + 3*...

define(d(x), x^3 + 13);

define(r(x), n(x)/d(x));

Calculate

define

define (f(x), logx/lo...

Calculate

define-plot2d
plot2d(r(x),[x, -5,5], [y, -10,10]);

define(n(x), x^3 + 3*...

define(d(x), x^3 + 13);

define(r(x), n(x)/d(x));

Calculate

define-display2d-exp-false-integrate

display2d:false;

define(x(s),-sigma^2*...

define(y(s),-eta^2*rh...

Calculate

define-diff-expand-float-plot2d
plot2d( [f(x), z(x)], [x,1,4], [y,-1,0.5]);

define(f(x), (x^3+x-1...

define(fp(x), diff(f(...

a:1.5;

Calculate

define

Run Example
(%i1)kill(all);
(%o0)                                done
(%i1) Ik:16;
(%o1)                                 16
(%i2) U0:92;
(%o2)                                 92
(%i3) a:I/Ik=1-(U/U0)^2;
                                            2
                                 I         U
(%o3)                            -- = 1 - ----
                                 16       8464
(%i4) l:solve(a,U);
(%o4)            [U = - 23 sqrt(16 - I), U = 23 sqrt(16 - I)]
(%i5) m:solve(a,I);
                                       2
                                      U  - 8464
(%o5)                          [I = - ---------]
                                         529
(%i6) define(I(U),rhs(m[1]));
                                         2
                                        U  - 8464
(%o6)                         I(U) := - ---------
                                           529
(%i7) define(U(I),rhs(l[2]));
(%o7)                       U(I) := 23 sqrt(16 - I)
(%i8) P(I,U):=I*U;
(%o8)                           P(I, U) := I U
(%i9) plot2d(I(U),[U,0,92], [xlabel, "U[V]"], [ylabel, "I[A]"]);
plotplot2d(I(U),[U,0,92], [xlabel, "U[V]"], [ylabel, "I[A]"]);plot2d(U(I),[I,0,16], [ylabel, "U[V]"], [xlabel, "I[A]"]);
plotplot2d(U(I),[I,0,16], [ylabel, "U[V]"], [xlabel, "I[A]"]);plot2d([P(I(U),U)],[U,0,92], [xlabel, "U[V]"], [ylabel, "P[W]"]);
plotplot2d([P(I(U),U)],[U,0,92], [xlabel, "U[V]"], [ylabel, "P[W]"]);plot2d([P(I,U(I))],[I,0,16], [xlabel, "I[A]"], [ylabel, "P[W]"], [grid, 10, 10]);
plotplot2d([P(I,U(I))],[I,0,16], [xlabel, "I[A]"], [ylabel, "P[W]"], [grid, 10, 10]);define(Iabgeleitet(U),diff(P(I(U),U),U));
                                            2    2
                                         2 U    U  - 8464
(%o13)               Iabgeleitet(U) := - ---- - ---------
                                         529       529
(%i14) define(Uabgeleitet(I),diff(P(U(I),I),I));
                                                       23 I
(%o14)        Uabgeleitet(I) := 23 sqrt(16 - I) - --------------
                                                  2 sqrt(16 - I)
(%i15) Umax:solve(Iabgeleitet(U),U);
                                  92           92
(%o15)                   [U = - -------, U = -------]
                                sqrt(3)      sqrt(3)
(%i16) Imax:solve(Uabgeleitet(I),I);
                                        32
(%o16)                             [I = --]
                                        3
(%i17) P[max]=float(Imax[1]*Umax[2]);
(%o17)                 P    = (I U = 566.5730641647529)
                        max
(%i18) R[L]=float(Umax[2]/Imax[1]);
                               U
(%o18)                   R  = (- = 4.979646071760522)
                          L    I
(%i19) 
Run Example
define (p(x), 4*x^2 + 7*x -9);
                                       2
(%o1)                       p(x) := 4 x  + 7 x - 9
(%i2) 
Run Example
define(g(x), abs((4*x)/%e));
                                        - 1
(%o1)                       g(x) := 4 %e    abs(x)
(%i2) 

Related Help

Help for Define