(%i81) |
t1:bfloat(1.66*10^(-3))$ w:314$ v:325*sin(-w*t)$ I:1$ b(n,t):=(100*sin(n*w*t)*(integrate(I*sin(n*w*t), t, -0.005-t1, -0.005+t1 )+integrate((-I)*sin(n*w*t), t, 0.005-t1, 0.005+t1))); float(b(n,t)); i:sum(b(n,t),n,1,13); wxplot2d([i], [t,-20*10^(-3),20*10^(-3)]); |