Sponsored links: Algebra eBooks
 

Related

abs-plot2d
plot2d(abs(x)/x,[x,-2.01,2],[y,-2,2]);

plot2d(abs(x)/x,[x,-2...

Calculate

abs-and-cos-do-if-load-makelist-max-min

load (newton1);

x_min : -10;

x_max : 10;

Calculate

abs-exp-plot2d
plot2d([abs(H2(f,48000))],[f,0,24000]);

H(z):=1-z^(-1);

H2(f,F0):=H(exp(%i*2*...

plot2d([abs(H2(f,4800...

Calculate

abs-define

define(h(x), abs(2*x^...

Calculate

abs-fpprintprec-load

load (fft) ;

fpprintprec : 4 ;

L : [1, 2, 3, 4, -1, ...

Calculate

abs-plot2d-sin
plot2d([f(x),P(x),Net],[x,0,6.28318530717959],[style,lines,lines,points],[legend,"f(x)","P(x)",""]);

f(x):=sin(5*x);

Net:[discrete,[[6.204...

P(x):=-0.063954890729...

Calculate

abs-display2d-factorsum-float-true

display2d:true;

serie(a,b):=a+b;

parallel(a,b):=1/(1/a...

Calculate

abs-solve

solve([(ya=ga-i*ba),(...

Calculate

abs-diff-log

f(x):=log(abs((x+1)/(...

diff(log((x+1)/(x+3))...

Calculate

abs

Run Example
(%i1)define(g(x), abs((4*x)/%e));
                                        - 1
(%o1)                       g(x) := 4 %e    abs(x)
(%i2) 
Run Example
Puiab:[Pk=abs(ak)^2-abs(bk)^2,Uk=(ak+bk)*sqrt(Z0k), Ik=(ak-bk)/sqrt(Z0k)];
                  2     2                                  ak - bk
(%o1)     [Pk = ak  - bk , Uk = (bk + ak) sqrt(Z0k), Ik = ---------]
                                                          sqrt(Z0k)
(%i2) abUI:[ak=(Uk+Z0k*Ik)/(2*sqrt(Z0k)),bk=(Uk-Z0k*Ik)/(2*sqrt(Z0k))];
                           Ik Z0k + Uk       Uk - Ik Z0k
(%o2)                [ak = -----------, bk = -----------]
                           2 sqrt(Z0k)       2 sqrt(Z0k)
(%i3) spoj:[U1=(a1+b1)*sqrt(Z01),  U2=(a2+b2)*sqrt(Z02),I1=(a1-b1)/sqrt(Z01),  I2=(a2-b2)/sqrt(Z02),U1=U2, I1+I2=0];
                                                                 a1 - b1
(%o3) [U1 = (b1 + a1) sqrt(Z01), U2 = (b2 + a2) sqrt(Z02), I1 = ---------, 
                                                                sqrt(Z01)
                                                a2 - b2
                                          I2 = ---------, U1 = U2, I2 + I1 = 0]
                                               sqrt(Z02)
(%i4) spoj1:[eliminate(spoj,  [U1, U2, I1, I2])];
(%o4) [[- (- b2 - a2) sqrt(Z02) - (b1 + a1) sqrt(Z01), 
                            b1 sqrt(Z02) - a1 sqrt(Z02) + (b2 - a2) sqrt(Z01)]]
(%i5) 
Run Example
H(a1,a2,b0,b1,b2,z):=(b0+b1*z^(-1)+b2*z^(-2))/(1+a1*z^(-1)+a2*z^(-2));
                                                   - 1       - 2
                                          b0 + b1 z    + b2 z
(%o1)         H(a1, a2, b0, b1, b2, z) := ----------------------
                                                  - 1       - 2
                                          1 + a1 z    + a2 z
(%i2) H1(f,F0):=H(-1.978882,0.979126,0.989502,-1.979004,0.989502,exp(%i*2*%pi*f/F0));
(%o2) H1(f, F0) := H(- 1.978882, 0.979126, 0.989502, - 1.979004, 0.989502, 
                                                                   %i 2 %pi f
                                                               exp(----------))
                                                                       F0
(%i3) plot2d([abs(H1(f,16000)),abs(H1(f,20000))],[f,0,500]);
plotplot2d([abs(H1(f,16000)),abs(H1(f,20000))],[f,0,500]);float(abs(H1(50,16000)));
(%o4)                          0.88245850910269
(%i5) float(abs(H1(50,20000)));
(%o5)                          0.74462866826056
(%i6) 

Related Help

Help for Abs