<?xml version="1.0"  encoding="iso-8859-1" ?>
<?xml-stylesheet type="text/xsl" href="xsl/mathml.xsl"?>
<!DOCTYPE MMLEntities [
<!ENTITY af "&#x02061;">
<!ENTITY alpha "&#x003B1;">
<!ENTITY ap "&#x02048;">
<!ENTITY apos "&#x00027;">
<!ENTITY ApplyFunction "&#x02061;">
<!ENTITY Backslash "&#x02216;">
<!ENTITY beta "&#x003B2;">
<!ENTITY cap "&#x02229;">
<!ENTITY CenterDot "&#x000B7;">
<!ENTITY chi "&#x003C7;">
<!ENTITY compfn "&#x02218;">
<!ENTITY cup "&#x0222A;">
<!ENTITY dd "d">
<!ENTITY Del "&#x02207;">
<!ENTITY Delta "&#x00394;">
<!ENTITY delta "&#x003B4;">
<!ENTITY DifferentialD "d">
<!ENTITY DoubleRightArrow "&#x021D2;">
<!ENTITY ee "e">
<!ENTITY empty "&#x02205;&#x02063;">
<!ENTITY emptyset "&#x02205;&#x02063;">
<!ENTITY epsi "&#x003B5;">
<!ENTITY epsilon "&#x003B5;">
<!ENTITY epsiv "&#x0025B;">
<!ENTITY equiv "&#x02261;">
<!ENTITY eta "&#x003B7;">
<!ENTITY exist "&#x02203;">
<!ENTITY Exists "&#x02203;">
<!ENTITY ExponentialE "e">
<!ENTITY forall "&#x02200;">
<!ENTITY ForAll "&#x02200;">
<!ENTITY Gamma "&#x00393;">
<!ENTITY gamma "&#x003B3;">
<!ENTITY Gammad "&#x003DC;">
<!ENTITY gammad "&#x003DC;">
<!ENTITY ge "&#x02265;">
<!ENTITY gt "&#x0003E;">
<!ENTITY ii "i">
<!ENTITY image "&#x02111;">
<!ENTITY ImaginaryI "i">
<!ENTITY in "&#x02208;">
<!ENTITY infin "&#x0221E;">
<!ENTITY Integral "&#x0222B;">
<!ENTITY InvisibleTimes "&#x02062;">
<!ENTITY iota "&#x003B9;">
<!ENTITY it "&#x02062;">
<!ENTITY kappa "&#x003BA;">
<!ENTITY kappav "&#x003F0;">
<!ENTITY Lambda "&#x0039B;">
<!ENTITY lambda "&#x003BB;">
<!ENTITY lceil "&#x02308;">
<!ENTITY le "&#x02264;">
<!ENTITY LeftBracketingBar "|">
<!ENTITY LeftCeiling "&#x02308;">
<!ENTITY LeftFloor "&#x0230A;">
<!ENTITY lfloor "&#x0230A;">
<!ENTITY LowerRightArrow "&#x02198;">
<!ENTITY mu "&#x003BC;">
<!ENTITY nabla "&#x02207;">
<!ENTITY nbsp "&#x000A0;">
<!ENTITY ne "&#x02260;">
<!ENTITY not "&#x000AC;">
<!ENTITY NotElement "&#x02209;">
<!ENTITY NotEqual "&#x02260;">
<!ENTITY notin "&#x02209;">
<!ENTITY NotSubsetEqual "&#x02288;">
<!ENTITY nsub "&#x02284;">
<!ENTITY nsube "&#x02288;">
<!ENTITY nsubseteq "&#x02288;">
<!ENTITY nu "&#x003BD;">
<!ENTITY Omega "&#x003A9;">
<!ENTITY omega "&#x003C9;">
<!ENTITY OverBar "&#x000AF;">
<!ENTITY part "&#x02202;">
<!ENTITY Phi "&#x003A6;">
<!ENTITY phi "&#x003C6;">
<!ENTITY phiv "&#x003D5;">
<!ENTITY Pi "&#x003A0;">
<!ENTITY pi "&#x003C0;">
<!ENTITY piv "&#x003D6;">
<!ENTITY prime "&#x02032;">
<!ENTITY Product "&#x0220F;">
<!ENTITY Psi "&#x003A8;">
<!ENTITY psi "&#x003C8;">
<!ENTITY rarr "&#x02192;">
<!ENTITY rceil "&#x02309;">
<!ENTITY real "&#x0211C;">
<!ENTITY rfloor "&#x0230B;">
<!ENTITY rho "&#x003C1;">
<!ENTITY rhov "&#x003F1;">
<!ENTITY RightArrow "&#x02192;">
<!ENTITY rightarrow "&#x02192;">
<!ENTITY RightBracketingBar "|">
<!ENTITY RightCeiling "&#x02309;">
<!ENTITY RightFloor "&#x0230B;">
<!ENTITY Sigma "&#x003A3;">
<!ENTITY sigma "&#x003C3;">
<!ENTITY sigmav "&#x003C2;">
<!ENTITY sub "&#x02282;">
<!ENTITY sube "&#x02286;">
<!ENTITY SuchThat "&#x0220B;">
<!ENTITY Sum "&#x02211;">
<!ENTITY tau "&#x003C4;">
<!ENTITY Theta "&#x00398;">
<!ENTITY theta "&#x003B8;">
<!ENTITY thetav "&#x003D1;">
<!ENTITY times "&#x000D7;">
<!ENTITY UpperRightArrow "&#x02197;">
<!ENTITY Upsi "&#x003D2;">
<!ENTITY upsi "&#x003C5;">
<!ENTITY vee "&#x02228;">
<!ENTITY wedge "&#x02227;">
<!ENTITY weierp "&#x02118;">
<!ENTITY xi "&#x003BE;">
<!ENTITY Xi "&#x0039E;">
<!ENTITY zeta "&#x003B6;">
]>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>virtap4.html</title>
<!-- Created by Maple 8.00, IBM INTEL NT -->
<link href="../navi/css/sovell.css" rel="stylesheet" type="text/css"/>
</head>
<body bgcolor="FFFFFF">

<a href="../mpl/virtap4.mws" target="_blank">virtap4.mws</a>

<a name="MapleAutoBookmark1" />
<p align="center">
<b><u><font color="#000000" size="5">RCL-vihtovirtapiiri: resonanssi </font></u></b>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Olkoon tarkastelun kohteena tavallinen RLC-vaihtovirtapiiri. Piirissä on kolme komponenttia, </font>
<i><font color="#000000">R</font></i>
<font color="#000000">&nbsp;ohmin vastus, </font>
<i><font color="#000000">L</font></i>
<font color="#000000">&nbsp;henryn induktanssi ja </font>
<i><font color="#000000">C</font></i>
<font color="#000000">&nbsp;faradin kapasitanssi.<br />
</font>
</p>
<p align="center">
<img src="images/virtap41.gif" width="154" height="108" alt="[Maple Bitmap]" />
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Piiriin syötettyyn jännitteeseen kohdistuu kolme eri pudotusta, <br />
</font>
</p>
<p align="center">
<img src="images/virtap42.gif" width="122" height="58" alt="E[L] = L*diff(I(t),t)" align="middle" />
<font color="#000000">&nbsp;&nbsp;&nbsp;&nbsp;käämin yli,</font>
</p>
<p align="center">
<img src="images/virtap43.gif" width="89" height="32" alt="E[R] = R*I(t)" align="middle" />
<font color="#000000">&nbsp;&nbsp;&nbsp;&nbsp;vastuksen yli, sekä</font>
</p>
<p align="center">
<img src="images/virtap44.gif" width="69" height="58" alt="E[C] = 1/C" align="middle" />
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mo>&Integral;</mo>
    <mrow>
      <mn>&ImaginaryI;</mn>
      <mo>&ApplyFunction;</mo>
      <mfenced>
        <mi>t</mi>
      </mfenced>
    </mrow>
    <mo>&InvisibleTimes;</mo>
    <mrow>
      <mo>&DifferentialD;</mo>
      <mi>t</mi>
    </mrow>
  </mrow>
</math>
<font color="#000000">&nbsp;&nbsp;&nbsp;&nbsp;kondensaattorin yli.</font>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Näiden summasta syntyy piirin Kirchhoffin lain mukainen sähkömotorinen voima E(</font>
<i><font color="#000000">t</font></i>
<font color="#000000">). Mikäli piiriin syötetty jännite on sinimuotoista vaihtovirtaa </font>
<img src="images/virtap45.gif" width="133" height="32" alt="E(t) = E[0]*sin(omega*t)" align="middle" />
<font color="#000000">, saadaan piirille yhtälö</font>
</p>
<p align="left">
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mrow>
      <mi>E</mi>
      <mo>&ApplyFunction;</mo>
      <mfenced>
        <mi>t</mi>
      </mfenced>
    </mrow>
    <mo>=</mo>
    <mrow>
      <mrow>
        <mi>L</mi>
        <mo>&InvisibleTimes;</mo>
        <mfenced>
          <mrow>
            <mfrac>
              <mo>&DifferentialD;</mo>
              <mrow>
                <mo>&DifferentialD;</mo>
                <mi>t</mi>
              </mrow>
            </mfrac>
            <mrow>
              <mn>&ImaginaryI;</mn>
              <mo>&ApplyFunction;</mo>
              <mfenced>
                <mi>t</mi>
              </mfenced>
            </mrow>
          </mrow>
        </mfenced>
      </mrow>
      <mo>+</mo>
      <mrow>
        <mi>R</mi>
        <mo>&InvisibleTimes;</mo>
        <mrow>
          <mn>&ImaginaryI;</mn>
          <mo>&ApplyFunction;</mo>
          <mfenced>
            <mi>t</mi>
          </mfenced>
        </mrow>
      </mrow>
      <mo>+</mo>
      <mfrac>
        <mn>1</mn>
        <mi>C</mi>
      </mfrac>
    </mrow>
  </mrow>
</math>
<img src="images/virtap46.gif" width="157" height="52" alt="int(I(t),t) = E[0]*sin(omega*t)" align="middle" />
<font color="#000000">.</font>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Integraalitermistä päästään eroon derivoimalla yhtälö ajan suhteen: <br />
</font>
</p>
<p align="center">
<img src="images/virtap47.gif" width="336" height="76" alt="L*diff(I(t),`$`(t,2))+R*diff(I(t),t)+I(t)/C = E[0]*omega*cos(omega*t)" align="middle" />
<font color="#000000"><br />
</font>
</p>
<p align="left">
<font color="#000000">Tämä on differentiaaliyhtälö pakotetulle värähtelylle, jossa ulkoinen pakottava jännite on sinimuotoinen amplitudina </font>
<img src="images/virtap48.gif" width="34" height="32" alt="E[0]" align="middle" />
<font color="#000000">. <br />
<br />
Jos </font>
<i><font color="#000000">E</font></i>
<font color="#000000">(</font>
<i><font color="#000000">t</font></i>
<font color="#000000">)=0, kyseessä vapaa värähtelypiiri ja differentiaaliyhtälö on homogeeninen. <br />
<br />
Jos piirissä ei ole vastusta, ts. </font>
<i><font color="#000000">R</font></i>
<font color="#000000">&nbsp;= 0, piiri on vaimentamaton. Vastuksen olemassaolo merkitsee, että piirissä on vaimennnus. <br />
<br />
Tarkastellaan differentialiyhtälön ratkaisuja vakioiden </font>
<i><font color="#000000">L</font></i>
<font color="#000000">, </font>
<i><font color="#000000">R</font></i>
<font color="#000000">, </font>
<i><font color="#000000">C</font></i>
<font color="#000000">, </font>
<img src="images/virtap49.gif" width="34" height="32" alt="E[0]" align="middle" />
<font color="#000000">&nbsp;ja </font>
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mi>&omega;</mi>
</math>
<font color="#000000">&nbsp;eri arvoilla.</font>
</p>
<p align="left">
<font color="#000000"><br />
Aluksi hävitetään mahdollisista aiemmista laskuista jääneet muuttujat: <br />
</font>
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">restart;</font></b>
</td></tr>
</table>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Virtaa kuvaava toisen kertaluvun yhtälö.</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">yhtalo:= L*diff(i(t), t$2)+R*diff(i(t), t)+1/C*i(t)=omega*E[0]*cos(omega*t);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap410.gif" width="390" height="63" alt="yhtalo := L*diff(i(t),`$`(t,2))+R*diff(i(t),t)+1/C*i(t) = omega*E[0]*cos(omega*t)" />
</p>
<p align="left">
<b><font color="#000000" size="5">Vaimentamaton tapaus</font></b>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Vaimentamattomassa tapauksessa piirissä ei ole vastusta ja yhtälö on</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">yhtalo1:= subs(R=0, yhtalo);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap411.gif" width="313" height="63" alt="yhtalo1 := L*diff(i(t),`$`(t,2))+1/C*i(t) = omega*E[0]*cos(omega*t)" />
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Alkuehtona olkoon, että piirissä ei tapahdu mitään:</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">alkuehto:= i(0)=0, D(i)(0)=0;</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>alkuehto</mi>
  </mrow>
  <mo>:=</mo>
  <mrow>
    <mrow>
      <mrow>
        <mi>i</mi>
        <mo>&ApplyFunction;</mo>
        <mfenced>
          <mn>0</mn>
        </mfenced>
      </mrow>
      <mo>=</mo>
      <mn>0</mn>
    </mrow>
    <mo>,</mo>
    <mrow>
      <mrow>
        <mfenced>
          <msup>
            <mi>i</mi>
            <mo>&prime;</mo>
          </msup>
        </mfenced>
        <mo>&ApplyFunction;</mo>
        <mfenced>
          <mn>0</mn>
        </mfenced>
      </mrow>
      <mo>=</mo>
      <mn>0</mn>
    </mrow>
  </mrow>
</math>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Tämän ratkaisu on</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">dsolve({yhtalo1, alkuehto}, i(t)):<br />
ratkaisu1:= subs(%, i(t));</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap412.gif" width="374" height="83" alt="ratkaisu1 := cos(1/C^(1/2)/L^(1/2)*t)*omega*E[0]*C/(-1+omega^2*C*L)-omega*E[0]*cos(omega*t)*C/(-1+omega^2*C*L)" />
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Ratkaisu muodostuu kahdesta kosinitermistä: </font>
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>cos</mi>
    <mo>&ApplyFunction;</mo>
    <mfenced>
      <mfrac>
        <mi>t</mi>
        <msqrt>
          <mrow>
            <mi>C</mi>
            <mo>&InvisibleTimes;</mo>
            <mi>L</mi>
          </mrow>
        </msqrt>
      </mfrac>
    </mfenced>
  </mrow>
</math>
<font color="#000000">&nbsp;on peräisin homogeeniyhtälön yleisestä ratkaisusta ja </font>
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>cos</mi>
    <mo>&ApplyFunction;</mo>
    <mfenced>
      <mrow>
        <mi>&omega;</mi>
        <mo>&InvisibleTimes;</mo>
        <mi>t</mi>
      </mrow>
    </mfenced>
  </mrow>
</math>
<font color="#000000">&nbsp;epähomogeeniyhtälön yksittäisratkaisusta. Edellinen kuvaa piirin sisäistä värähtelyä, jälkimmäinen ulkoisen jännitteen taajuudella tapahtuvaa värähtelyä. <br />
<br />
Ratkaisu tässä muodossa ei kuitenkaan ole pätevä, jos nimittäjä tulee nollaksi: <br />
</font>
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">restaajuus:= solve(-1+omega^2*L*C=0, omega);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>restaajuus</mi>
  </mrow>
  <mo>:=</mo>
  <mrow>
    <msup>
      <mfenced>
        <mrow>
          <mi>C</mi>
          <mo>&InvisibleTimes;</mo>
          <mi>L</mi>
        </mrow>
      </mfenced>
      <mfrac>
        <mn>-1</mn>
        <mn>2</mn>
      </mfrac>
    </msup>
    <mo>,</mo>
    <mrow>
      <mo>-</mo>
      <msup>
        <mfenced>
          <mrow>
            <mi>C</mi>
            <mo>&InvisibleTimes;</mo>
            <mi>L</mi>
          </mrow>
        </mfenced>
        <mfrac>
          <mn>-1</mn>
          <mn>2</mn>
        </mfrac>
      </msup>
    </mrow>
  </mrow>
</math>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Nollaksi tuloa vastaavaa pakotteen taajuutta kutsutaan </font>
<i><font color="#000000">resonanssitaajuudeksi</font></i>
<font color="#000000">. Tällöin piirin sisäinen värähtelytaajuus ja pakotteen taajuus ovat samat. Kyseessä on tilanne, missä epähomogeenisen yhtälön yksittäisratkaisu saakin erilaisen muodon: </font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">yhtalo2:= subs(omega=sqrt(C*L)/(C*L), yhtalo1);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap413.gif" width="377" height="82" alt="yhtalo2 := L*diff(i(t),`$`(t,2))+1/C*i(t) = (C*L)^(1/2)/C/L*E[0]*cos((C*L)^(1/2)/C/L*t)" />
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">dsolve({yhtalo2, alkuehto}, i(t)):<br />
ratkaisu2:= subs(%,i(t)):<br />
simplify(%);</font></b>
</td></tr>
</table>
</p>
<p align="left">
<tt><pre><font color="#FF00FF" size="2">Error, (in trig/reduce) numeric exception: division by zero<br />
</font></pre></tt>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>i</mi>
    <mo>&ApplyFunction;</mo>
    <mfenced>
      <mi>t</mi>
    </mfenced>
  </mrow>
</math>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Tämä on tulkittavissa värähtelytermiksi, jossa virran amplitudi </font>
<img src="images/virtap414.gif" width="34" height="32" alt="E[0]" align="middle" />
<i><font color="#000000">t </font></i>
<font color="#000000">/ (2 </font>
<i><font color="#000000">L</font></i>
<font color="#000000">)</font>
<i><font color="#000000">&nbsp;</font></i>
<font color="#000000">kasvaa rajatta muuttujan </font>
<i><font color="#000000">t</font></i>
<font color="#000000">&nbsp;mukana. Käytännössä tämä johtaisi piirin palamiseen. <br />
<br />
Arvoilla </font>
<i><font color="#000000">L = 0.1 H</font></i>
<font color="#000000">, </font>
<i><font color="#000000">C</font></i>
<font color="#000000">&nbsp;= 0.001 </font>
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mi>&mu;</mi>
</math>
<font color="#000000">F, </font>
<img src="images/virtap415.gif" width="34" height="32" alt="E[0]" align="middle" />
<font color="#000000">&nbsp;= 230 V saadaan resonanssitaajuudella seuraava kuvio: <br />
</font>
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">subs({L=0.1, C=0.001, E[0]=230}, ratkaisu2);<br />
plot(%, t = 0..1.5);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>i</mi>
    <mo>&ApplyFunction;</mo>
    <mfenced>
      <mi>t</mi>
    </mfenced>
  </mrow>
</math>
</p>
<p align="left">
<tt><pre><font color="#FF00FF" size="2">Plotting error, empty plot</font></pre></tt>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Resonanssitaajuus on</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">subs({L=0.1, C=0.001}, restaajuus[1]);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mn>.1e3</mn>
</math>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Jos pakotteen taajuus on lähellä resonanssitaajuutta, saadaan erikoinen värähtely:</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">subs({L=0.1, C=0.001, E[0]=230, omega=90}, ratkaisu1);<br />
plot(%, t = 0..1.5);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mrow>
      <mo>-</mo>
      <mrow>
        <mn>108.9473684</mn>
        <mo>&InvisibleTimes;</mo>
        <mrow>
          <mi>cos</mi>
          <mo>&ApplyFunction;</mo>
          <mfenced>
            <mrow>
              <mn>99.99999999</mn>
              <mo>&InvisibleTimes;</mo>
              <mi>t</mi>
            </mrow>
          </mfenced>
        </mrow>
      </mrow>
    </mrow>
    <mo>+</mo>
    <mrow>
      <mn>108.9473684</mn>
      <mo>&InvisibleTimes;</mo>
      <mrow>
        <mi>cos</mi>
        <mo>&ApplyFunction;</mo>
        <mfenced>
          <mrow>
            <mn>90</mn>
            <mo>&InvisibleTimes;</mo>
            <mi>t</mi>
          </mrow>
        </mfenced>
      </mrow>
    </mrow>
  </mrow>
</math>
</p>
<p align="center">
<img src="images/virtap416.gif" width="448" height="448" alt="[Maple Plot]" />
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Tässä pakote aluksi vahvistaa piirissä kulkevaa virtaa kuten resonanssitaajuuden tapauksessakin, mutta koska taajuudet eivät olekaan täsmälleen samat, värähtelyt siirtyvät vähitellen vastakkaisiin vaiheisiin, ja pakote alkaa sammuttaa piirin virtaa. <br />
<br />
Syntynyt värähtely voidaan myös ymmärtää sinivärähtelyksi, jolla on sinimuotoinen vaihteleva amplitudi: <br />
</font>
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">(cos(100*t)-cos(90*t))-(-2*sin(5*t)*sin(95*t)):<br />
simplify(%);<br />
</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mn>0</mn>
</math>
</p>
<p align="left">
<b><font color="#000000" size="5">Vaimennettu tapaus</font></b>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Yleisen vaimennetun tapauksen ratkaisu on</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">yhtalo;</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap417.gif" width="330" height="63" alt="L*diff(i(t),`$`(t,2))+R*diff(i(t),t)+1/C*i(t) = omega*E[0]*cos(omega*t)" />
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">dsolve(yhtalo, i(t)):<br />
subs(%, i(t)):<br />
ratkaisu:= collect(combine(%), {_C1, _C2, exp});<br />
</font></b>
</td></tr>
</table>
</p>
<p align="left">
<img src="images/virtap418.gif" width="612" height="95" alt="ratkaisu := exp((-1/2*R*C-1/2*(R^2*C^2-4*C*L)^(1/2))/L*t/C)*_C1+exp(1/2/C/L*(-R*C+(R^2*C^2-4*C*L)^(1/2))*t)*_C2+(omega*E[0]*cos(omega*t)*C-C^2*E[0]*omega^3*cos(omega*t)*L+omega^2*E[0]*C^2*sin(omega*t)*..." />
<br />
<img src="images/virtap419.gif" width="449" height="72" alt="ratkaisu := exp((-1/2*R*C-1/2*(R^2*C^2-4*C*L)^(1/2))/L*t/C)*_C1+exp(1/2/C/L*(-R*C+(R^2*C^2-4*C*L)^(1/2))*t)*_C2+(omega*E[0]*cos(omega*t)*C-C^2*E[0]*omega^3*cos(omega*t)*L+omega^2*E[0]*C^2*sin(omega*t)*..." />
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Ratkaisu koostuu kahdesta termistä:</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">sisainen:= select(has, ratkaisu, _C1)+select(has, ratkaisu, _C2);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>sisainen</mi>
  </mrow>
  <mo>:=</mo>
  <mrow>
    <mrow>
      <mrow>
        <msup>
          <mi>&ExponentialE;</mi>
          <mfenced>
            <mfrac>
              <mrow>
                <mfenced>
                  <mrow>
                    <mrow>
                      <mo>-</mo>
                      <mrow>
                        <mrow>
                          <mfrac>
                            <mn>1</mn>
                            <mn>2</mn>
                          </mfrac>
                          <mo>&InvisibleTimes;</mo>
                          <mi>R</mi>
                        </mrow>
                        <mo>&InvisibleTimes;</mo>
                        <mi>C</mi>
                      </mrow>
                    </mrow>
                    <mo>-</mo>
                    <mrow>
                      <mfrac>
                        <mn>1</mn>
                        <mn>2</mn>
                      </mfrac>
                      <mo>&InvisibleTimes;</mo>
                      <msqrt>
                        <mfenced>
                          <mrow>
                            <mrow>
                              <msup>
                                <mi>R</mi>
                                <mn>2</mn>
                              </msup>
                              <mo>&InvisibleTimes;</mo>
                              <msup>
                                <mi>C</mi>
                                <mn>2</mn>
                              </msup>
                            </mrow>
                            <mo>-</mo>
                            <mrow>
                              <mrow>
                                <mn>4</mn>
                                <mo>&InvisibleTimes;</mo>
                                <mi>C</mi>
                              </mrow>
                              <mo>&InvisibleTimes;</mo>
                              <mi>L</mi>
                            </mrow>
                          </mrow>
                        </mfenced>
                      </msqrt>
                    </mrow>
                  </mrow>
                </mfenced>
                <mo>&InvisibleTimes;</mo>
                <mi>t</mi>
              </mrow>
              <mrow>
                <mi>C</mi>
                <mo>&InvisibleTimes;</mo>
                <mi>L</mi>
              </mrow>
            </mfrac>
          </mfenced>
        </msup>
        <mo>&InvisibleTimes;</mo>
        <mi>_C1</mi>
      </mrow>
      <mo>+</mo>
      <mrow>
        <msup>
          <mi>&ExponentialE;</mi>
          <mfenced>
            <mrow>
              <mfrac>
                <mn>1</mn>
                <mn>2</mn>
              </mfrac>
              <mo>&InvisibleTimes;</mo>
              <mfrac>
                <mrow>
                  <mfenced>
                    <mrow>
                      <mrow>
                        <mo>-</mo>
                        <mrow>
                          <mi>R</mi>
                          <mo>&InvisibleTimes;</mo>
                          <mi>C</mi>
                        </mrow>
                      </mrow>
                      <mo>+</mo>
                      <msqrt>
                        <mfenced>
                          <mrow>
                            <mrow>
                              <msup>
                                <mi>R</mi>
                                <mn>2</mn>
                              </msup>
                              <mo>&InvisibleTimes;</mo>
                              <msup>
                                <mi>C</mi>
                                <mn>2</mn>
                              </msup>
                            </mrow>
                            <mo>-</mo>
                            <mrow>
                              <mrow>
                                <mn>4</mn>
                                <mo>&InvisibleTimes;</mo>
                                <mi>C</mi>
                              </mrow>
                              <mo>&InvisibleTimes;</mo>
                              <mi>L</mi>
                            </mrow>
                          </mrow>
                        </mfenced>
                      </msqrt>
                    </mrow>
                  </mfenced>
                  <mo>&InvisibleTimes;</mo>
                  <mi>t</mi>
                </mrow>
                <mrow>
                  <mi>C</mi>
                  <mo>&InvisibleTimes;</mo>
                  <mi>L</mi>
                </mrow>
              </mfrac>
            </mrow>
          </mfenced>
        </msup>
        <mo>&InvisibleTimes;</mo>
        <mi>_C2</mi>
      </mrow>
    </mrow>
  </mrow>
</math>
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">ulkoinen:= subs({_C1=0, _C2=0}, ratkaisu);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap420.gif" width="507" height="72" alt="ulkoinen := (omega*E[0]*cos(omega*t)*C-C^2*E[0]*omega^3*cos(omega*t)*L+omega^2*E[0]*C^2*sin(omega*t)*R)/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2)" />
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Sisäisen värähtelyn termi esittää vaimenevaa värähtelyä, sillä muuttujan </font>
<i><font color="#000000">t</font></i>
<font color="#000000">&nbsp;kerroin kummassakin eksponentissa on joko negatiivinen reaaliluku tai kompleksiluku, jonka reaaliosa on negatiivinen. Nämä termit siis kuolevat vähitellen pois. </font>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Ulkoisen värähtelyn termi voidaan muokata seuraavasti. Pyritään saattamaan se muotoon, jossa on vain yksi sinifunktio kertoimena sopiva </font>
<i><font color="#000000">amplitudi</font></i>
<font color="#000000">&nbsp;</font>
<i><font color="#000000">A</font></i>
<font color="#000000">&nbsp;ja argumentissa sopiva </font>
<i><font color="#000000">vaihesiirto</font></i>
<font color="#000000">&nbsp;</font>
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mi>&delta;</mi>
</math>
<font color="#000000">.</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">uusimuoto:= expand(A*sin(omega*t+delta));</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>uusimuoto</mi>
  </mrow>
  <mo>:=</mo>
  <mrow>
    <mrow>
      <mrow>
        <mrow>
          <mi>A</mi>
          <mo>&InvisibleTimes;</mo>
          <mrow>
            <mi>sin</mi>
            <mo>&ApplyFunction;</mo>
            <mfenced>
              <mrow>
                <mi>&omega;</mi>
                <mo>&InvisibleTimes;</mo>
                <mi>t</mi>
              </mrow>
            </mfenced>
          </mrow>
        </mrow>
        <mo>&InvisibleTimes;</mo>
        <mrow>
          <mi>cos</mi>
          <mo>&ApplyFunction;</mo>
          <mfenced>
            <mi>&delta;</mi>
          </mfenced>
        </mrow>
      </mrow>
      <mo>+</mo>
      <mrow>
        <mrow>
          <mi>A</mi>
          <mo>&InvisibleTimes;</mo>
          <mrow>
            <mi>cos</mi>
            <mo>&ApplyFunction;</mo>
            <mfenced>
              <mrow>
                <mi>&omega;</mi>
                <mo>&InvisibleTimes;</mo>
                <mi>t</mi>
              </mrow>
            </mfenced>
          </mrow>
        </mrow>
        <mo>&InvisibleTimes;</mo>
        <mrow>
          <mi>sin</mi>
          <mo>&ApplyFunction;</mo>
          <mfenced>
            <mi>&delta;</mi>
          </mfenced>
        </mrow>
      </mrow>
    </mrow>
  </mrow>
</math>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Vaatimalla että sini- ja kosinitermien kertoimet vanhassa ja uudessa esitysmuodossa ovat samat, saadaan ehdot, joista pyritään ratkaisemaan </font>
<i><font color="#000000">A</font></i>
<font color="#000000">&nbsp;ja </font>
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mi>&delta;</mi>
</math>
<font color="#000000">.</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">ehdot:= zip((x, y)-&gt;x=y, map2(coeff, ulkoinen, [sin(omega*t), cos(omega*t)]), map2(coeff, uusimuoto, [sin(omega*t), cos(omega*t)])):<br />
simplify(%);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap421.gif" width="708" height="72" alt="[omega^2*E[0]*C^2*R/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2) = A*cos(delta), -C*E[0]*omega*(-1+omega^2*C*L)/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2) = A*sin(delta)]" />
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">solve({op(ehdot)}, {A, delta}):<br />
ratk:= allvalues(%);</font></b>
</td></tr>
</table>
</p>
<p align="left">
<img src="images/virtap422.gif" width="515" height="93" alt="ratk := {A = (1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)*omega*E[0]*C, delta = arctan(-(-1+omega^2*C*L)/(1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)/(R^2*C^2*omega^2+1-2*..." />
<br />
<img src="images/virtap423.gif" width="592" height="93" alt="ratk := {A = (1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)*omega*E[0]*C, delta = arctan(-(-1+omega^2*C*L)/(1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)/(R^2*C^2*omega^2+1-2*..." />
<br />
<img src="images/virtap424.gif" width="680" height="93" alt="ratk := {A = (1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)*omega*E[0]*C, delta = arctan(-(-1+omega^2*C*L)/(1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)/(R^2*C^2*omega^2+1-2*..." />
<br />
<img src="images/virtap425.gif" width="579" height="93" alt="ratk := {A = (1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)*omega*E[0]*C, delta = arctan(-(-1+omega^2*C*L)/(1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)/(R^2*C^2*omega^2+1-2*..." />
<br />
<img src="images/virtap426.gif" width="600" height="93" alt="ratk := {A = (1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)*omega*E[0]*C, delta = arctan(-(-1+omega^2*C*L)/(1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)/(R^2*C^2*omega^2+1-2*..." />
<br />
<img src="images/virtap427.gif" width="400" height="93" alt="ratk := {A = (1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)*omega*E[0]*C, delta = arctan(-(-1+omega^2*C*L)/(1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)/(R^2*C^2*omega^2+1-2*..." />
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Pakotteen aiheuttama virta on siis sinimuotoinen amplitudina</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">amplitudi:= subs(ratk[1], A);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap428.gif" width="435" height="58" alt="amplitudi := (1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)*omega*E[0]*C" />
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Amplitudi riippuu pakotteen taajuudesta. Pyritään määrittämään maksimiamplitudi ja vastaava taajuus:</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">diff(amplitudi, omega):<br />
derivaatta:= simplify(%);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap429.gif" width="684" height="107" alt="derivaatta := -(omega^4*C^2*L^2-1)*E[0]*C/(1/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2))^(1/2)/(R^2*C^2*omega^2+1-2*omega^2*C*L+omega^4*C^2*L^2)^2" />
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">maksimikohta:= solve(derivaatta=0, omega);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>maksimikohta</mi>
  </mrow>
  <mo>:=</mo>
  <mrow>
    <mrow>
      <mo>-</mo>
      <msup>
        <mfenced>
          <mrow>
            <mo>-</mo>
            <mrow>
              <mi>C</mi>
              <mo>&InvisibleTimes;</mo>
              <mi>L</mi>
            </mrow>
          </mrow>
        </mfenced>
        <mfrac>
          <mn>-1</mn>
          <mn>2</mn>
        </mfrac>
      </msup>
    </mrow>
    <mo>,</mo>
    <msup>
      <mfenced>
        <mrow>
          <mo>-</mo>
          <mrow>
            <mi>C</mi>
            <mo>&InvisibleTimes;</mo>
            <mi>L</mi>
          </mrow>
        </mrow>
      </mfenced>
      <mfrac>
        <mn>-1</mn>
        <mn>2</mn>
      </mfrac>
    </msup>
    <mo>,</mo>
    <msup>
      <mfenced>
        <mrow>
          <mi>C</mi>
          <mo>&InvisibleTimes;</mo>
          <mi>L</mi>
        </mrow>
      </mfenced>
      <mfrac>
        <mn>-1</mn>
        <mn>2</mn>
      </mfrac>
    </msup>
    <mo>,</mo>
    <mrow>
      <mo>-</mo>
      <msup>
        <mfenced>
          <mrow>
            <mi>C</mi>
            <mo>&InvisibleTimes;</mo>
            <mi>L</mi>
          </mrow>
        </mfenced>
        <mfrac>
          <mn>-1</mn>
          <mn>2</mn>
        </mfrac>
      </msup>
    </mrow>
  </mrow>
</math>
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">subs(omega=sqrt(C*L)/(C*L), amplitudi);<br />
maksimiamplitudi:= simplify(%);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap430.gif" width="152" height="82" alt="(1/R^2/C*L)^(1/2)*(C*L)^(1/2)/L*E[0]" />
</p>
<p align="center">
<img src="images/virtap431.gif" width="287" height="82" alt="maksimiamplitudi := (1/R^2/C*L)^(1/2)*(C*L)^(1/2)/L*E[0]" />
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Maple on varovainen yhdistellessään neliöjuuria, ja ainakaan ohjelman versio 6 ei suostunut sieventämään lauseketta pidemmälle. Lauseke on kuitenkin yksinkertainen ja käsin sieventämällä päästään tulokseen </font>
<img src="images/virtap432.gif" width="38" height="72" alt="E[0]/R" align="middle" />
<font color="#000000">. Maksimiarvo saadaan siis resonanssitaajuudella.</font>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Piirretään pakotteen (ulkoisen jännitteen) ja resonanssitaajuutta vastaavan virran kuvaajat:</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">numulkoinen:= subs({L=0.1, C=0.0001, R=5, E[0]=230}, ulkoinen);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>numulkoinen</mi>
  </mrow>
  <mo>:=</mo>
  <mrow>
    <mfrac>
      <mrow>
        <mrow>
          <mrow>
            <mn>.230e-1</mn>
            <mo>&InvisibleTimes;</mo>
            <mi>&omega;</mi>
          </mrow>
          <mo>&InvisibleTimes;</mo>
          <mrow>
            <mi>cos</mi>
            <mo>&ApplyFunction;</mo>
            <mfenced>
              <mrow>
                <mi>&omega;</mi>
                <mo>&InvisibleTimes;</mo>
                <mi>t</mi>
              </mrow>
            </mfenced>
          </mrow>
        </mrow>
        <mo>-</mo>
        <mrow>
          <mrow>
            <mn>.230e-6</mn>
            <mo>&InvisibleTimes;</mo>
            <msup>
              <mi>&omega;</mi>
              <mn>3</mn>
            </msup>
          </mrow>
          <mo>&InvisibleTimes;</mo>
          <mrow>
            <mi>cos</mi>
            <mo>&ApplyFunction;</mo>
            <mfenced>
              <mrow>
                <mi>&omega;</mi>
                <mo>&InvisibleTimes;</mo>
                <mi>t</mi>
              </mrow>
            </mfenced>
          </mrow>
        </mrow>
        <mo>+</mo>
        <mrow>
          <mrow>
            <mn>.1150e-4</mn>
            <mo>&InvisibleTimes;</mo>
            <msup>
              <mi>&omega;</mi>
              <mn>2</mn>
            </msup>
          </mrow>
          <mo>&InvisibleTimes;</mo>
          <mrow>
            <mi>sin</mi>
            <mo>&ApplyFunction;</mo>
            <mfenced>
              <mrow>
                <mi>&omega;</mi>
                <mo>&InvisibleTimes;</mo>
                <mi>t</mi>
              </mrow>
            </mfenced>
          </mrow>
        </mrow>
      </mrow>
      <mrow>
        <mrow>
          <mo>-</mo>
          <mrow>
            <mn>.1975e-4</mn>
            <mo>&InvisibleTimes;</mo>
            <msup>
              <mi>&omega;</mi>
              <mn>2</mn>
            </msup>
          </mrow>
        </mrow>
        <mo>+</mo>
        <mn>1.</mn>
        <mo>+</mo>
        <mrow>
          <mn>.1e-9</mn>
          <mo>&InvisibleTimes;</mo>
          <msup>
            <mi>&omega;</mi>
            <mn>4</mn>
          </msup>
        </mrow>
      </mrow>
    </mfrac>
  </mrow>
</math>
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">jannite:= subs(E[0]=230, E[0]*sin(omega*t));</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>jannite</mi>
  </mrow>
  <mo>:=</mo>
  <mrow>
    <mrow>
      <mn>230</mn>
      <mo>&InvisibleTimes;</mo>
      <mrow>
        <mi>sin</mi>
        <mo>&ApplyFunction;</mo>
        <mfenced>
          <mrow>
            <mi>&omega;</mi>
            <mo>&InvisibleTimes;</mo>
            <mi>t</mi>
          </mrow>
        </mfenced>
      </mrow>
    </mrow>
  </mrow>
</math>
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">res:= subs({L=0.1, C=0.0001, R=5, E[0]=230},1/sqrt(L*C));</font></b>
</td></tr>
</table>
</p>
<p align="center">
<math xmlns='http://www.w3.org/1998/Math/MathML'>
  <mrow>
    <mi>res</mi>
  </mrow>
  <mo>:=</mo>
  <mrow>
    <mn>316.2277660</mn>
  </mrow>
</math>
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">plot(subs(omega=res, {jannite, numulkoinen}),t=0..0.1);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap433.gif" width="448" height="448" alt="[Maple Plot]" />
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Kuviossa on jännite punaisella ja virta vihreällä.</font>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Vastaava kuvio, kun kyseessä ei ole resonanssitaajuus:</font>
</p>
<p align="left">
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"><b><font color="#FF0000">plot(subs(omega=280, {jannite, numulkoinen}), t=0..0.1);</font></b>
</td></tr>
</table>
</p>
<p align="center">
<img src="images/virtap434.gif" width="448" height="448" alt="[Maple Plot]" />
</p>
<p align="left">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top"><tt>&gt; &nbsp;&nbsp;</tt></td>
<td width="100%" valign="top"></td></tr>
</table>
</p>
<p align="left">
<i><b><font color="#000000">Tehtäviä</font></b></i>
</p>
<p align="left">
</p>
<p align="left">
<font color="#000000">Tutki, miten alkuehtojen muuttaminen vaikuttaa ratkaisuun vaimentamattomassa tapauksessa. Miten ratkaisun luonne muuttuu, kun ollaan resonanssikohdan lähellä? <br />
<br />
Piirrä kuvaaja, joka esittää vaimennetun tapauksen virtaa pakotteen taajuuden funktiona. Onko vaimennetun piirin tapauksessa sellainen ratkaisu mahdollinen, jossa virran amplitudi rajatta kasvaa, ts. piiri palaa? </font>
</p>
<p align="left">
</p>

<p><b>Linkkejä</b></p>


 <a href="../xml_mpl/virtap3.xml">vaihtovirtapiirin pakotettu värähtely</a><br/>
<a href="../xml/algvke.xml">epähomogeeninen vakiokertoiminen lineaariyhtälö</a><br/>

<p align="left">
<i><font color="#000000">JP &amp; SKK &amp; MS 12.07.2001</font></i>
</p>




</body>
</html>
