<?xml version="1.0"?>
<div class="add">

<b>let </b><font color="Maroon">c<sub>1</sub></font> be  non <a href="xboole_0.html#V1">empty</a> <a href="nat_1.html#NM1">Nat</a>;<br/><b>let </b><font color="Maroon">c<sub>2</sub></font>, <font color="Maroon">c<sub>3</sub></font>, <font color="Maroon">c<sub>4</sub></font> be   <a href="int_1.html#NM1">Integer</a>;<br/><b>let </b><font color="Maroon">c<sub>5</sub></font> be   <a href="struct_0.html#NM1">Element</a> of <a href="complfld.html#K1">F_Complex</a> ;<br/>





<b>assume </b><b>that </b><br/><a NAME="E1:69"/><i><font color="Green">E61</font></i>: 
<font color="Maroon">c<sub>5</sub></font> <a href="hidden.html#R1">=</a> <font color="Maroon">c<sub>4</sub></font>
 <b>and </b><br/><a NAME="E2:69"/><i><font color="Green">E62</font></i>: 
<font color="Maroon">c<sub>2</sub></font> <a href="hidden.html#R1">=</a>  <a href="polynom4.html#K2">eval</a> <span class="p1">(<span class="default"><a href="uniroots.html#K6" target="_self">cyclotomic_poly</a> <font color="Maroon">c<sub>1</sub></font></span>)</span>,<font color="Maroon">c<sub>5</sub></font>
 <b>and </b><br/><a NAME="E3:69"/><i><font color="Green">E63</font></i>: 
<font color="Maroon">c<sub>3</sub></font> <a href="hidden.html#R1">=</a>  <a href="polynom4.html#K2">eval</a> <span class="p1">(<span class="default"><a href="uniroots.html#K4" target="_self">unital_poly</a> <a href="complfld.html#K1">F_Complex</a> ,<font color="Maroon">c<sub>1</sub></font></span>)</span>,<font color="Maroon">c<sub>5</sub></font>
 ;<br/>

<b>set </b><font color="Maroon">c<sub>6</sub></font> =  <a href="polynom4.html#K2">eval</a> <span class="p1">(<span class="default"><a href="uniroots.html#K6" target="_self">cyclotomic_poly</a> <font color="Maroon">c<sub>1</sub></font></span>)</span>,<font color="Maroon">c<sub>5</sub></font>;<br/>
<b>reconsider </b><font color="Maroon">c<sub>7</sub></font> =  <a href="polynom4.html#K2">eval</a> <span class="p1">(<span class="default"><a href="uniroots.html#K6" target="_self">cyclotomic_poly</a> <font color="Maroon">c<sub>1</sub></font></span>)</span>,<font color="Maroon">c<sub>5</sub></font> as    <a href="subset_1.html#M1">Element</a> of  <a href="numbers.html#K2">COMPLEX</a>  <b>by </b><i><a class="ref" href="complfld.html#D1">COMPLFLD:def 1</a></i>;<br/>
<div><a class="txt" onclick="hsNdiv(this)" href="javascript:()" title="69_1"><b>per </b></a><a class="txt" onclick="hs(this)" href="javascript:()"><b>cases </b></a><span class="hide"><a NAME="E1:69_1"/>
( <font color="Maroon">c<sub>1</sub></font> <a href="hidden.html#R1">=</a> 1 or <font color="Maroon">c<sub>1</sub></font> <a href="xxreal_0.html#NR4" target="_self">&gt;</a> 1 )
 </span><b>by </b><i><a class="ref" href="uproots.html#T1">UPROOTS:1</a></i>;<br/><div class="add"><div><a class="txt" onclick="hsNdiv(this)" href="javascript:()" title="69_1_1"><b>suppose </b></a><a NAME="E1:69_1_1"/>
<font color="Maroon">c<sub>1</sub></font> <a href="hidden.html#R1">=</a> 1
 ;<br/><div class="add"><b>hence </b><a NAME="E2:69_1_1"/>
<font color="Maroon">c<sub>2</sub></font> <a href="int_1.html#R2">divides</a> <font color="Maroon">c<sub>3</sub></font>
 <b>by </b><i><a class="txt" href="uniroots.html#E2:69"><i><font color="Green">E62</font></i></a>, <a class="txt" href="uniroots.html#E3:69"><i><font color="Green">E63</font></i></a>, <a class="ref" href="uniroots.html#T41" target="_self">Th41</a>, <a class="ref" href="uniroots.html#T52" target="_self">Th52</a></i>;<br/></div><b>end;</b></div><div><a class="txt" onclick="hsNdiv(this)" href="javascript:()" title="69_1_2"><b>suppose </b></a><a NAME="E1:69_1_2"/><i><font color="Green">E64</font></i>: 
<font color="Maroon">c<sub>1</sub></font> <a href="xxreal_0.html#NR4" target="_self">&gt;</a> 1
 ;<br/><div class="add"><a NAME="E2:69_1_2"/>
1 <a href="nat_1.html#R1">divides</a> <font color="Maroon">c<sub>1</sub></font>
 <b>by </b><i><a class="ref" href="nat_1.html#T53">NAT_1:53</a></i>;<br/><b>then consider </b><font color="Maroon">c<sub>8</sub></font> being    <a href="finseq_1.html#M2">FinSequence</a> of the <a href="struct_0.html#U1">carrier</a> of <span class="p1">(<span class="default"><a href="polynom3.html#K16">Polynom-Ring</a> <a href="complfld.html#K1">F_Complex</a> </span>)</span>, <font color="Maroon">c<sub>9</sub></font> being   <a href="polynom3.html#NM1">Polynomial</a> of <a href="complfld.html#K1">F_Complex</a> <b> such that </b><br/><a NAME="E4:69_1_2"/><i><font color="Green">E65</font></i>: 
<font color="Maroon">c<sub>9</sub></font> <a href="hidden.html#R1">=</a>  <a href="group_4.html#K3">Product</a> <font color="Maroon">c<sub>8</sub></font>
 <b>and </b><br/><a NAME="E5:69_1_2"/><i><font color="Green">E66</font></i>: 
 <a href="finsop_1.html#K5">dom</a> <font color="Maroon">c<sub>8</sub></font> <a href="hidden.html#R1">=</a>  <a href="finseq_1.html#K2">Seg</a> <font color="Maroon">c<sub>1</sub></font>
 <b>and </b><br/><a NAME="E6:69_1_2"/><i><font color="Green">E67</font></i>: 
for <font color="Olive">b<sub>1</sub></font> being non <a href="xboole_0.html#V1">empty</a> <a href="nat_1.html#NM1">Nat</a> st <font color="Olive">b<sub>1</sub></font> <a href="hidden.html#R2">in</a>  <a href="finseq_1.html#K2">Seg</a> <font color="Maroon">c<sub>1</sub></font> holds <br/>( ( (  not <font color="Olive">b<sub>1</sub></font> <a href="nat_1.html#R1">divides</a> <font color="Maroon">c<sub>1</sub></font> or <font color="Olive">b<sub>1</sub></font> <a href="nat_1.html#R1">divides</a> 1 or <font color="Olive">b<sub>1</sub></font> <a href="hidden.html#R1">=</a> <font color="Maroon">c<sub>1</sub></font> ) implies <font color="Maroon">c<sub>8</sub></font> <a href="funct_1.html#K1">.</a> <font color="Olive">b<sub>1</sub></font> <a href="hidden.html#R1">=</a> <span class="p1"><a href="algseq_1.html#K5">&lt;%</a><span class="default"><span class="p2">(<span class="default"><a href="group_1.html#K2">1.</a> <a href="complfld.html#K1">F_Complex</a> </span>)</span></span><a href="algseq_1.html#K5">%&gt;</a></span> ) &amp; ( <font color="Olive">b<sub>1</sub></font> <a href="nat_1.html#R1">divides</a> <font color="Maroon">c<sub>1</sub></font> &amp; not <font color="Olive">b<sub>1</sub></font> <a href="nat_1.html#R1">divides</a> 1 &amp; <font color="Olive">b<sub>1</sub></font> <a href="hidden.html#NR2" target="_self">&lt;&gt;</a> <font color="Maroon">c<sub>1</sub></font> implies <font color="Maroon">c<sub>8</sub></font> <a href="funct_1.html#K1">.</a> <font color="Olive">b<sub>1</sub></font> <a href="hidden.html#R1">=</a>  <a href="uniroots.html#K6" target="_self">cyclotomic_poly</a> <font color="Olive">b<sub>1</sub></font> ) )
 <b>and </b><br/><a NAME="E7:69_1_2"/><i><font color="Green">E68</font></i>: 
 <a href="uniroots.html#K4" target="_self">unital_poly</a> <a href="complfld.html#K1">F_Complex</a> ,<font color="Maroon">c<sub>1</sub></font> <a href="funct_2.html#R2">=</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="uniroots.html#K4" target="_self">unital_poly</a> <a href="complfld.html#K1">F_Complex</a> ,1</span>)</span> <a href="polynom3.html#K15">*'</a> <span class="p2">(<span class="default"><a href="uniroots.html#K6" target="_self">cyclotomic_poly</a> <font color="Maroon">c<sub>1</sub></font></span>)</span></span>)</span> <a href="polynom3.html#K15">*'</a> <font color="Maroon">c<sub>9</sub></font>
 <b>by </b><i><a class="txt" href="uniroots.html#E1:69_1_2"><i><font color="Green">E64</font></i></a>, <a class="ref" href="uniroots.html#T58" target="_self">Th58</a></i>;<br/><b>set </b><font color="Maroon">c<sub>10</sub></font> =  <a href="polynom4.html#K2">eval</a> <font color="Maroon">c<sub>9</sub></font>,<font color="Maroon">c<sub>5</sub></font>;<br/><div><a class="txt" onclick="hs2(this)" href="javascript:()" title="69_1_2_1"><b>now </b></a><div class="add"><b>let </b><font color="Maroon">c<sub>11</sub></font> be  non <a href="xboole_0.html#V1">empty</a> <a href="nat_1.html#NM1">Nat</a>;<br/><b>assume </b><a NAME="E1:69_1_2_1"/><i><font color="Green">E69</font></i>: 
<font color="Maroon">c<sub>11</sub></font> <a href="hidden.html#R2">in</a>  <a href="finsop_1.html#K5">dom</a> <font color="Maroon">c<sub>8</sub></font>
 ;<br/><div><a class="txt" onclick="hsNdiv(this)" href="javascript:()" title="69_1_2_1_1"><b>per </b></a><a class="txt" onclick="hs(this)" href="javascript:()"><b>cases </b></a><span class="hide"><a NAME="E1:69_1_2_1_1"/>
(  not <font color="Maroon">c<sub>11</sub></font> <a href="nat_1.html#R1">divides</a> <font color="Maroon">c<sub>1</sub></font> or <font color="Maroon">c<sub>11</sub></font> <a href="nat_1.html#R1">divides</a> 1 or <font color="Maroon">c<sub>11</sub></font> <a href="hidden.html#R1">=</a> <font color="Maroon">c<sub>1</sub></font> or ( <font color="Maroon">c<sub>11</sub></font> <a href="nat_1.html#R1">divides</a> <font color="Maroon">c<sub>1</sub></font> &amp; not <font color="Maroon">c<sub>11</sub></font> <a href="nat_1.html#R1">divides</a> 1 &amp; <font color="Maroon">c<sub>11</sub></font> <a href="hidden.html#NR2" target="_self">&lt;&gt;</a> <font color="Maroon">c<sub>1</sub></font> ) )
 </span>;<br/><div class="add"><div><a class="txt" onclick="hsNdiv(this)" href="javascript:()" title="69_1_2_1_1_1"><b>suppose </b></a><a NAME="E1:69_1_2_1_1_1"/>
(  not <font color="Maroon">c<sub>11</sub></font> <a href="nat_1.html#R1">divides</a> <font color="Maroon">c<sub>1</sub></font> or <font color="Maroon">c<sub>11</sub></font> <a href="nat_1.html#R1">divides</a> 1 or <font color="Maroon">c<sub>11</sub></font> <a href="hidden.html#R1">=</a> <font color="Maroon">c<sub>1</sub></font> )
 ;<br/><div class="add"><b>hence </b><a NAME="E2:69_1_2_1_1_1"/>
( <font color="Maroon">c<sub>8</sub></font> <a href="funct_1.html#K1">.</a> <font color="Maroon">c<sub>11</sub></font> <a href="hidden.html#R1">=</a> <span class="p1"><a href="algseq_1.html#K5">&lt;%</a><span class="default"><span class="p2">(<span class="default"><a href="group_1.html#K2">1.</a> <a href="complfld.html#K1">F_Complex</a> </span>)</span></span><a href="algseq_1.html#K5">%&gt;</a></span> or <font color="Maroon">c<sub>8</sub></font> <a href="funct_1.html#K1">.</a> <font color="Maroon">c<sub>11</sub></font> <a href="hidden.html#R1">=</a>  <a href="uniroots.html#K6" target="_self">cyclotomic_poly</a> <font color="Maroon">c<sub>11</sub></font> )
 <b>by </b><i><a class="txt" href="uniroots.html#E5:69_1_2"><i><font color="Green">E66</font></i></a>, <a class="txt" href="uniroots.html#E6:69_1_2"><i><font color="Green">E67</font></i></a>, <a class="txt" href="uniroots.html#E1:69_1_2_1"><i><font color="Green">E69</font></i></a></i>;<br/></div><b>end;</b></div><div><a class="txt" onclick="hsNdiv(this)" href="javascript:()" title="69_1_2_1_1_2"><b>suppose </b></a><a NAME="E1:69_1_2_1_1_2"/>
( <font color="Maroon">c<sub>11</sub></font> <a href="nat_1.html#R1">divides</a> <font color="Maroon">c<sub>1</sub></font> &amp; not <font color="Maroon">c<sub>11</sub></font> <a href="nat_1.html#R1">divides</a> 1 &amp; <font color="Maroon">c<sub>11</sub></font> <a href="hidden.html#NR2" target="_self">&lt;&gt;</a> <font color="Maroon">c<sub>1</sub></font> )
 ;<br/><div class="add"><b>hence </b><a NAME="E2:69_1_2_1_1_2"/>
( <font color="Maroon">c<sub>8</sub></font> <a href="funct_1.html#K1">.</a> <font color="Maroon">c<sub>11</sub></font> <a href="hidden.html#R1">=</a> <span class="p1"><a href="algseq_1.html#K5">&lt;%</a><span class="default"><span class="p2">(<span class="default"><a href="group_1.html#K2">1.</a> <a href="complfld.html#K1">F_Complex</a> </span>)</span></span><a href="algseq_1.html#K5">%&gt;</a></span> or <font color="Maroon">c<sub>8</sub></font> <a href="funct_1.html#K1">.</a> <font color="Maroon">c<sub>11</sub></font> <a href="hidden.html#R1">=</a>  <a href="uniroots.html#K6" target="_self">cyclotomic_poly</a> <font color="Maroon">c<sub>11</sub></font> )
 <b>by </b><i><a class="txt" href="uniroots.html#E5:69_1_2"><i><font color="Green">E66</font></i></a>, <a class="txt" href="uniroots.html#E6:69_1_2"><i><font color="Green">E67</font></i></a>, <a class="txt" href="uniroots.html#E1:69_1_2_1"><i><font color="Green">E69</font></i></a></i>;<br/></div><b>end;</b></div></div><b>end;</b></div></div><b>end;</b></div><b>then reconsider </b><font color="Maroon">c<sub>11</sub></font> =  <a href="polynom4.html#K2">eval</a> <font color="Maroon">c<sub>9</sub></font>,<font color="Maroon">c<sub>5</sub></font> as   <a href="int_1.html#NM1">Integer</a> <b>by </b><i><a class="txt" href="uniroots.html#E1:69"><i><font color="Green">E61</font></i></a>, <a class="txt" href="uniroots.html#E4:69_1_2"><i><font color="Green">E65</font></i></a>, <a class="ref" href="uniroots.html#T59" target="_self">Th59</a></i>;<br/><b>reconsider </b><font color="Maroon">c<sub>12</sub></font> =  <a href="polynom4.html#K2">eval</a> <font color="Maroon">c<sub>9</sub></font>,<font color="Maroon">c<sub>5</sub></font> as    <a href="subset_1.html#M1">Element</a> of  <a href="numbers.html#K2">COMPLEX</a>  <b>by </b><i><a class="ref" href="complfld.html#D1">COMPLFLD:def 1</a></i>;<br/><b>set </b><font color="Maroon">c<sub>13</sub></font> =  <a href="polynom4.html#K2">eval</a> <span class="p1">(<span class="default"><a href="uniroots.html#K4" target="_self">unital_poly</a> <a href="complfld.html#K1">F_Complex</a> ,1</span>)</span>,<font color="Maroon">c<sub>5</sub></font>;<br/><b>reconsider </b><font color="Maroon">c<sub>14</sub></font> =  <a href="polynom4.html#K2">eval</a> <span class="p1">(<span class="default"><a href="uniroots.html#K4" target="_self">unital_poly</a> <a href="complfld.html#K1">F_Complex</a> ,1</span>)</span>,<font color="Maroon">c<sub>5</sub></font> as   <a href="int_1.html#NM1">Integer</a> <b>by </b><i><a class="txt" href="uniroots.html#E1:69"><i><font color="Green">E61</font></i></a>, <a class="ref" href="uniroots.html#T51" target="_self">Th51</a></i>;<br/><b>reconsider </b><font color="Maroon">c<sub>15</sub></font> =  <a href="polynom4.html#K2">eval</a> <span class="p1">(<span class="default"><a href="uniroots.html#K4" target="_self">unital_poly</a> <a href="complfld.html#K1">F_Complex</a> ,1</span>)</span>,<font color="Maroon">c<sub>5</sub></font> as    <a href="subset_1.html#M1">Element</a> of  <a href="numbers.html#K2">COMPLEX</a>  <b>by </b><i><a class="ref" href="complfld.html#D1">COMPLFLD:def 1</a></i>;<br/><a NAME="E13:69_1_2"/>
<font color="Maroon">c<sub>3</sub></font> <a href="hidden.html#R1">=</a> <span class="p1">(<span class="default"><a href="polynom4.html#K2">eval</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="uniroots.html#K4" target="_self">unital_poly</a> <a href="complfld.html#K1">F_Complex</a> ,1</span>)</span> <a href="polynom3.html#K15">*'</a> <span class="p3">(<span class="default"><a href="uniroots.html#K6" target="_self">cyclotomic_poly</a> <font color="Maroon">c<sub>1</sub></font></span>)</span></span>)</span>,<font color="Maroon">c<sub>5</sub></font></span>)</span> <a href="group_1.html#K10">*</a> <span class="p1">(<span class="default"><a href="polynom4.html#K2">eval</a> <font color="Maroon">c<sub>9</sub></font>,<font color="Maroon">c<sub>5</sub></font></span>)</span>
 <b>by </b><i><a class="txt" href="uniroots.html#E3:69"><i><font color="Green">E63</font></i></a>, <a class="txt" href="uniroots.html#E7:69_1_2"><i><font color="Green">E68</font></i></a>, <a class="ref" href="polynom4.html#T27">POLYNOM4:27</a></i>;<br/><a NAME="E14:69_1_2"/><b>then </b><i><font color="Green">E69</font></i>: 
<font color="Maroon">c<sub>3</sub></font> <a href="hidden.html#R1">=</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="polynom4.html#K2">eval</a> <span class="p3">(<span class="default"><a href="uniroots.html#K4" target="_self">unital_poly</a> <a href="complfld.html#K1">F_Complex</a> ,1</span>)</span>,<font color="Maroon">c<sub>5</sub></font></span>)</span> <a href="group_1.html#K10">*</a> <span class="p2">(<span class="default"><a href="polynom4.html#K2">eval</a> <span class="p3">(<span class="default"><a href="uniroots.html#K6" target="_self">cyclotomic_poly</a> <font color="Maroon">c<sub>1</sub></font></span>)</span>,<font color="Maroon">c<sub>5</sub></font></span>)</span></span>)</span> <a href="group_1.html#K10">*</a> <span class="p1">(<span class="default"><a href="polynom4.html#K2">eval</a> <font color="Maroon">c<sub>9</sub></font>,<font color="Maroon">c<sub>5</sub></font></span>)</span>
 <b>by </b><i><a class="ref" href="polynom4.html#T27">POLYNOM4:27</a></i>;<br/><a NAME="E15:69_1_2"/>
<span class="p1">(<span class="default"><a href="polynom4.html#K2">eval</a> <span class="p2">(<span class="default"><a href="uniroots.html#K4" target="_self">unital_poly</a> <a href="complfld.html#K1">F_Complex</a> ,1</span>)</span>,<font color="Maroon">c<sub>5</sub></font></span>)</span> <a href="group_1.html#K10">*</a> <span class="p1">(<span class="default"><a href="polynom4.html#K2">eval</a> <span class="p2">(<span class="default"><a href="uniroots.html#K6" target="_self">cyclotomic_poly</a> <font color="Maroon">c<sub>1</sub></font></span>)</span>,<font color="Maroon">c<sub>5</sub></font></span>)</span> <a href="hidden.html#R1">=</a> <font color="Maroon">c<sub>15</sub></font> <a href="binop_2.html#K5">*</a> <font color="Maroon">c<sub>7</sub></font>
 <b>by </b><i><a class="ref" href="complfld.html#T6">COMPLFLD:6</a></i>;<br/><a NAME="E16:69_1_2"/><b>then </b>
<font color="Maroon">c<sub>3</sub></font> <a href="hidden.html#R1">=</a> <span class="p1">(<span class="default"><font color="Maroon">c<sub>15</sub></font> <a href="binop_2.html#K5">*</a> <font color="Maroon">c<sub>7</sub></font></span>)</span> <a href="binop_2.html#K5">*</a> <font color="Maroon">c<sub>12</sub></font>
 <b>by </b><i><a class="txt" href="uniroots.html#E14:69_1_2"><i><font color="Green">E69</font></i></a>, <a class="ref" href="complfld.html#T6">COMPLFLD:6</a></i>;<br/><a NAME="E17:69_1_2"/><b>then </b>
<font color="Maroon">c<sub>3</sub></font> <a href="hidden.html#R1">=</a> <span class="p1">(<span class="default"><font color="Maroon">c<sub>14</sub></font> <a href="xcmplx_0.html#K3">*</a> <font color="Maroon">c<sub>11</sub></font></span>)</span> <a href="xcmplx_0.html#K3">*</a> <font color="Maroon">c<sub>2</sub></font>
 <b>by </b><i><a class="txt" href="uniroots.html#E2:69"><i><font color="Green">E62</font></i></a></i>;<br/><b>hence </b><a NAME="E18:69_1_2"/>
<font color="Maroon">c<sub>2</sub></font> <a href="int_1.html#R2">divides</a> <font color="Maroon">c<sub>3</sub></font>
 <b>by </b><i><a class="ref" href="int_1.html#D9">INT_1:def 9</a></i>;<br/></div><b>end;</b></div></div><b>end;</b></div>

</div>
