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

<b>let </b><font color="Maroon" title="c1">L</font> be  <a href="polynom5.html#V2" title="POLYNOM5:attr.2">algebraic-closed</a> <a href="vectsp_2.html#NM2" title="VECTSP_2:NM.2">domRing</a>;<br/><b>let </b><font color="Maroon" title="c2">p</font> be  <a href="uproots.html#V1" title="UPROOTS:attr.1">non-zero</a> <a href="polynom3.html#NM1" title="POLYNOM3:NM.1">Polynomial</a> of <font color="Maroon" title="c1">L</font>;<br/>



<b>assume </b><a NAME="E1:90"/><i><font color="Green" title="E73">A1</font></i>: 
<font color="Maroon" title="c2">p</font> <a href="seq_1.html#K2" title="SEQ_1:func.2">.</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c2">p</font></span>)</span> <a href="binarith.html#K3" title="BINARITH:func.3">-'</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font>
 ;<br/>

<a NAME="E2:90"/>
 <a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c2">p</font> <a href="xxreal_0.html#NR4" title="XXREAL_0:NR.4">&gt;</a>  <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
 
<b>by </b><i><a class="ref" href="uproots.html#T19" target="_self" title="UPROOTS:th.19">Th19</a></i>;<br/>
<a NAME="E3:90"/><b>then </b><i><font color="Green" title="E74">A2</font></i>: 
 <a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c2">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a>  <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1
 
<b>by </b><i><a class="ref" href="nat_1.html#T13" title="NAT_1:th.13">NAT_1:13</a></i>;<br/>
<b>defpred </b><font color="Maroon">S<sub>1</sub></font>[  <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>] <b>means </b>for <font color="Olive" title="b1">p</font> being <a href="uproots.html#V1" title="UPROOTS:attr.1">non-zero</a> <a href="polynom3.html#NM1" title="POLYNOM3:NM.1">Polynomial</a> of <font color="Maroon" title="c1">L</font>  st  <a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Olive" title="b1">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> $1 &amp; $1 <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Olive" title="b1">p</font> <a href="seq_1.html#K2" title="SEQ_1:func.2">.</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Olive" title="b1">p</font></span>)</span> <a href="binarith.html#K3" title="BINARITH:func.3">-'</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font> holds <br/><font color="Olive" title="b1">p</font> <a href="funct_2.html#R2" title="FUNCT_2:pred.2">=</a>  <a href="uproots.html#K10" title="UPROOTS:func.10">poly_with_roots</a> <span class="p1">(<span class="default"><a href="uproots.html#K8" title="UPROOTS:func.8">BRoots</a> <font color="Olive" title="b1">p</font></span>)</span>;<br/>
<a NAME="E4:90"/><i><font color="Green" title="E75">A3</font></i>: 
<font color="Maroon">S<sub>1</sub></font>[1]
 
<div><a class="txt" onclick="hs2(this)" href="javascript:()" title="90_1"><b>proof </b></a><div class="add">

<b>let </b><font color="Maroon" title="c3">p</font> be  <a href="uproots.html#V1" title="UPROOTS:attr.1">non-zero</a> <a href="polynom3.html#NM1" title="POLYNOM3:NM.1">Polynomial</a> of <font color="Maroon" title="c1">L</font>;<br/>

<b>assume </b><b>that </b><br/><a NAME="E1:90_1"/><i><font color="Green" title="E76">A4</font></i>: 
 <a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c3">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> 1
 <b>and </b><br/><a NAME="E2:90_1"/>
1 <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1
 <b>and </b><br/><a NAME="E3:90_1"/><i><font color="Green" title="E77">A5</font></i>: 
<font color="Maroon" title="c3">p</font> <a href="seq_1.html#K2" title="SEQ_1:func.2">.</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c3">p</font></span>)</span> <a href="binarith.html#K3" title="BINARITH:func.3">-'</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font>
 ;<br/>

<a NAME="E4:90_1"/>
 <a href="uproots.html#K4" title="UPROOTS:func.4">degree</a> <span class="p1">(<span class="default"><a href="uproots.html#K8" title="UPROOTS:func.8">BRoots</a> <font color="Maroon" title="c3">p</font></span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
 
<b>by </b><i><a class="txt" href="uproots.html#E1:90_1"><i><font color="Green" title="E76">A4</font></i></a>, <a class="ref" href="uproots.html#T59" target="_self" title="UPROOTS:th.59">Th59</a></i>;<br/>
<a NAME="E5:90_1"/><b>then </b><i><font color="Green" title="E78">A6</font></i>: 
 <a href="uproots.html#K8" title="UPROOTS:func.8">BRoots</a> <font color="Maroon" title="c3">p</font> <a href="pboole.html#R6" title="PBOOLE:pred.6">=</a>  <a href="polynom1.html#K15" title="POLYNOM1:func.15">EmptyBag</a> the <a href="struct_0.html#U1" title="STRUCT_0:sel.1">carrier</a> of <font color="Maroon" title="c1">L</font>
 
<b>by </b><i><a class="ref" href="uproots.html#T14" target="_self" title="UPROOTS:th.14">Th14</a></i>;<br/>
<a NAME="E6:90_1"/>
<span class="p1">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c3">p</font></span>)</span> <a href="binarith.html#K3" title="BINARITH:func.3">-'</a> 1 <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
 
<b>by </b><i><a class="txt" href="uproots.html#E1:90_1"><i><font color="Green" title="E76">A4</font></i></a>, <a class="ref" href="binarith.html#T51" title="BINARITH:th.51">BINARITH:51</a></i>;<br/>
<b>hence </b><font color="Maroon" title="c3">p</font> = 
<span class="p1"><a href="algseq_1.html#K3" title="ALGSEQ_1:func.3">&lt;%</a><span class="default"><span class="p2">(<span class="default"><a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font></span>)</span></span><a href="algseq_1.html#K3" title="ALGSEQ_1:func.3">%&gt;</a></span>
<b>by </b><i><a class="txt" href="uproots.html#E1:90_1"><i><font color="Green" title="E76">A4</font></i></a>, <a class="txt" href="uproots.html#E3:90_1"><i><font color="Green" title="E77">A5</font></i></a>, <a class="ref" href="algseq_1.html#D6" title="ALGSEQ_1:def.6">ALGSEQ_1:def 6</a></i>
<br/>.= 
 <a href="uproots.html#K10" title="UPROOTS:func.10">poly_with_roots</a> <span class="p1">(<span class="default"><a href="uproots.html#K8" title="UPROOTS:func.8">BRoots</a> <font color="Maroon" title="c3">p</font></span>)</span>
<b>by </b><i><a class="txt" href="uproots.html#E5:90_1"><i><font color="Green" title="E78">A6</font></i></a>, <a class="ref" href="uproots.html#T62" target="_self" title="UPROOTS:th.62">Th62</a></i>
;<br/><br/>


</div><b>end;</b></div>
<a NAME="E5:90"/><i><font color="Green" title="E76">A7</font></i>: 
for <font color="Olive" title="b1">n</font> being  <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>  st <font color="Olive" title="b1">n</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Maroon">S<sub>1</sub></font>[<font color="Olive" title="b1">n</font>] holds <br/><font color="Maroon">S<sub>1</sub></font>[<font color="Olive" title="b1">n</font> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1]
 
<div><a class="txt" onclick="hs2(this)" href="javascript:()" title="90_2"><b>proof </b></a><div class="add">

<b>let </b><font color="Maroon" title="c3">n</font> be   <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>;<br/>

<b>assume </b><b>that </b><br/><a NAME="E1:90_2"/><i><font color="Green" title="E77">A8</font></i>: 
<font color="Maroon" title="c3">n</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1
 <b>and </b><br/><a NAME="E2:90_2"/><i><font color="Green" title="E78">A9</font></i>: 
<font color="Maroon">S<sub>1</sub></font>[<font color="Maroon" title="c3">n</font>]
 ;<br/>

<b>let </b><font color="Maroon" title="c4">p</font> be  <a href="uproots.html#V1" title="UPROOTS:attr.1">non-zero</a> <a href="polynom3.html#NM1" title="POLYNOM3:NM.1">Polynomial</a> of <font color="Maroon" title="c1">L</font>;<br/>

<b>assume </b><b>that </b><br/><a NAME="E3:90_2"/><i><font color="Green" title="E79">A10</font></i>: 
 <a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c4">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c3">n</font> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1
 <b>and </b><br/><a NAME="E4:90_2"/>
<font color="Maroon" title="c3">n</font> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1 <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1
 <b>and </b><br/><a NAME="E5:90_2"/><i><font color="Green" title="E80">A11</font></i>: 
<font color="Maroon" title="c4">p</font> <a href="seq_1.html#K2" title="SEQ_1:func.2">.</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c4">p</font></span>)</span> <a href="binarith.html#K3" title="BINARITH:func.3">-'</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font>
 ;<br/>

<a NAME="E6:90_2"/>
<font color="Maroon" title="c3">n</font> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1 <a href="xxreal_0.html#NR4" title="XXREAL_0:NR.4">&gt;</a> 1
 
<b>by </b><i><a class="txt" href="uproots.html#E1:90_2"><i><font color="Green" title="E77">A8</font></i></a>, <a class="ref" href="nat_1.html#T13" title="NAT_1:th.13">NAT_1:13</a></i>;<br/>
<a NAME="E7:90_2"/><b>then </b>
<font color="Maroon" title="c4">p</font> is <a href="polynom5.html#V1" title="POLYNOM5:attr.1">with_roots</a>
 
<b>by </b><i><a class="txt" href="uproots.html#E3:90_2"><i><font color="Green" title="E79">A10</font></i></a>, <a class="ref" href="polynom5.html#D8" title="POLYNOM5:def.8">POLYNOM5:def 8</a></i>;<br/>
<b>then consider </b><font color="Maroon" title="c5">x</font> being   <a href="struct_0.html#NM1" title="STRUCT_0:NM.1">Element</a> of <font color="Maroon" title="c1">L</font><b> such that </b><br/><a NAME="E9:90_2"/><i><font color="Green" title="E81">A12</font></i>: 
<font color="Maroon" title="c5">x</font> <a href="polynom5.html#R1" title="POLYNOM5:pred.1">is_a_root_of</a> <font color="Maroon" title="c4">p</font>
 <b>by </b><i><a class="ref" href="polynom5.html#D7" title="POLYNOM5:def.7">POLYNOM5:def 7</a></i>;<br/>
<b>set </b><font color="Maroon" title="c6">q</font> =  <a href="uproots.html#K6" title="UPROOTS:func.6">poly_quotient</a> <font color="Maroon" title="c4">p</font>,<font color="Maroon" title="c5">x</font>;<br/>
<b>set </b><font color="Maroon" title="c7">r</font> = <span class="p1"><a href="polynom5.html#K4" title="POLYNOM5:func.4">&lt;%</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_0.html#K4" title="ALGSTR_0:func.4">-</a> <font color="Maroon" title="c5">x</font></span>)</span>,<span class="p2">(<span class="default"><a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font></span>)</span></span><a href="polynom5.html#K4" title="POLYNOM5:func.4">%&gt;</a></span>;<br/>
<a NAME="E10:90_2"/><i><font color="Green" title="E82">A13</font></i>: 
<font color="Maroon" title="c4">p</font> <a href="funct_2.html#R2" title="FUNCT_2:pred.2">=</a> <span class="p1"><a href="polynom5.html#K4" title="POLYNOM5:func.4">&lt;%</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_0.html#K4" title="ALGSTR_0:func.4">-</a> <font color="Maroon" title="c5">x</font></span>)</span>,<span class="p2">(<span class="default"><a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font></span>)</span></span><a href="polynom5.html#K4" title="POLYNOM5:func.4">%&gt;</a></span> <a href="polynom3.html#K12" title="POLYNOM3:func.12">*'</a> <span class="p1">(<span class="default"><a href="uproots.html#K6" title="UPROOTS:func.6">poly_quotient</a> <font color="Maroon" title="c4">p</font>,<font color="Maroon" title="c5">x</font></span>)</span>
 
<b>by </b><i><a class="txt" href="uproots.html#E9:90_2"><i><font color="Green" title="E81">A12</font></i></a>, <a class="ref" href="uproots.html#T52" target="_self" title="UPROOTS:th.52">Th52</a></i>;<br/>
<b>then reconsider </b><font color="Maroon" title="c8">q</font> =  <a href="uproots.html#K6" title="UPROOTS:func.6">poly_quotient</a> <font color="Maroon" title="c4">p</font>,<font color="Maroon" title="c5">x</font> as  <a href="uproots.html#V1" title="UPROOTS:attr.1">non-zero</a> <a href="polynom3.html#NM1" title="POLYNOM3:NM.1">Polynomial</a> of <font color="Maroon" title="c1">L</font> <b>by </b><i><a class="ref" href="uproots.html#T36" target="_self" title="UPROOTS:th.36">Th36</a></i>;<br/>
<a NAME="E12:90_2"/>
 <a href="uproots.html#K8" title="UPROOTS:func.8">BRoots</a> <span class="p1"><a href="polynom5.html#K4" title="POLYNOM5:func.4">&lt;%</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_0.html#K4" title="ALGSTR_0:func.4">-</a> <font color="Maroon" title="c5">x</font></span>)</span>,<span class="p2">(<span class="default"><a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font></span>)</span></span><a href="polynom5.html#K4" title="POLYNOM5:func.4">%&gt;</a></span> <a href="pboole.html#R6" title="PBOOLE:pred.6">=</a> <span class="p1"><a href="domain_1.html#K6" title="DOMAIN_1:func.6">{</a><span class="default"><font color="Maroon" title="c5">x</font></span><a href="domain_1.html#K6" title="DOMAIN_1:func.6">}</a></span>,1 <a href="uproots.html#K2" title="UPROOTS:func.2">-bag</a> 
 
<b>by </b><i><a class="ref" href="uproots.html#T56" target="_self" title="UPROOTS:th.56">Th56</a></i>;<br/>
<a NAME="E13:90_2"/><b>then </b><i><font color="Green" title="E83">A14</font></i>: 
 <a href="uproots.html#K8" title="UPROOTS:func.8">BRoots</a> <font color="Maroon" title="c4">p</font> <a href="pboole.html#R6" title="PBOOLE:pred.6">=</a> <span class="p1">(<span class="default"><span class="p2"><a href="domain_1.html#K6" title="DOMAIN_1:func.6">{</a><span class="default"><font color="Maroon" title="c5">x</font></span><a href="domain_1.html#K6" title="DOMAIN_1:func.6">}</a></span>,1 <a href="uproots.html#K2" title="UPROOTS:func.2">-bag</a> </span>)</span> <a href="polynom1.html#K8" title="POLYNOM1:func.8">+</a> <span class="p1">(<span class="default"><a href="uproots.html#K8" title="UPROOTS:func.8">BRoots</a> <font color="Maroon" title="c8">q</font></span>)</span>
 
<b>by </b><i><a class="txt" href="uproots.html#E10:90_2"><i><font color="Green" title="E82">A13</font></i></a>, <a class="ref" href="uproots.html#T58" target="_self" title="UPROOTS:th.58">Th58</a></i>;<br/>
<a NAME="E14:90_2"/><i><font color="Green" title="E84">A15</font></i>: 
 <a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <span class="p1"><a href="polynom5.html#K4" title="POLYNOM5:func.4">&lt;%</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_0.html#K4" title="ALGSTR_0:func.4">-</a> <font color="Maroon" title="c5">x</font></span>)</span>,<span class="p2">(<span class="default"><a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font></span>)</span></span><a href="polynom5.html#K4" title="POLYNOM5:func.4">%&gt;</a></span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> 2
 
<b>by </b><i><a class="ref" href="polynom5.html#T41" title="POLYNOM5:th.41">POLYNOM5:41</a></i>;<br/>
<a NAME="E15:90_2"/>
 <a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c8">q</font> <a href="xxreal_0.html#NR4" title="XXREAL_0:NR.4">&gt;</a>  <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
 
<b>by </b><i><a class="ref" href="uproots.html#T19" target="_self" title="UPROOTS:th.19">Th19</a></i>;<br/>
<a NAME="E16:90_2"/><b>then </b>
( <span class="p1"><a href="polynom5.html#K4" title="POLYNOM5:func.4">&lt;%</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_0.html#K4" title="ALGSTR_0:func.4">-</a> <font color="Maroon" title="c5">x</font></span>)</span>,<span class="p2">(<span class="default"><a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font></span>)</span></span><a href="polynom5.html#K4" title="POLYNOM5:func.4">%&gt;</a></span> <a href="seq_1.html#K2" title="SEQ_1:func.2">.</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <span class="p3"><a href="polynom5.html#K4" title="POLYNOM5:func.4">&lt;%</a><span class="default"><span class="p4">(<span class="default"><a href="algstr_0.html#K4" title="ALGSTR_0:func.4">-</a> <font color="Maroon" title="c5">x</font></span>)</span>,<span class="p4">(<span class="default"><a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font></span>)</span></span><a href="polynom5.html#K4" title="POLYNOM5:func.4">%&gt;</a></span></span>)</span> <a href="binarith.html#K3" title="BINARITH:func.3">-'</a> 1</span>)</span> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a>  <a href="struct_0.html#K4" title="STRUCT_0:func.4">0.</a> <font color="Maroon" title="c1">L</font> &amp; <font color="Maroon" title="c8">q</font> <a href="seq_1.html#K2" title="SEQ_1:func.2">.</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c8">q</font></span>)</span> <a href="binarith.html#K3" title="BINARITH:func.3">-'</a> 1</span>)</span> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a>  <a href="struct_0.html#K4" title="STRUCT_0:func.4">0.</a> <font color="Maroon" title="c1">L</font> )
 
<b>by </b><i><a class="txt" href="uproots.html#E14:90_2"><i><font color="Green" title="E84">A15</font></i></a>, <a class="ref" href="uproots.html#T20" target="_self" title="UPROOTS:th.20">Th20</a></i>;<br/>
<a NAME="E17:90_2"/><b>then </b>
<span class="p1">(<span class="default"><span class="p2"><a href="polynom5.html#K4" title="POLYNOM5:func.4">&lt;%</a><span class="default"><span class="p3">(<span class="default"><a href="algstr_0.html#K4" title="ALGSTR_0:func.4">-</a> <font color="Maroon" title="c5">x</font></span>)</span>,<span class="p3">(<span class="default"><a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font></span>)</span></span><a href="polynom5.html#K4" title="POLYNOM5:func.4">%&gt;</a></span> <a href="seq_1.html#K2" title="SEQ_1:func.2">.</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <span class="p4"><a href="polynom5.html#K4" title="POLYNOM5:func.4">&lt;%</a><span class="default"><span class="p5">(<span class="default"><a href="algstr_0.html#K4" title="ALGSTR_0:func.4">-</a> <font color="Maroon" title="c5">x</font></span>)</span>,<span class="p5">(<span class="default"><a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font></span>)</span></span><a href="polynom5.html#K4" title="POLYNOM5:func.4">%&gt;</a></span></span>)</span> <a href="binarith.html#K3" title="BINARITH:func.3">-'</a> 1</span>)</span></span>)</span> <a href="group_1.html#K9" title="GROUP_1:func.9">*</a> <span class="p1">(<span class="default"><font color="Maroon" title="c8">q</font> <a href="seq_1.html#K2" title="SEQ_1:func.2">.</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c8">q</font></span>)</span> <a href="binarith.html#K3" title="BINARITH:func.3">-'</a> 1</span>)</span></span>)</span> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a>  <a href="struct_0.html#K4" title="STRUCT_0:func.4">0.</a> <font color="Maroon" title="c1">L</font>
 
<b>by </b><i><a class="ref" href="vectsp_2.html#D5" title="VECTSP_2:def.5">VECTSP_2:def 5</a></i>;<br/>
<a NAME="E18:90_2"/><b>then </b><i><font color="Green" title="E85">A16</font></i>: 
 <a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c4">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c8">q</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <span class="p2">(<span class="default">1 <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span> <a href="real_1.html#K9" title="REAL_1:func.9">-</a> 1
 
<b>by </b><i><a class="txt" href="uproots.html#E10:90_2"><i><font color="Green" title="E82">A13</font></i></a>, <a class="txt" href="uproots.html#E14:90_2"><i><font color="Green" title="E84">A15</font></i></a>, <a class="ref" href="polynom4.html#T13" title="POLYNOM4:th.13">POLYNOM4:13</a></i>;<br/>
<a NAME="E19:90_2"/>
<font color="Maroon" title="c8">q</font> <a href="seq_1.html#K2" title="SEQ_1:func.2">.</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="algseq_1.html#K1" title="ALGSEQ_1:func.1">len</a> <font color="Maroon" title="c8">q</font></span>)</span> <a href="binarith.html#K3" title="BINARITH:func.3">-'</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font>
 
<b>by </b><i><a class="txt" href="uproots.html#E5:90_2"><i><font color="Green" title="E80">A11</font></i></a>, <a class="txt" href="uproots.html#E10:90_2"><i><font color="Green" title="E82">A13</font></i></a>, <a class="ref" href="uproots.html#T43" target="_self" title="UPROOTS:th.43">Th43</a></i>;<br/>
<a NAME="E20:90_2"/><b>then </b><i><font color="Green" title="E86">A17</font></i>: 
<font color="Maroon" title="c8">q</font> <a href="funct_2.html#R2" title="FUNCT_2:pred.2">=</a>  <a href="uproots.html#K10" title="UPROOTS:func.10">poly_with_roots</a> <span class="p1">(<span class="default"><a href="uproots.html#K8" title="UPROOTS:func.8">BRoots</a> <font color="Maroon" title="c8">q</font></span>)</span>
 
<b>by </b><i><a class="txt" href="uproots.html#E1:90_2"><i><font color="Green" title="E77">A8</font></i></a>, <a class="txt" href="uproots.html#E2:90_2"><i><font color="Green" title="E78">A9</font></i></a>, <a class="txt" href="uproots.html#E3:90_2"><i><font color="Green" title="E79">A10</font></i></a>, <a class="txt" href="uproots.html#E18:90_2"><i><font color="Green" title="E85">A16</font></i></a></i>;<br/>
<a NAME="E21:90_2"/>
 <a href="uproots.html#K10" title="UPROOTS:func.10">poly_with_roots</a> <span class="p1">(<span class="default"><span class="p2"><a href="domain_1.html#K6" title="DOMAIN_1:func.6">{</a><span class="default"><font color="Maroon" title="c5">x</font></span><a href="domain_1.html#K6" title="DOMAIN_1:func.6">}</a></span>,1 <a href="uproots.html#K2" title="UPROOTS:func.2">-bag</a> </span>)</span> <a href="funct_2.html#R2" title="FUNCT_2:pred.2">=</a> <span class="p1"><a href="polynom5.html#K4" title="POLYNOM5:func.4">&lt;%</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_0.html#K4" title="ALGSTR_0:func.4">-</a> <font color="Maroon" title="c5">x</font></span>)</span>,<span class="p2">(<span class="default"><a href="struct_0.html#K5" title="STRUCT_0:func.5">1.</a> <font color="Maroon" title="c1">L</font></span>)</span></span><a href="polynom5.html#K4" title="POLYNOM5:func.4">%&gt;</a></span>
 
<b>by </b><i><a class="ref" href="uproots.html#T63" target="_self" title="UPROOTS:th.63">Th63</a></i>;<br/>
<b>hence </b><a NAME="E22:90_2"/>
<font color="Maroon" title="c4">p</font> <a href="funct_2.html#R2" title="FUNCT_2:pred.2">=</a>  <a href="uproots.html#K10" title="UPROOTS:func.10">poly_with_roots</a> <span class="p1">(<span class="default"><a href="uproots.html#K8" title="UPROOTS:func.8">BRoots</a> <font color="Maroon" title="c4">p</font></span>)</span>
 <b>by </b><i><a class="txt" href="uproots.html#E10:90_2"><i><font color="Green" title="E82">A13</font></i></a>, <a class="txt" href="uproots.html#E13:90_2"><i><font color="Green" title="E83">A14</font></i></a>, <a class="txt" href="uproots.html#E20:90_2"><i><font color="Green" title="E86">A17</font></i></a>, <a class="ref" href="uproots.html#T66" target="_self" title="UPROOTS:th.66">Th66</a></i>;<br/>


</div><b>end;</b></div>
<a NAME="E6:90"/>
for <font color="Olive" title="b1">n</font> being  <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>  st <font color="Olive" title="b1">n</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 holds <br/><font color="Maroon">S<sub>1</sub></font>[<font color="Olive" title="b1">n</font>]
 
<b>from </b><i><a class="ref" href="nat_1.html#S8" title="NAT_1:sch.8">NAT_1:sch 8</a>(<a class="txt" href="uproots.html#E4:90"><i><font color="Green" title="E75">A3</font></i></a>, <a class="txt" href="uproots.html#E5:90"><i><font color="Green" title="E76">A7</font></i></a>);<br/></i>
<b>hence </b><a NAME="E7:90"/>
<font color="Maroon" title="c2">p</font> <a href="funct_2.html#R2" title="FUNCT_2:pred.2">=</a>  <a href="uproots.html#K10" title="UPROOTS:func.10">poly_with_roots</a> <span class="p1">(<span class="default"><a href="uproots.html#K8" title="UPROOTS:func.8">BRoots</a> <font color="Maroon" title="c2">p</font></span>)</span>
 <b>by </b><i><a class="txt" href="uproots.html#E1:90"><i><font color="Green" title="E73">A1</font></i></a>, <a class="txt" href="uproots.html#E3:90"><i><font color="Green" title="E74">A2</font></i></a></i>;<br/>


</div>
