{VERSION 2 3 "SUN SPARC SOLARIS" "2.3" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 }{CSTYLE "2D Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 } {PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 116 "7.5 p. 387 #7, 15, 25, \+ 37\n7.6 p. 399 #7, 11, 32\n7.7 p. 409 #5, 23\n7.8 p. 417 #4, 13, 29, 32\n7.9 p. 420 #21" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "sum(exp(-s*(k-1)*p),k=1..infinity);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "sum(x^n,n=0..infinity);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "exp(-s*p)*int(u*exp(-s*u),u=0..p);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 7 "7.5 #11" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "de:=\{diff(y(t),t,t)-y(t)=t-2, y(2)=3, D(y)(2)=0\};" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "with(inttrans):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "laplace(de,t,s);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "laplace(diff(y(t),t,t)-y(t)=t-2,t,s);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "dsolve(de,y(t),laplace);" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 7 "7.5 #15" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 70 "de:=\{diff(y(t),t,t)-3*diff(y(t),t)+2*y(t)=cos(t), \+ y(0)=0, D(y)(0)=-1\};" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 64 "eq tfm:=laplace(diff(y(t),t,t)-3*diff(y(t),t)+2*y(t)=cos(t),t,s);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "dsolve(de,y(t),laplace);" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "dsolve(de,y(t));" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "solve(eqtfm,laplace(y(t),t,s ));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "invlaplace(\",s,t); " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 101 "\n- 1/2* exp(t) - exp( t) *(-1) + 2/5* exp(2 *t) + exp(2* t) *(-1) + 1/10 *cos(t) - 3/10 *sin(t)\n;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 60 "plot(piecewi se(sin(t*Pi)>0,1,0),t=0..9,scaling=constrained);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "laplace(piecewise(sin(t*Pi)>0,1,0),t,s);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "convert(piecewise(sin(t*Pi)> 0,1,0),t,Heaviside);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "exp(-2*s)*i nt(sin(Pi*u)*exp(-s*u),u=0..1);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 " " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "exp(-2*s)*(Pi/(s^2+Pi^2 )*exp(-s)+Pi/(s^2+Pi^2))" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 7 "7.6 # 7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 78 "f7:=piecewise(t<1, 0, \+ t>1 and t<2, t, 1); plot(f7,t=0..3,scaling=constrained);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "with(inttrans):laplace(f7,t,s);" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "f7h:=convert(f7,Heaviside); " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "laplace(f7h,t,s);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "invlaplace(\",s,t);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "plot(\",t=0..3);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 8 "7.6 #11" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "invlaplace(exp(-2*s)/(s-1),s,t);" }}}{EXCHG {PARA 0 " > " 0 "" {MPLTEXT 1 0 15 "plot(\",t=0..4);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 8 "7.6 #32" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 87 "i32 :=\{diff(y(t),t,t)+y(t)=3*sin(2*t)-3*sin(2*t)*Heaviside(t-2*Pi), y(0)= 0, D(y)(0)=-2\};" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "dsolve( i32,y(t),laplace);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "plot( rhs(\"),t=0..25);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 7 "7.7 #5" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 74 "invlaplace(1/s,s,t); f5a:=t- >1; invlaplace(1/(s^2+1),s,t); f5b:=t->sin(t);" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 28 "int(f5a(u)*f5b(t-u),u=0..t);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "laplace(\",t,s);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "simplify(\");" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 8 "7.7 #23" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "i23:=\{di ff(y(t),t,t)+9*y(t)=g(t), y(0)=2, D(y)(0)=-3\};" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 25 "dsolve(i23,y(t),laplace);" }}}{EXCHG {PARA 0 " " 0 "" {TEXT -1 23 "Transfer function H(s):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "laplace(diff(y(t),t,t)+9*y(t)=g(t),t,s);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "subs(\{y(0)=0,D(y)(0)=0\},\" );" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "\"/laplace(y(t),t,s); " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "simplify(\");" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "1/lhs(\");" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 22 "Impluse response h(t):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "invlaplace(\",s,t);" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 68 "dsolve(\{diff(y(t),t,t)+9*y(t)=0, y(0)=0, D(y)(0)=1 \}, y(t), laplace);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 75 "dsol ve(\{diff(y(t),t,t)+9*y(t)=Dirac(t), y(0)=0, D(y)(0)=0\}, y(t), laplac e);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 7 "7.8 #4" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "int(exp(-2*t)*Dirac(t+1),t=-infinity..infin ity);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "int(F(t)*Dirac(t+1 ),t=-infinity..infinity);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "int(F(t)*Dirac(t-a),t=-infinity..infinity);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 8 "7.8 #13" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 76 "dsolve(\{diff(w(t),t,t)+w(t)=Dirac(t-Pi), w(0)=0, D(w)(0)=0\}, w(t ), laplace);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "plot(rhs(\" ),t=0..6*Pi);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 8 "7.8 #29" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 83 "dsolve(\{diff(x(t),t,t)+9*x( t)=-3*Dirac(t-Pi/3), x(0)=1, D(x)(0)=0\}, x(t), laplace);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "plot(-rhs(\"),t=0..4*Pi);" }}} {EXCHG {PARA 0 "" 0 "" {TEXT -1 8 "8.7 #32" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "invlaplace(1/(a*s^2+b*s+c),s,t);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "sols:=[solve(a*s^2+b*s+c=0,s)];" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 69 "assume(-4*c*a+b^2<0); assume (a real); assume(b real); assume(c real);" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 12 "Re(sols[1]);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 150 "7.9 #21 Derive the equations in class. Ckt is series 2 Ohms, \+ [parallel 1 Ohm, 0.1 H], 0.2 H, 6 V. Init currents all 0. Have three currents (but " }{XPPEDIT 18 0 "I1=I2+I3" "/%#I1G,&%#I2G\"\"\"%#I3GF& " }{TEXT -1 12 " of course)." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 109 "i21:=\{i1(t)=i2(t)+i3(t), diff(i3(t),t)/10=i2(t), 2*i1(t)+i2(t) +diff(i1(t),t)/5=6, i1(0)=0, i2(0)=0, i3(0)=0\};" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "dsolve(i21,[i2(t),i1(t),i3(t)],laplace);" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "plot(rhs(\"[1]),t=0..1);" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 144 "i21:=\{i1(t)=i2(t)+i3(t), \+ diff(i3(t),t)/10=100*Q(t), i2(t)=diff(Q(t),t), (100)*i1(t)+i2(t)+diff( i1(t),t)/5=6, i1(0)=0, i2(0)=0, i3(0)=0, Q(0)=0\};" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "dsolve(i21,\{i1(t),i2(t),i3(t),Q(t)\},lapla ce);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "plot(rhs(\"[4]),t=0 ..2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "76 0 0 " 0 }{VIEWOPTS 1 1 0 2 1 1805 }