{VERSION 5 0 "APPLE_PPC_MAC" "5.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 
0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 
-1 43 "  maple solve of ODE for amplifying circuit" }}{PARA 0 "" 0 "" 
{TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "
" {TEXT -1 32 "clear workspace & load ODE stuff" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 8 "restart:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 14 "with(DEtools):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}
{PARA 0 "" 0 "" {TEXT -1 35 "define ODE (version without typos!)" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "b := (1/(r1*c1)) + (1/(r2*c2
));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "c := (1/(r1*c1)) * (1/(r2*c2
));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "h := (1/(ra*c1)) * (1/(rb*c2
));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "ode := diff(v(t),t,t) + b*di
ff(v(t),t)+ c*v(t) = h*sin(t);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "
" }}{PARA 0 "" 0 "" {TEXT -1 16 "solve without IV" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 27 "soln := dsolve([ode],v(t));" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 33 "extract s
olution into useful form" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "v(t) :=
 subs(soln,v(t));" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "
" 0 "" {TEXT -1 14 "calculate gain" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 
29 "g1 := coeff(v(t),'cos(t)',1);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 
29 "g2 := coeff(v(t),'sin(t)',1);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 
39 "sqrt(g1^2 + g2^2); gain := simplify(%);" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 0 "" }}}}{MARK "4 1 0" 34 }{VIEWOPTS 1 1 0 3 2 1804 1 
1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }