<?xml version="1.0" encoding="UTF-8"?>
<?xml-stylesheet type="text/xsl" href="HTMLFiles/pmathml.xsl"?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1 plus MathML 2.0//EN"
        "HTMLFiles/xhtml-math11-f.dtd">

<!-- Created by Wolfram Mathematica 5.1 -->

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
 <title>
  linysj.xml
 </title>
 <link href="../navi/css/esim.css" rel="stylesheet" type="text/css"/>
 <link href="HTMLFiles/newDefault.css" rel="stylesheet" type="text/css" />
</head>

<body>

<p><a href="../mma/linysj.nb">linysj.nb</a></p>

<p class="Title">
 Vakiokertoimisen lineaariyht&auml;l&ouml;n karakteristisen yht&auml;l&ouml;n useampikertaiset juuret
</p>



<p class="Text">
 Kiinnitet&auml;&auml;n aluksi kolme vakiota.
</p>



<p class="Text">
 Tarkastelun kohteena olkoon kertalukua <span>n</span> oleva vakiokertoiminen homogeeninen differentiaaliyht&auml;l&ouml;:
</p>



<p class="CellLabel">
 In[1]:=
</p>



<p class="Input">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mi>n</mi>
  <mo>=</mo>
  <mn>3</mn>
 </mrow>
</math>
</p>

<p class="CellLabel">
 Out[1]=
</p>



<p class="Output">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mn>3</mn>
</math>
</p>

<p class="Text">
 T&auml;m&auml;n karakteristinen polynomi on my&ouml;s astetta <span>n</span>. Polynomilla olkoon nollakohta <span>r</span>, jonka kertaluku on <span>p</span> (<span>&le; n</span>):
</p>



<p class="CellLabel">
 In[2]:=
</p>



<p class="Input">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mi>p</mi>
  <mo>=</mo>
  <mn>2</mn>
 </mrow>
</math>
</p>

<p class="CellLabel">
 Out[2]=
</p>



<p class="Output">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mn>2</mn>
</math>
</p>

<p class="Text">
 Tarkoituksena on tutkia, onko <span>y = <span><math xmlns='http://www.w3.org/1998/Math/MathML'>
 <msup>
  <mi>x</mi>
  <mi>k</mi>
 </msup>
</math></span> <span><math xmlns='http://www.w3.org/1998/Math/MathML'>
 <msup>
  <mi>&ExponentialE;</mi>
  <mrow>
   <mi>r</mi>
   <mo>&InvisibleTimes;</mo>
   <mi>x</mi>
  </mrow>
 </msup>
</math></span></span> yht&auml;l&ouml;n ratkaisu, kun <span>k = 0,1,2,... ,q</span>&nbsp;&nbsp;(luontevimmin&nbsp;&nbsp;<span>q &ge; p </span>):
</p>



<p class="CellLabel">
 In[3]:=
</p>



<p class="Input">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mi>q</mi>
  <mo>=</mo>
  <mtext> </mtext>
  <mn>3</mn>
 </mrow>
</math>
</p>

<p class="CellLabel">
 Out[3]=
</p>



<p class="Output">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mn>3</mn>
</math>
</p>

<p class="Text">
 Vakiokertoimisten yht&auml;l&ouml;iden teorian mukaan n&auml;in pit&auml;isi olla arvoon <span>k = p-1</span> saakka.
</p>



<p class="Text">
 Differentiaaliyht&auml;l&ouml; on
</p>



<p class="CellLabel">
 In[4]:=
</p>



<p class="Input">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mi>diffyht</mi>
  <mo>=</mo>
  <mtext> </mtext>
  <mrow>
   <mrow>
    <mi>Sum</mi>
    <mo>[</mo>
    <mrow>
     <mrow>
      <msub>
       <mi>a</mi>
       <mi>k</mi>
      </msub>
      <mo>&InvisibleTimes;</mo>
      <mrow>
       <mi>D</mi>
       <mo>[</mo>
       <mrow>
        <mrow>
         <mi>y</mi>
         <mo>[</mo>
         <mi>x</mi>
         <mo>]</mo>
        </mrow>
        <mo>,</mo>
        <mrow>
         <mo>{</mo>
         <mrow>
          <mi>x</mi>
          <mo>,</mo>
          <mi>k</mi>
         </mrow>
         <mo>}</mo>
        </mrow>
       </mrow>
       <mo>]</mo>
      </mrow>
     </mrow>
     <mo>,</mo>
     <mrow>
      <mo>{</mo>
      <mrow>
       <mi>k</mi>
       <mo>,</mo>
       <mn>0</mn>
       <mo>,</mo>
       <mi>n</mi>
      </mrow>
      <mo>}</mo>
     </mrow>
    </mrow>
    <mo>]</mo>
   </mrow>
   <mtext> </mtext>
   <mo>==</mo>
   <mtext> </mtext>
   <mn>0</mn>
  </mrow>
 </mrow>
</math>
</p>

<p class="CellLabel">
 Out[4]=
</p>



<p class="Output">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mrow>
   <mrow>
    <msub>
     <mi>a</mi>
     <mn>0</mn>
    </msub>
    <mo>&InvisibleTimes;</mo>
    <mrow>
     <mi>y</mi>
     <mo>[</mo>
     <mi>x</mi>
     <mo>]</mo>
    </mrow>
   </mrow>
   <mo>+</mo>
   <mrow>
    <msub>
     <mi>a</mi>
     <mn>1</mn>
    </msub>
    <mo>&InvisibleTimes;</mo>
    <mrow>
     <msup>
      <mi>y</mi>
      <mo>&prime;</mo>
     </msup>
     <mo>[</mo>
     <mi>x</mi>
     <mo>]</mo>
    </mrow>
   </mrow>
   <mo>+</mo>
   <mrow>
    <msub>
     <mi>a</mi>
     <mn>2</mn>
    </msub>
    <mo>&InvisibleTimes;</mo>
    <mrow>
     <msup>
      <mi>y</mi>
      <mi>&prime;&prime;</mi>
     </msup>
     <mo>[</mo>
     <mi>x</mi>
     <mo>]</mo>
    </mrow>
   </mrow>
   <mo>+</mo>
   <mrow>
    <msub>
     <mi>a</mi>
     <mn>3</mn>
    </msub>
    <mo>&InvisibleTimes;</mo>
    <mrow>
     <msup>
      <mi>y</mi>
      <mrow>
       <mo>(</mo>
       <mn>3</mn>
       <mo>)</mo>
      </mrow>
     </msup>
     <mo>[</mo>
     <mi>x</mi>
     <mo>]</mo>
    </mrow>
   </mrow>
  </mrow>
  <mo>&Equal;</mo>
  <mn>0</mn>
 </mrow>
</math>
</p>

<p class="Text">
 Karakteristinen yht&auml;l&ouml; saadaan sijoittamalla yht&auml;l&ouml;&ouml;n yrite <span>y = <span><math xmlns='http://www.w3.org/1998/Math/MathML'>
 <msup>
  <mi>&ExponentialE;</mi>
  <mrow>
   <mi>r</mi>
   <mo>&InvisibleTimes;</mo>
   <mi>x</mi>
  </mrow>
 </msup>
</math></span></span> ja jakamalla sijoittamisen j&auml;lkeen eksponenttitekij&auml; pois. Samaan tulokseen p&auml;&auml;st&auml;&auml;n korvaamalla differentiaaliyht&auml;l&ouml;ss&auml; derivaatat vastaavilla muuttujan <span>r</span> potensseilla: 
</p>



<p class="CellLabel">
 In[5]:=
</p>



<p class="Input">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mi>karaktyht</mi>
  <mo>=</mo>
  <mtext> </mtext>
  <mrow>
   <mi>diffyht</mi>
   <mo>/.</mo>
   <mrow>
    <mi>Table</mi>
    <mo>[</mo>
    <mrow>
     <mrow>
      <mrow>
       <mi>D</mi>
       <mo>[</mo>
       <mrow>
        <mrow>
         <mi>y</mi>
         <mo>[</mo>
         <mi>x</mi>
         <mo>]</mo>
        </mrow>
        <mo>,</mo>
        <mrow>
         <mo>{</mo>
         <mrow>
          <mi>x</mi>
          <mo>,</mo>
          <mi>k</mi>
         </mrow>
         <mo>}</mo>
        </mrow>
       </mrow>
       <mo>]</mo>
      </mrow>
      <mo>-&gt;</mo>
      <mrow>
       <mi>r</mi>
       <mo>^</mo>
       <mi>k</mi>
      </mrow>
     </mrow>
     <mo>,</mo>
     <mrow>
      <mo>{</mo>
      <mrow>
       <mi>k</mi>
       <mo>,</mo>
       <mn>0</mn>
       <mo>,</mo>
       <mi>n</mi>
      </mrow>
      <mo>}</mo>
     </mrow>
    </mrow>
    <mo>]</mo>
   </mrow>
  </mrow>
 </mrow>
</math>
</p>

<p class="CellLabel">
 Out[5]=
</p>



<p class="Output">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mrow>
   <msub>
    <mi>a</mi>
    <mn>0</mn>
   </msub>
   <mo>+</mo>
   <mrow>
    <mi>r</mi>
    <mo>&InvisibleTimes;</mo>
    <msub>
     <mi>a</mi>
     <mn>1</mn>
    </msub>
   </mrow>
   <mo>+</mo>
   <mrow>
    <msup>
     <mi>r</mi>
     <mn>2</mn>
    </msup>
    <mo>&InvisibleTimes;</mo>
    <msub>
     <mi>a</mi>
     <mn>2</mn>
    </msub>
   </mrow>
   <mo>+</mo>
   <mrow>
    <msup>
     <mi>r</mi>
     <mn>3</mn>
    </msup>
    <mo>&InvisibleTimes;</mo>
    <msub>
     <mi>a</mi>
     <mn>3</mn>
    </msub>
   </mrow>
  </mrow>
  <mo>&Equal;</mo>
  <mn>0</mn>
 </mrow>
</math>
</p>

<p class="Text">
 Luku <span>r</span> on t&auml;m&auml;n <span>p</span>-kertainen juuri, jos ja vain jos se on my&ouml;s karakteristisen polynomin derivaattojen nollakohta kertalukuun <span>p-1</span> saakka. Kertaluku <span>p</span> voidaan siten karakterisoida seuraavilla ehdoilla:
</p>



<p class="CellLabel">
 In[6]:=
</p>



<p class="Input">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mi>ehdot</mi>
  <mo>=</mo>
  <mtext> </mtext>
  <mrow>
   <mi>Table</mi>
   <mo>[</mo>
   <mrow>
    <mrow>
     <mi>D</mi>
     <mo>[</mo>
     <mrow>
      <mi>karaktyht</mi>
      <mo>,</mo>
      <mrow>
       <mo>{</mo>
       <mrow>
        <mi>r</mi>
        <mo>,</mo>
        <mi>k</mi>
       </mrow>
       <mo>}</mo>
      </mrow>
     </mrow>
     <mo>]</mo>
    </mrow>
    <mo>,</mo>
    <mrow>
     <mo>{</mo>
     <mrow>
      <mi>k</mi>
      <mo>,</mo>
      <mn>0</mn>
      <mo>,</mo>
      <mrow>
       <mi>p</mi>
       <mo>-</mo>
       <mn>1</mn>
      </mrow>
     </mrow>
     <mo>}</mo>
    </mrow>
   </mrow>
   <mo>]</mo>
  </mrow>
 </mrow>
</math>
</p>

<p class="CellLabel">
 Out[6]=
</p>



<p class="Output">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mo>{</mo>
  <mrow>
   <mrow>
    <mrow>
     <msub>
      <mi>a</mi>
      <mn>0</mn>
     </msub>
     <mo>+</mo>
     <mrow>
      <mi>r</mi>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>1</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <msup>
       <mi>r</mi>
       <mn>2</mn>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>2</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <msup>
       <mi>r</mi>
       <mn>3</mn>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>3</mn>
      </msub>
     </mrow>
    </mrow>
    <mo>&Equal;</mo>
    <mn>0</mn>
   </mrow>
   <mo>,</mo>
   <mrow>
    <mrow>
     <msub>
      <mi>a</mi>
      <mn>1</mn>
     </msub>
     <mo>+</mo>
     <mrow>
      <mn>2</mn>
      <mo>&InvisibleTimes;</mo>
      <mi>r</mi>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>2</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <mn>3</mn>
      <mo>&InvisibleTimes;</mo>
      <msup>
       <mi>r</mi>
       <mn>2</mn>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>3</mn>
      </msub>
     </mrow>
    </mrow>
    <mo>&Equal;</mo>
    <mn>0</mn>
   </mrow>
  </mrow>
  <mo>}</mo>
 </mrow>
</math>
</p>

<p class="Text">
 Sijoitetaan ratkaisut <span>y = <span><math xmlns='http://www.w3.org/1998/Math/MathML'>
 <msup>
  <mi>x</mi>
  <mi>k</mi>
 </msup>
</math></span> <span><math xmlns='http://www.w3.org/1998/Math/MathML'>
 <msup>
  <mi>&ExponentialE;</mi>
  <mrow>
   <mi>r</mi>
   <mo>&InvisibleTimes;</mo>
   <mi>x</mi>
  </mrow>
 </msup>
</math></span></span> (<span>0&le;k&le;q</span>) differentiaaliyht&auml;l&ouml;&ouml;n ja tutkitaan, toteutuuko t&auml;m&auml;, kun <span>r</span> t&auml;ytt&auml;&auml; edell&auml; asetetut ehdot:
</p>



<p class="CellLabel">
 In[7]:=
</p>



<p class="Input">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mi>sij</mi>
  <mo>=</mo>
  <mtext> </mtext>
  <mrow>
   <mi>Table</mi>
   <mo>[</mo>
   <mtext> </mtext>
   <mrow>
    <mrow>
     <mi>diffyht</mi>
     <mo>/.</mo>
     <mrow>
      <mi>y</mi>
      <mo>-&gt;</mo>
      <mrow>
       <mi>Function</mi>
       <mo>[</mo>
       <mrow>
        <mi>x</mi>
        <mo>,</mo>
        <mrow>
         <mrow>
          <mi>x</mi>
          <mo>^</mo>
          <mi>k</mi>
         </mrow>
         <mo>&InvisibleTimes;</mo>
         <mrow>
          <mi>Exp</mi>
          <mo>[</mo>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
          <mo>]</mo>
         </mrow>
        </mrow>
       </mrow>
       <mo>]</mo>
      </mrow>
     </mrow>
    </mrow>
    <mo>,</mo>
    <mrow>
     <mo>{</mo>
     <mrow>
      <mi>k</mi>
      <mo>,</mo>
      <mn>0</mn>
      <mo>,</mo>
      <mi>q</mi>
     </mrow>
     <mo>}</mo>
    </mrow>
   </mrow>
   <mo>]</mo>
  </mrow>
 </mrow>
</math>
</p>

<p class="CellLabel">
 Out[7]=
</p>



<p class="Output">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mo>{</mo>
  <mrow>
   <mrow>
    <mrow>
     <mrow>
      <msup>
       <mi>&ExponentialE;</mi>
       <mrow>
        <mi>r</mi>
        <mo>&InvisibleTimes;</mo>
        <mi>x</mi>
       </mrow>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>0</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <msup>
       <mi>&ExponentialE;</mi>
       <mrow>
        <mi>r</mi>
        <mo>&InvisibleTimes;</mo>
        <mi>x</mi>
       </mrow>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <mi>r</mi>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>1</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <msup>
       <mi>&ExponentialE;</mi>
       <mrow>
        <mi>r</mi>
        <mo>&InvisibleTimes;</mo>
        <mi>x</mi>
       </mrow>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msup>
       <mi>r</mi>
       <mn>2</mn>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>2</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <msup>
       <mi>&ExponentialE;</mi>
       <mrow>
        <mi>r</mi>
        <mo>&InvisibleTimes;</mo>
        <mi>x</mi>
       </mrow>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msup>
       <mi>r</mi>
       <mn>3</mn>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>3</mn>
      </msub>
     </mrow>
    </mrow>
    <mo>&Equal;</mo>
    <mn>0</mn>
   </mrow>
   <mo>,</mo>
   <mrow>
    <mrow>
     <mrow>
      <msup>
       <mi>&ExponentialE;</mi>
       <mrow>
        <mi>r</mi>
        <mo>&InvisibleTimes;</mo>
        <mi>x</mi>
       </mrow>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <mi>x</mi>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>0</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <mrow>
       <mo>(</mo>
       <mrow>
        <msup>
         <mi>&ExponentialE;</mi>
         <mrow>
          <mi>r</mi>
          <mo>&InvisibleTimes;</mo>
          <mi>x</mi>
         </mrow>
        </msup>
        <mo>+</mo>
        <mrow>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>r</mi>
         <mo>&InvisibleTimes;</mo>
         <mi>x</mi>
        </mrow>
       </mrow>
       <mo>)</mo>
      </mrow>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>1</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <mrow>
       <mo>(</mo>
       <mrow>
        <mrow>
         <mn>2</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>r</mi>
        </mrow>
        <mo>+</mo>
        <mrow>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>r</mi>
          <mn>2</mn>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>x</mi>
        </mrow>
       </mrow>
       <mo>)</mo>
      </mrow>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>2</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <mrow>
       <mo>(</mo>
       <mrow>
        <mrow>
         <mn>3</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>r</mi>
          <mn>2</mn>
         </msup>
        </mrow>
        <mo>+</mo>
        <mrow>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>r</mi>
          <mn>3</mn>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>x</mi>
        </mrow>
       </mrow>
       <mo>)</mo>
      </mrow>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>3</mn>
      </msub>
     </mrow>
    </mrow>
    <mo>&Equal;</mo>
    <mn>0</mn>
   </mrow>
   <mo>,</mo>
   <mrow>
    <mrow>
     <mrow>
      <msup>
       <mi>&ExponentialE;</mi>
       <mrow>
        <mi>r</mi>
        <mo>&InvisibleTimes;</mo>
        <mi>x</mi>
       </mrow>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msup>
       <mi>x</mi>
       <mn>2</mn>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>0</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <mrow>
       <mo>(</mo>
       <mrow>
        <mrow>
         <mn>2</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>x</mi>
        </mrow>
        <mo>+</mo>
        <mrow>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>r</mi>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>x</mi>
          <mn>2</mn>
         </msup>
        </mrow>
       </mrow>
       <mo>)</mo>
      </mrow>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>1</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <mrow>
       <mo>(</mo>
       <mrow>
        <mrow>
         <mn>2</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
        </mrow>
        <mo>+</mo>
        <mrow>
         <mn>4</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>r</mi>
         <mo>&InvisibleTimes;</mo>
         <mi>x</mi>
        </mrow>
        <mo>+</mo>
        <mrow>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>r</mi>
          <mn>2</mn>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>x</mi>
          <mn>2</mn>
         </msup>
        </mrow>
       </mrow>
       <mo>)</mo>
      </mrow>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>2</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <mrow>
       <mo>(</mo>
       <mrow>
        <mrow>
         <mn>6</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>r</mi>
        </mrow>
        <mo>+</mo>
        <mrow>
         <mn>6</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>r</mi>
          <mn>2</mn>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>x</mi>
        </mrow>
        <mo>+</mo>
        <mrow>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>r</mi>
          <mn>3</mn>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>x</mi>
          <mn>2</mn>
         </msup>
        </mrow>
       </mrow>
       <mo>)</mo>
      </mrow>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>3</mn>
      </msub>
     </mrow>
    </mrow>
    <mo>&Equal;</mo>
    <mn>0</mn>
   </mrow>
   <mo>,</mo>
   <mrow>
    <mrow>
     <mrow>
      <msup>
       <mi>&ExponentialE;</mi>
       <mrow>
        <mi>r</mi>
        <mo>&InvisibleTimes;</mo>
        <mi>x</mi>
       </mrow>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msup>
       <mi>x</mi>
       <mn>3</mn>
      </msup>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>0</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <mrow>
       <mo>(</mo>
       <mrow>
        <mrow>
         <mn>3</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>x</mi>
          <mn>2</mn>
         </msup>
        </mrow>
        <mo>+</mo>
        <mrow>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>r</mi>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>x</mi>
          <mn>3</mn>
         </msup>
        </mrow>
       </mrow>
       <mo>)</mo>
      </mrow>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>1</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <mrow>
       <mo>(</mo>
       <mrow>
        <mrow>
         <mn>6</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>x</mi>
        </mrow>
        <mo>+</mo>
        <mrow>
         <mn>6</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>r</mi>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>x</mi>
          <mn>2</mn>
         </msup>
        </mrow>
        <mo>+</mo>
        <mrow>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>r</mi>
          <mn>2</mn>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>x</mi>
          <mn>3</mn>
         </msup>
        </mrow>
       </mrow>
       <mo>)</mo>
      </mrow>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>2</mn>
      </msub>
     </mrow>
     <mo>+</mo>
     <mrow>
      <mrow>
       <mo>(</mo>
       <mrow>
        <mrow>
         <mn>6</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
        </mrow>
        <mo>+</mo>
        <mrow>
         <mn>18</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <mi>r</mi>
         <mo>&InvisibleTimes;</mo>
         <mi>x</mi>
        </mrow>
        <mo>+</mo>
        <mrow>
         <mn>9</mn>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>r</mi>
          <mn>2</mn>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>x</mi>
          <mn>2</mn>
         </msup>
        </mrow>
        <mo>+</mo>
        <mrow>
         <msup>
          <mi>&ExponentialE;</mi>
          <mrow>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>r</mi>
          <mn>3</mn>
         </msup>
         <mo>&InvisibleTimes;</mo>
         <msup>
          <mi>x</mi>
          <mn>3</mn>
         </msup>
        </mrow>
       </mrow>
       <mo>)</mo>
      </mrow>
      <mo>&InvisibleTimes;</mo>
      <msub>
       <mi>a</mi>
       <mn>3</mn>
      </msub>
     </mrow>
    </mrow>
    <mo>&Equal;</mo>
    <mn>0</mn>
   </mrow>
  </mrow>
  <mo>}</mo>
 </mrow>
</math>
</p>

<p class="CellLabel">
 In[8]:=
</p>



<p class="Input">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mi>Simplify</mi>
  <mo>[</mo>
  <mrow>
   <mi>sij</mi>
   <mo>,</mo>
   <mi>ehdot</mi>
  </mrow>
  <mo>]</mo>
 </mrow>
</math>
</p>

<p class="CellLabel">
 Out[8]=
</p>



<p class="Output">
 <math xmlns='http://www.w3.org/1998/Math/MathML'>
 <mrow>
  <mo>{</mo>
  <mrow>
   <mi>True</mi>
   <mo>,</mo>
   <mi>True</mi>
   <mo>,</mo>
   <mrow>
    <mrow>
     <msup>
      <mi>&ExponentialE;</mi>
      <mrow>
       <mi>r</mi>
       <mo>&InvisibleTimes;</mo>
       <mi>x</mi>
      </mrow>
     </msup>
     <mo>&InvisibleTimes;</mo>
     <mrow>
      <mo>(</mo>
      <mrow>
       <msub>
        <mi>a</mi>
        <mn>2</mn>
       </msub>
       <mo>+</mo>
       <mrow>
        <mn>3</mn>
        <mo>&InvisibleTimes;</mo>
        <mi>r</mi>
        <mo>&InvisibleTimes;</mo>
        <msub>
         <mi>a</mi>
         <mn>3</mn>
        </msub>
       </mrow>
      </mrow>
      <mo>)</mo>
     </mrow>
    </mrow>
    <mo>&Equal;</mo>
    <mn>0</mn>
   </mrow>
   <mo>,</mo>
   <mrow>
    <mrow>
     <msup>
      <mi>&ExponentialE;</mi>
      <mrow>
       <mi>r</mi>
       <mo>&InvisibleTimes;</mo>
       <mi>x</mi>
      </mrow>
     </msup>
     <mo>&InvisibleTimes;</mo>
     <mrow>
      <mo>(</mo>
      <mrow>
       <mrow>
        <mi>x</mi>
        <mo>&InvisibleTimes;</mo>
        <msub>
         <mi>a</mi>
         <mn>2</mn>
        </msub>
       </mrow>
       <mo>+</mo>
       <mrow>
        <mrow>
         <mo>(</mo>
         <mrow>
          <mn>1</mn>
          <mo>+</mo>
          <mrow>
           <mn>3</mn>
           <mo>&InvisibleTimes;</mo>
           <mi>r</mi>
           <mo>&InvisibleTimes;</mo>
           <mi>x</mi>
          </mrow>
         </mrow>
         <mo>)</mo>
        </mrow>
        <mo>&InvisibleTimes;</mo>
        <msub>
         <mi>a</mi>
         <mn>3</mn>
        </msub>
       </mrow>
      </mrow>
      <mo>)</mo>
     </mrow>
    </mrow>
    <mo>&Equal;</mo>
    <mn>0</mn>
   </mrow>
  </mrow>
  <mo>}</mo>
 </mrow>
</math>
</p>

<p class="Text">
 Yht&auml;l&ouml;n toteuttavia ratkaisuja n&auml;ytt&auml;&auml; todellakin olevan nollakohdan <span>r</span> kertaluvun <span>p</span> mukainen m&auml;&auml;r&auml;, kuten teorian mukaan pit&auml;&auml;kin.
</p>



<p class="Text">
 Polynomiehtojen k&auml;sittelyyn symboliset laskentaj&auml;rjestelm&auml;t kuten <span style='text-decoration: none;'>Mathematica</span> k&auml;ytt&auml;v&auml;t ns. <span style='font-style: italic;'>Gr&ouml;bnerin kantoja</span>. Probleeman monimutkaistuessa n&auml;iden k&auml;ytt&ouml; tulee kuitenkin raskaaksi hyvin nopeasti. Vaikka edell&auml; oleva lasku voidankin periaatteessa laskea mill&auml; tahansa arvoilla <span>n</span>, <span>p</span>, <span>q</span>, laskenta alkaa arvojen kasvaessa vaatia aikaa ja muistia todella paljon. Lukija kokeilkoon!
</p>



<p><b>Linkkej&auml;</b></p>

<p>
<a href="../xml/algvkh.xml">vakiokertoiminen homogeeniyht&auml;l&ouml;</a><br/>
</p>

<p style='font-style: italic;'>
 SKK 27.04.2001
</p>

<hr />

<p style='font-family: Helvetica; font-size: 10px;'>Created by
 <a href="http://www.wolfram.com"><span style='font-style: italic'>Mathematica</span></a>
 &nbsp;(April 13, 2005)</p>
</body>

</html>
