{VERSION 4 0 "IBM INTEL NT" "4.0" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 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 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 1 0 0 0 0 1 0 1 0 2 2 0 1 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 83 " Maple can deal with simp le ideal diode models numerically. These are tested below" }}{PARA 0 " " 0 "" {TEXT -1 78 " on a 1/2 wave rectifier with 10 Ohm load and dri ving voltage 1.0*sin(10.0*t)" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 93 " Model 1: Ideal Diode: Zero volt drop in forw ard direction, 1.0e20 Ohm in reverse direction" }}{PARA 0 "" 0 "" {TEXT -1 45 " Vdiode=Heaviside(-i)*i*1.0e20" }}{PARA 0 "" 0 "" {TEXT -1 41 " Heaviside(s) is 1 for s>0" }} {PARA 0 "" 0 "" {TEXT -1 48 " 0 \+ for s<0" }}{PARA 0 "" 0 "" {TEXT -1 81 " Model 2: Ideal Diode: Exager ate Eber-Moler's Equation so gamma is very small. " }}{PARA 0 "" 0 " " {TEXT -1 45 " i=1.0e-9*(exp(1.0e6*Vdiode)-1)" }}{PARA 0 "" 0 "" {TEXT -1 52 " -> Vdiode=ln((i+1.0e-9)/1.0e-9)/1 .0e6;" }}{PARA 0 "" 0 "" {TEXT -1 52 " Model 3: Non ideal diode: (Eb er-Moler's Equation)" }}{PARA 0 "" 0 "" {TEXT -1 43 " i =1.0e-9*(exp(39*Vdiode)-1)" }}{PARA 0 "" 0 "" {TEXT -1 51 " \+ -> Vdiode=ln(i+1.0e-9)/1.0e-9)/39.;" }}{PARA 0 "" 0 "" {TEXT -1 87 " This is to first order how Spice Circuit Emulati on deals with diodes." }}{PARA 0 "" 0 "" {TEXT -1 10 " " }} {PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 31 " \+ Model 1: apply KVL around loop" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "eq1:=-sin(10.*t)+Heaviside(-i)*i*1.0e20+i*10;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$eq1G,(-%$sinG6#,$%\"tG$\"#5\"\"!!\"\"*($F,\"#> \"\"\"-%*HeavisideG6#,$%\"iGF.F2F7F2F2*&F,F2F7F2F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "i:=solve(eq1,i);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"iG-%'RootOfG6#,(*&-%*HeavisideG6#,$%#_ZG!\"\"\"\"\" F.F0\"6++++++++++\"-%$sinG6#,$%\"tG\"#5F/*&F7F0F.F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "plot(evalf(i),t=-1.0..1.0);" }} {PARA 13 "" 1 "" {GLPLOT2D 389 292 292 {PLOTDATA 2 "6%-%'CURVESG6$7_v7 $$!#5!\"\"$\"+46@Sa!#67$$!+9r]X**F)$\"+*yF^(\\F-7$$!+HU,\"*)*F)$\"+QH1kF)$!+8y(zA\"Fao7$$!+UrU`jF)$!+'y 3%=qF[o7$$!+.Q*pK'F)$!+S%[%zVF[o7$$!+l/c+jF)$!+e$Gut\"F[o7$$!+Er7uiF)$ \"+3t0e!*!#87$$!+(y$pZiF)$\"+^pS[NFen7$$!+7RJ$>'F)$\"+8k/v*)Fen7$$!+PS $*QhF)$\"+n^^P9F-7$$!+hTb%3'F)$\"+sdFt>F-7$$!+'Gu,.'F)$\"+#\\-K]#F-7$$ !+6WzvfF)$\"+Q'Gd-$F-7$$!+NXT@fF)$\"+-%4$RNF-7$$!+gY.neF)$\"+$REC/%F-7 $$!+$yaE\"eF)$\"+-AfLXF-7$$!+O\"for&F)$\"+RTNl`F-7$$!+)[j5i&F)$\"+7p\" z9'F-7$$!+SyEDbF)$\"+vX5uoF-7$$!+\">s%HaF)$\"+Y\"es`(F-7$$!+#)*G;K&F)$ \"+%fJ3?)F-7$$!+rdy8_F)$\"+*[?\"p()F-7$$!+hD%f5&F)$\"+F>_N#*F-7$$!+]$* 4)*\\F)$\"+[oh%f*F-7$$!+DL\")*)[F)$\"+ua,V)*F-7$$!++t_\"y%F)$\"+$)*3h( **F-7$$!+)G%QFZF)$\"+Dd())***F-7$$!+v7CtYF)$\"+k#QB***F-7$$!+j#)4>YF)$ \"+hd^c**F-7$$!+]_&\\c%F)$\"+-K^\"*)*F-7$$!+]zCcVF)$\"+uE\\s$*F-7$$!+] 1aZTF)$\"+qzpY%)F-7$$!+Rvx_SF)$\"+PSI-zF-7$$!+FW,eRF)$\"+A,+(G(F-7$$!+ ;8DjQF)$\"+jvI1mF-7$$!+/#)[oPF)$\"+BWLmeF-7$$!+_p97PF)$\"+-j)4S&F-7$$! +*p0el$F)$\"+d\")\\=\\F-7$$!+ZWY*f$F)$\"+#=,/U%F-7$$!+%>BJa$F)$\"+ngF3 RF-7$$!+T>y'[$F)$\"+\\![PQ$F-7$$!+*oS/V$F)$\"+E<[[GF-7$$!+O%*4uLF)$\"+ Xd+\"F-7$$\"+1$R [b\"F-$\"+-@e[:F-7$$\"+X]-1@F-$\"++8\\!4#F-7$$\"+$y5sl#F-$\"+t50EEF-7$ $\"+AlR3KF-$\"+sZj`JF-7$$\"+hAefPF-$\"+v*R;n$F-7$$\")!o2J%!\"*$\"+\\L \\yTF-7$$\"++cQq_F-$\"+o(f(H]F-7$$\"++K+IiF-$\"+vVuMeF-7$$\"++3i*=(F-$ \"+F+/'e'F-7$$\")%Q#\\\")Fdfl$\"+3OtwsF-7$$\"++**F-7$$\"+R.Sq9F)$ \"+Xbk\\**F-7$$\"+[#or\\\"F)$\"+tn!H(**F-7$$\"+ch$R_\"F)$\"+JE-*)**F-7 $$\"+lSq]:F)$\"+t:)z***F-7$$\"+#))RUg\"F)$\"+k\"3W***F-7$$\"*qvxl\"Fdf l$\"+&y'>i**F-7$$\"+:JFn=F)$\"+ztrj&*F-7$$\"*`qn2#Fdfl$\"+Ct-Z()F-7$$ \"+(G?\"y@F)$\"+t4y6#)F-7$$\"+X+ZzAF)$\"+SsD#f(F-7$$\"+-)>3Q#F)$\"++V \"[*oF-7$$\"*cp@[#Fdfl$\"+%)*4m7'F-7$$\"+!>,Zf#F)$\"+VgM+_F-7$$\"+?GB2 FF)$\"+twH3UF-7$$\"+N')\\jFF)$\"+#z(\\\"p$F-7$$\"+]Ww>GF)$\"+'H9I;$F-7 $$\"+l-.wGF)$\"+P)>Xi#F-7$$\"*3'HKHFdfl$\"+c(=x2#F-7$$\"+;M&G)HF)$\"+8 Ut!e\"F-7$$\"+_2TLIF)$\"+/,rz5F-7$$\"+)3oR3$F)$\"+izEfdFen7$$\"+Da_MJF )$\"+g(pr1(Fbt7$$\"+eZ;ZJF)$!+wb2sbF]dl7$$\"+#4/)fJF)$!+xJ/@=F[o7$$\"+ EMWsJF)$!+%)ye%3$F[o7$$\"+gF3&=$F)$!+D)RwM%F[o7$$\"+G9O5KF)$!+K%e9(oF[ o7$$\"+(4ScB$F)$!+Lk)3R*F[o7$$\"+Lu>'G$F)$!+`M,T9Fao7$$\"*xanL$Fdfl$!+ jdDR>Fao7$$\"+gxn_NF)$!+oE/'*RFao7$$\"*v+'oPFdfl$!+VeCneFao7$$\"*S<*fT Fdfl$!+g0I7&)Fao7$$\"*&)Hxe%Fdfl$!+u5SA**Fao7$$\"*.o-*\\Fdfl$!+HTR;'*F ao7$$\"*TO5T&Fdfl$!+s$Grl(Fao7$$\"*U9C#eFdfl$!+/tQYWFao7$$\"+Sz$\\I'F)$\"+R'*3v@Fen7$$ \"+ynycjF)$\"+zO]`tFen7$$\"+Pcj3kF)$\"+p`@^7F-7$$\"+&\\%[gkF)$\"+nurj< F-7$$\"+aLL7lF)$\"+F#z9F#F-7$$\"+8A=klF)$\"+Gf8tFF-7$$\"+r5.;mF)$\"+d# RtE$F-7$$\"*$*zym'Fdfl$\"+h4w_PF-7$$\"+De#Rx'F)$\"+B9z7ZF-7$$\"+?<(*zo F)$\"+WF()>cF-7$$\"+:w,')pF)$\"+*o8QY'F-7$$\"*^j?4(Fdfl$\"+9C8NsF-7$$ \"+!HJs>(F)$\"+cZ!)>zF-7$$\"+q!*R-tF)$\"+)oip^)F-7$$\"+]oc2uF)$\"+tv+? !*F-7$$\"*jMF^(Fdfl$\"+H2QB%*F-7$$\"+(*GP4wF)$\"+S:K-(*F-7$$\"+l6,1xF) $\"+2Ls!*)*F-7$$\"+)HIVv(F)$\"+J\"*Q]**F-7$$\"+K%\\E!yF)$\"+=z#o)**F-7 $$\"+m&o4&yF)$\"+2Y&*****F-7$$\"*q(G**yFdfl$\"+d&Q(*)**F-7$$\"+?W!37)F )$\"+L\\8Y'*F-7$$\"*9@BM)Fdfl$\"+L68J))F-7$$\"+QZQT%)F)$\"+to#QK)F-7$$ \"+N$[/a)F)$\"+BF!\\t(F-7$$\"+L>^R')F)$\"+5M8qqF-7$$\"*`v&Q()Fdfl$\"+# RPgL'F-7$$\"+()z>W))F)$\"+5(*3&[&F-7$$\"+X/#)\\*)F)$\"+em+tXF-7$$\"+t; j-!*F)$\"+SE>(4%F-7$$\"+-HWb!*F)$\"+#4a*4OF-7$$\"+JTD3\"*F)$\"+G'\\E6$ F-7$$\"*Ol5;*Fdfl$\"+@fm1EF-7$$\"+XCh6#*F)$\"+D#[b6#F-7$$\"+I&f@E*F)$ \"+Qk->;F-7$$\"+:mq7$*F)$\"+1*o$=6F-7$$\"++PDj$*F)$\"+:aa[hFen7$$\"+&y +QT*F)$\"+Kbp(4\"Fen7$$\"+qyMk%*F)$!+w$ef&RF[o7$$\"+b\\*[^*F)$!+Jp]*** )F[o7$$\"*/Uac*Fdfl$!+dm+-9Fao7$$\"+?5s#y*F)$!+^S[.NFao7$$\"#5F*$!+46@ SaFao-%'COLOURG6&%$RGBGFdcn$\"\"!F]dnF\\dn-%+AXESLABELSG6$Q\"t6\"Q!6\" -%%VIEWG6$;F(Fdcn%(DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 30 "Model 2: Apply KVL around loop" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "eqn2:=-sin(10.*t)+ln((i2+1.0e-9)/1.0e-9)/1.0e6+10*i2; " }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%%eqn2G,(-%$sinG6#,$%\"tG$\"#5\" \"!!\"\"*&$\"+++++5!#:\"\"\"-%#lnG6#,&%#i2G$F1F-$F1!\"*F3F3F3*&F,F3F8F 3F3" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "i2:=solve(eqn2,i2); " }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%#i2G,&-%)LambertWG6#,$-%$expG6#, &$\"+++++5!#6\"\"\"*&$\"(+++\"\"\"!F1-%$sinG6#,$%\"tG$\"#5F5F1F1F.$F/! #;$F/!#=!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "plot(i2,t= -1.0..1.0);" }}{PARA 13 "" 1 "" {GLPLOT2D 389 292 292 {PLOTDATA 2 "6%- %'CURVESG6$7_v7$$!#5!\"\"$\"+!*H.Sa!#67$$!+9r]X**F)$\"+k0&\\(\\F-7$$!+ HU,\"*)*F)$\"+1%)4&\\%F-7$$!+V8_O)*F)$\"+(3,>+%F-7$$!+e%G?y*F)$\"+TG#o \\$F-7$$!+tb`F(*F)$\"+oJO\")HF-7$$!+(oUIn*F)$\"+AC0dCF-7$$!+-)\\&='*F) $\"+NtWD>F-7$$!+QH1kF)Fin7$$!+UrU`jF)Fin7$$!+.Q*pK'F)Fin7$$!+l/c+jF)Fin7$$!+ Er7uiF)$\"+UAMW!*!#87$$!+(y$pZiF)$\"+$z)*oa$Fen7$$!+7RJ$>'F)$\"+NaWt*) Fen7$$!+PS$*QhF)$\"+e.NP9F-7$$!+hTb%3'F)$\"+&z2J(>F-7$$!+'Gu,.'F)$\"+O @..DF-7$$!+6WzvfF)$\"+'Qcb-$F-7$$!+NXT@fF)$\"+#eN\"RNF-7$$!+gY.neF)$\" +W7DUSF-7$$!+$yaE\"eF)$\"+1fTLXF-7$$!+O\"for&F)$\"+fhs%HaF)$\"+nn2PvF-7$$!+#)*G ;K&F)$\"+r$\\1?)F-7$$!+rdy8_F)$\"+'fP*o()F-7$$!+hD%f5&F)$\"+;&Q`B*F-7$ $!+]$*4)*\\F)$\"+bIV%f*F-7$$!+DL\")*)[F)$\"+E9$G%)*F-7$$!++t_\"y%F)$\" ++[#f(**F-7$$!+)G%QFZF)$\"+?:p)***F-7$$!+v7CtYF)$\"+lS:#***F-7$$!+j#)4 >YF)$\"+)fJj&**F-7$$!+]_&\\c%F)$\"+/\"H8*)*F-7$$!+]zCcVF)$\"+:\"4BP*F- 7$$!+]1aZTF)$\"+_a^Y%)F-7$$!+Rvx_SF)$\"+&=A@!zF-7$$!+FW,eRF)$\"+!3>oG( F-7$$!+;8DjQF)$\"+-v71mF-7$$!+/#)[oPF)$\"+]b:meF-7$$!+_p97PF)$\"+c#33S &F-7$$!+*p0el$F)$\"+Y5K=\\F-7$$!+ZWY*f$F)$\"+R^A?WF-7$$!+%>BJa$F)$\"+c 753RF-7$$!+T>y'[$F)$\"+zYd$Q$F-7$$!+*oS/V$F)$\"+y+J[GF-7$$!+O%*4uLF)$ \"+=i+/BF-7$$!+$=exJ$F)$\"+x1R_**F-7$$\"+R.Sq9F)$\"+*Qh%\\**F-7$$\"+[#or\\\"F)$\"+%f AF(**F-7$$\"+ch$R_\"F)$\"+N%Q)))**F-7$$\"+lSq]:F)$\"+otz(***F-7$$\"+#) )RUg\"F)$\"+jRA%***F-7$$\"*qvxl\"Fjbl$\"+;E,i**F-7$$\"+:JFn=F)$\"+=O`j &*F-7$$\"*`qn2#Fjbl$\"+cW%ou)F-7$$\"+(G?\"y@F)$\"+P()f6#)F-7$$\"+X+ZzA F)$\"+)yv?f(F-7$$\"+-)>3Q#F)$\"+7Qj%*oF-7$$\"*cp@[#Fjbl$\"+x1VEhF-7$$ \"+!>,Zf#F)$\"+v$o,?&F-7$$\"+?GB2FF)$\"+A@73UF-7$$\"+N')\\jFF)$\"+^NK \"p$F-7$$\"+]Ww>GF)$\"++;%G;$F-7$$\"+l-.wGF)$\"+3!\\Vi#F-7$$\"*3'HKHFj bl$\"+j-bx?F-7$$\"+;M&G)HF)$\"+a%o0e\"F-7$$\"+_2TLIF)$\"+e\"[&z5F-7$$ \"+)3oR3$F)$\"+d8rddFen7$$\"+Da_MJF)$\"+!G.P0(Far7$$\"+eZ;ZJF)Fin7$$\" +#4/)fJF)Fin7$$\"+EMWsJF)Fin7$$\"+gF3&=$F)Fin7$$\"+G9O5KF)Fin7$$\"+(4S cB$F)Fin7$$\"+Lu>'G$F)Fin7$$\"*xanL$FjblFin7$$\"+gxn_NF)Fin7$$\"*v+'oP FjblFin7$$\"*S<*fTFjblFin7$$\"*&)Hxe%FjblFin7$$\"*.o-*\\FjblFin7$$\"*T O5T&FjblFin7$$\"*U9C#eFjblFin7$$\"+S z$\\I'F)$\"+[/jt@Fen7$$\"+ynycjF)$\"+KE#>N(Fen7$$\"+Pcj3kF)$\"+[>0^7F- 7$$\"+&\\%[gkF)$\"+81bjcF-7$$\"+:w,')pF)$\"+YQjjkF-7$$\"*^j ?4(Fjbl$\"+W9&\\B(F-7$$\"+!HJs>(F)$\"+#)Gi>zF-7$$\"+q!*R-tF)$\"+(3!y;& )F-7$$\"+]oc2uF)$\"+)RC)>!*F-7$$\"*jMF^(Fjbl$\"+;r>B%*F-7$$\"+(*GP4wF) $\"+Ow8-(*F-7$$\"+l6,1xF)$\"+5#R0*)*F-7$$\"+)HIVv(F)$\"+u\\?]**F-7$$\" +K%\\E!yF)$\"+DPk')**F-7$$\"+m&o4&yF)$\"++/x****F-7$$\"*q(G**yFjbl$\"+ hVb*)**F-7$$\"+?W!37)F)$\"+(3^fk*F-7$$\"*9@BM)Fjbl$\"+p\"[4$))F-7$$\"+ QZQT%)F)$\"+,XkB$)F-7$$\"+N$[/a)F)$\"+&3@Zt(F-7$$\"+L>^R')F)$\"+rE&*pq F-7$$\"*`v&Q()Fjbl$\"+\\x&eL'F-7$$\"+()z>W))F)$\"+4:\"\\[&F-7$$\"+X/#) \\*)F)$\"+w-$Gd%F-7$$\"+t;j-!*F)$\"+ct,(4%F-7$$\"+-HWb!*F)$\"+v+y4OF-7 $$\"+JTD3\"*F)$\"+$4xC6$F-7$$\"*Ol5;*Fjbl$\"+g^\\1EF-7$$\"+XCh6#*F)$\" +_&z`6#F-7$$\"+I&f@E*F)$\"+S/')=;F-7$$\"+:mq7$*F)$\"+3m?=6F-7$$\"++PDj $*F)$\"+oA)p9'Fen7$$\"+&y+QT*F)$\"+'y/j4\"Fen7$$\"+qyMk%*F)Fin7$$\"+b \\*[^*F)Fin7$$\"*/Uac*FjblFin7$$\"+?5s#y*F)Fin7$$\"#5F*Fin-%'COLOURG6& %$RGBGF`]n$\"\"!Fg]nFf]n-%+AXESLABELSG6$Q\"t6\"Q!6\"-%%VIEWG6$;F(F`]n% (DEFAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Cu rve 1" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 56 " See what the differenc e between Model 1 and Model 2 is:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "plot(\{evalf(i)-i2\},t=-1.0..1.0);" }}{PARA 13 "" 1 " " {GLPLOT2D 389 292 292 {PLOTDATA 2 "6%-%'CURVESG6$7]t7$$!#5!\"\"$\"'> \"y\"!#67$$!+e%G?y*F)$\"'+P_X% *F)$\"(TWX\"F=7$$!+/&oOV*F)$\")gjp8!#87$$!+7]\"=U*F)$\"+++++5!#=7$$!+G !3\")R*F)FV7$$!+W5Su$*F)FV7$$!+3Jdz#*F)FV7$$!+r^u%=*F)FV7$$!+2tXr*)F)F V7$$!+U%p\"e()F)FV7$$!+#4m(G$)F)FV7$$!+@OS,zF)FV7$$!+/R=0vF)FV7$$!+P8# \\4(F)FV7$$!+qUx#)oF)FV7$$!+/siqmF)FV7$$!+]Q*[c'F)FV7$$!+'\\g\"fkF)FV7 $$!+>QH1kF)FV7$$!+UrU`jF)FV7$$!+.Q*pK'F)FV7$$!+l/c+jF)FV7$$!+&zVtG'F)F V7$$!+Er7uiF)$\")m]r8FR7$$!+d/\"4E'F)$\"(l:Y\"F=7$$!+(y$pZiF)$\"(e\"3: F=7$$!+PS$*QhF)$\"'4[;F-7$$!+'Gu,.'F)$\"'c.s%HaF)$\"'z8=F-7 $$!+rdy8_F)$\"'$*G=F-7$$!+]$*4)*\\F)$\"'$z$=F-7$$!++t_\"y%F)$\"'$=%=F- 7$$!+]_&\\c%F)$\"')4%=F-7$$!+]zCcVF)$\"'fN=F-7$$!+]1aZTF)$\"'=D=F-7$$! +FW,eRF)$\"'U5=F-7$$!+/#)[oPF)$\"'t)y\"F-7$$!+%>BJa$F)$\"'6[$F)$\"(V_b\"F=7$$!+*)GduJF)$\"(?3]\"F=7$$!+!ySE;$F)$\"((*eX\"F=7$$ !+t'32:$F)$\")S9s8FR7$$!+llxQJF)FV7$$!+eW%o7$F)FV7$$!+&f(QJIF)FV7$$!+L 2$f$HF)FV7$$!+%o_Qr#F)FV7$$!+PYx\"\\#F)FV7$$!+L7i)4#F)FV7$$!+P'psm\"F) FV7$$!+74_c7F)FV7$$!*3x%z#)F)FV7$$!*?PQM%F)FV7$$!+bvF@AF-FV7$$!(\"zr)* F)FV7$$\"+gC&y!RFR$\")9E(G\"FR7$$\"+#f\\(oh\"F-7$$\"+1$R[b\"F-$\"'`b;F-7$$\"+X]-1@F-$\"'a&o\"F-7$$\"+Al R3KF-$\"'mE)y\"F-7$$\") %Q#\\\")F`_l$\"'G5=F-7$$\"++l?A5F)$\"'?E=F-7$$\"*;*[H7F`_l$\"'7O=F-7$$ \"+ICjV9F)$\"'ET=F-7$$\"*qvxl\"F`_l$\"'pT=F-7$$\"+:JFn=F)$\"'hP=F-7$$ \"*`qn2#F`_l$\"'oG=F-7$$\"+X+ZzAF)$\"'_9=F-7$$\"*cp@[#F`_l$\"'2$z\"F-7 $$\"+?GB2FF)$\"'^b;F-7$$\"+?%*oeIF)$\"(EHf\"F=7$$\"+)3oR3$F)$\"(0mb \"F=7$$\"+cnC4JF)$\"(y))\\\"F=7$$\"+Da_MJF)$\")![mM\"FR7$$\"+eZ;ZJF)FV 7$$\"+#4/)fJF)FV7$$\"+EMWsJF)FV7$$\"+gF3&=$F)FV7$$\"+G9O5KF)FV7$$\"+(4 ScB$F)FV7$$\"+Lu>'G$F)FV7$$\"*xanL$F`_lFV7$$\"+gxn_NF)FV7$$\"*v+'oPF`_ lFV7$$\"*S<*fTF`_lFV7$$\"*&)Hxe%F`_lFV7$$\"*.o-*\\F`_lFV7$$\"*TO5T&F`_ lFV7$$\"*U9C#eF`_lFV7$$\"+SH'F)$\");]o8FR7$$\"+>z$\\I'F)$\"(\">f9F=7$$\"+ \\B'3L'F)$\"(nw`\"F=7$$\"+ynycjF)$\"(Z5e\"F=7$$\"+Pcj3kF)$\"'@M;F-7$$ \"+&\\%[gkF)$\"'ao;F-7$$\"+8A=klF)$\"'!Qr\"F-7$$\"*$*zym'F`_l$\"'0W%=F-7$$\"+?W!37)F)$\"'YQ=F-7$$\"*9@BM)F`_l$\"'kH=F-7$$\"+N$[/a)F)$\"' Q;=F-7$$\"*`v&Q()F`_l$\"'V'z\"F-7$$\"+X/#)\\*)F)$\"'#Qw\"F-7$$\"*Ol5;* F`_l$\"'h2 " 0 "" {MPLTEXT 1 0 52 "eqn3:=-sin(10.*t)+ln((i3+1.0 e-9)/1.0e-9)/39.0+10*i3;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%eqn3G,( -%$sinG6#,$%\"tG$\"#5\"\"!!\"\"*&$\"+kD5kD!#6\"\"\"-%#lnG6#,&%#i3G$\"+ ++++5F-$F:!\"*F3F3F3*&F,F3F8F3F3" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "i3:=solve(eqn3,i3);" }}{PARA 12 "" 1 "" {XPPMATH 20 " 6#>%#i3G,&-%)LambertWG6#,$-%$expG6#,&$\"+++++R!#;\"\"\"*&$F/!\")F1-%$s inG6#,$%\"tG$\"#5\"\"!F1F1F.$\"+kD5kD!#7$\"+++++5!#=!\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "plot(i3,t=-1.0...1.0);" }}{PARA 13 "" 1 "" {GLPLOT2D 389 292 292 {PLOTDATA 2 "6%-%'CURVESG6$7fv7$$!#5!\" \"$\"+nU7]7!#67$$!+9r]X**F)$\"+Y*o;KFC7$$!+NXT@fF) $\"+:@s,uFC7$$!+gY.neF)$\"+O/\"[d#F37$$!+$yaE\"eF)$\"+TpcFbF37$$!+gpvk dF)$\"+zxd2')F37$$!+O\"for&F)$\"+drF)=\"F-7$$!+78'*ocF)$\"+G.gA:F-7$$! +)[j5i&F)$\"+23Wc=F-7$$!+kc;tbF)$\"+PM?&=#F-7$$!+SyEDbF)$\"+?ls0DF-7$$ !+;+PxaF)$\"+uNn:GF-7$$!+\">s%HaF)$\"+T*=K6$F-7$$!+(e]bP&F)$\"+a-]JMF- 7$$!+#)*G;K&F)$\"+#HYF)$\"+#=d;R&F-7$$!+]_&\\c%F)$\"+G>iH`F-7$ $!++;ggWF)$\"+=3YK^F-7$$!+]zCcVF)$\"+hlaN[F-7$$!++V*=D%F)$\"+8b3VWF-7$ $!+]1aZTF)$\"+p3\"4'RF-7$$!+&4f,5%F)$\"+%=wVr$F-7$$!+Rvx_SF)$\"+\\Qz^M F-7$$!+%)fR0SF)$\"+\\SF-7$$!+/#)[oPF)$ \"+%y)=6;F-7$$!+_p97PF)$\"+L&[w@\"F-7$$!+*p0el$F)$\"+[O@E$)F37$$!+ZWY* f$F)$\"+#\\ZBx%F37$$!+%>BJa$F)$\"+G$o#[>F37$$!+T>y'[$F)$\"+Ggw:XFC7$$! +*oS/V$F)$\"+T`'*4lFS7$$!+O%*4uLF)$\"+8k\"p'zFhn7$$!+$=exJ$F)$\"+#owYG *F^o7$$!+eW%o7$F)$!+EP%QP%Fdo7$$!+L2$f$HF)$!+oP_'***Fdo7$$!+PYx\"\\#F) $!+**********Fdo7$$!+L7i)4#F)F]p7$$!+P'psm\"F)F]p7$$!+74_c7F)F]p7$$!*3 x%z#)F)F]p7$$!*?PQM%F)$!+c#*******Fdo7$$!+bvF@AF-$!+-S9)***Fdo7$$!(\"z r)*F)$!+8#\\a>$Fdo7$$\"+nNl.5F-$\"+04Cy[!#<7$$\"+X]-1@F-$\"+Q()znMFhn7 $$\"+$y5sl#F-$\"+OCJuFFS7$$\"+AlR3KF-$\"+CQ>G?FC7$$\"+hAefPF-$\"+![bV3 \"F37$$\")!o2J%!\"*$\"+cPb*H$F37$$\"++od!z%F-$\"+(y&3`gF37$$\"++cQq_F- $\"+:_m'=*F37$$\"++W>]dF-$\"+(o8([7F-7$$\"++K+IiF-$\"+\"znRe\"F-7$$\"+ +?\")4nF-$\"+)fTx\">F-7$$\"++3i*=(F-$\"+]!\\dC#F-7$$\"++'H%pwF-$\"+&>+ ]c#F-7$$\")%Q#\\\")Fbel$\"+n4EtGF-7$$\"+]]Wn')F-$\"+^P#=>$F-7$$\"++Zx:F)$\"+p<'HV&F-7$$\"+#))RUg\"F)$\"+O[$yU&F-7$$\" +\"z25j\"F)$\"+Y3(eT&F-7$$\"*qvxl\"Fbel$\"+B/3(R&F-7$$\"+3W_iF)$\"+\\,TxYF-7$$\"*`qn2#Fbel $\"+()ecVUF-7$$\"+4aWF@F)$\"+^w(=+%F-7$$\"+(G?\"y@F)$\"+pLmSPF-7$$\"+m ^zGAF)$\"+!*R)4Y$F-7$$\"+X+ZzAF)$\"+hT1kJF-7$$\"+B\\9IBF)$\"+VvL^GF-7$ $\"+-)>3Q#F)$\"+k-_CDF-7$$\"+\"o%\\JCF)$\"+d]t&=#F-7$$\"*cp@[#Fbel$\"+ _6tP=F-7$$\"+v`VQDF)$\"+\"3*=X9F-7$$\"+!>,Zf#F)$\"+eE,a5F-7$$\"+0q'4l# F)$\"+h;=%y'F37$$\"+?GB2FF)$\"+p'3\"pMF37$$\"+N')\\jFF)$\"+GF)$\"+lo.)4#FC7$$\"+l-.wGF)$\"+0$pzv#FS7$$\"*3'HKHFbel$\"+^uX* H$Fhn7$$\"+Da_MJF)$\"*9lM<$F_p7$$\"*xanL$Fbel$!+bt![***Fdo7$$\"*v+'oPF belFhal7$$\"*S<*fTFbelF]p7$$\"*&)Hxe%FbelF]p7$$\"*.o-*\\FbelF]p7$$\"*T O5T&FbelF]p7$$\"*U9C#eFbel$!+1(*******Fdo7$$\"+Sf:qFhn7$$\"+8A=klF)$\"+O_J$)[FS7$$\"+Um5!f' F)$\"+/%)oZ7FC7$$\"+r5.;mF)$\"+Y^.QIFC7$$\"+,b&>k'F)$\"+h'pKz'FC7$$\"* $*zym'Fbel$\"+,NRW8F37$$\"+xG!4s'F)$\"+Dr'fk$F37$$\"+De#Rx'F)$\"+#RN:z 'F37$$\"+s([p#oF)$\"+\"yXD.\"F-7$$\"+?<(*zoF)$\"+^ij+9F-7$$\"+oY*H$pF) $\"+cv&4x\"F-7$$\"+:w,')pF)$\"+&HIj8#F-7$$\"+j0/RqF)$\"+U)H@\\#F-7$$\" *^j?4(Fbel$\"+p!*3NGF-7$$\"++ukWrF)$\"+ai3gJF-7$$\"+!HJs>(F)$\"+-r3oMF -7$$\"+!=:)\\sF)$\"+\\0\\dPF-7$$\"+q!*R-tF)$\"+Jm$p-%F-7$$\"+]oc2uF)$ \"+=2U,XF-7$$\"*jMF^(Fbel$\"+(=%)Q)[F-7$$\"+(*GP4wF)$\"+#)yD\\^F-7$$\" +l6,1xF)$\"+#Ho)G`F-7$$\"+)HIVv(F)$\"+J)3eQ&F-7$$\"+K%\\E!yF)$\"+Vnf?a F-7$$\"+m&o4&yF)$\"++78LaF-7$$\"*q(G**yFbel$\"+^fPBaF-7$$\"+gg/5!)F)$ \"+:Z<<`F-7$$\"+?W!37)F)$\"+%o\\d4&F-7$$\"+!yi:B)F)$\"+pbaiZF-7$$\"*9@ BM)Fbel$\"+(=>HK%F-7$$\"+RH&=R)F)$\"+(QlP4%F-7$$\"+QZQT%)F)$\"++VhXQF- 7$$\"+Pl\"4\\)F)$\"+(*eSzNF-7$$\"+N$[/a)F)$\"+fx@'H$F-7$$\"+M,)**e)F)$ \"+=&)H(*HF-7$$\"+L>^R')F)$\"+h37%o#F-7$$\"+JP/*o)F)$\"+o#o%eBF-7$$\"* `v&Q()Fbel$\"+KKeA?F-7$$\"+fnQ\"z)F)$\"+w0bc;F-7$$\"+()z>W))F)$\"+G=\"*FC7$$\"*Ol5;*Fbel$\"+\\6IuDFS7$$\"++PDj$*F)$\"+%*o.+5F jcl7$$\"*/Uac*Fbel$!+4gzd**Fdo7$$\"#5F*$!+%*********Fdo-%'COLOURG6&%$R GBGF`dn$\"\"!FidnFhdn-%+AXESLABELSG6$Q\"t6\"Q!6\"-%%VIEWG6$;F(F`dn%(DE FAULTG" 1 2 0 1 10 0 2 9 1 4 2 1.000000 45.000000 45.000000 0 0 "Curve 1" }}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "14 1 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }