### Related

kill(all);

reset();

/*datos*/r1:1;

Calculate

kill(all);

L:11.0;

D:0.08;

Calculate

##### kill

kill(all);

SIFV(K,t,r):=K*(1+r*t);

K:1000;

Calculate

##### kill-mod

kill(all);

v:[4,8,2,0,0,4,9,4,9,...

s1:3*(4+2+0+9+9+0);

Calculate

##### kill-make_random_state-set_random_state-true

kill(all);

s1:make_random_state ...

set_random_state (s1);

Calculate

##### kill-solve

/* [wxMaxima batch fi...

restart;

/* [wxMaxima: input ...

Calculate

##### kill-length-makelist-map-solve-sum

kill(all);

Punkt:[[3,0],[94,100]...

n:length(Punkt);

Calculate

##### kill

kill(all);

k:1*10^-3;

f(CA,n):=k*((CA)^n);

Calculate

kill(all);

D:0.15;

Hu:1.0;

Calculate

##### kill-plot2d-rhs-solve

kill(all);

g1: F_R1=F_N1*my;

g2: F_R2=F_N2*my;

Calculate

### kill

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(U(I),[I,0,16], [ylabel, "U[V]"], [xlabel, "I[A]"]);
plotplot2d([P(I(U),U)],[U,0,92], [xlabel, "U[V]"], [ylabel, "P[W]"]);
plotplot2d([P(I,U(I))],[I,0,16], [xlabel, "I[A]"], [ylabel, "P[W]"], [grid, 10, 10]);
plotdefine(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
```kill(all);
(%o0)                                done
(%i1) Flows: [-500, 200, 250, 300, 400];
(%o1)                     [- 500, 200, 250, 300, 400]
(%i2) NPV: sum(Flows[i]/((1+0.20)^(i-1)), i, 1, length(Flows));
(%o2)                          206.7901234567902
(%i3) ```
Run Example
```kill(eq1,eq1,eq3,eq4,x,y,z,t,lambda,mu,alpha,beta);
(%o1)                                done
(%i2) eq1:x+y+t=0;
(%o2)                            y + x + t = 0
(%i3)  eq2:x+2*y-z+t=0;
(%o3)                        - z + 2 y + x + t = 0
(%i4) eq3:x-y+z+t=0;
(%o4)                          z - y + x + t = 0
(%i5)  eq4:x+y+2*z-a*t=0;
(%o5)                        2 z + y + x - a t = 0
(%i6) linsolve([eq1,eq2,eq3,eq4],[a] );
(%o6)                                 []
(%i7) ```

Help for Kill