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

<span class="kw">let </span><font color="Maroon" title="c1">X</font> be    <a href="hidden.html#M2" title="HIDDEN:mode.2">set</a> ; <a class="txt" onmouseover="tooltip.show('hs',this)" onmouseout="tooltip.hide()" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide">  for <font color="Olive" title="b1">n</font> being   <a href="ordinal1.html#NM6" title="ORDINAL1:NM.6">Nat</a>  st <font color="Olive" title="b1">n</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 2 holds <br/> ex <font color="Olive" title="b2">fs</font> being   <a href="finseq_1.html#NM1" title="FINSEQ_1:NM.1">FinSequence</a> st <br/>(  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Olive" title="b2">fs</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Olive" title="b1">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 &amp; (  for <font color="Olive" title="b3">p</font> being   <a href="ordinal1.html#NM6" title="ORDINAL1:NM.6">Nat</a>  st <font color="Olive" title="b3">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Olive" title="b3">p</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Olive" title="b1">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 holds <br/><font color="Olive" title="b2">fs</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b3">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">[:</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Olive" title="b3">p</font>)</span>)</span>,<span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<span class="p3">(<span class="default"><font color="Olive" title="b1">n</font> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> <font color="Olive" title="b3">p</font></span>)</span>)</span>)</span></span><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">:]</a></span> ) &amp;  <a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Olive" title="b1">n</font>) <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="card_3.html#K3" title="CARD_3:func.3">Union</a> <span class="p1">(<span class="default"><a href="card_3.html#K2" title="CARD_3:func.2">disjoin</a> <font color="Olive" title="b2">fs</font></span>)</span> )</span><br/><span class="kw">let </span><font color="Maroon" title="c2">n</font> be   <a href="ordinal1.html#NM6" title="ORDINAL1:NM.6">Nat</a>; <a class="txt" onmouseover="tooltip.show('hs',this)" onmouseout="tooltip.hide()" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> ( <font color="Maroon" title="c2">n</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 2 implies  ex <font color="Olive" title="b1">fs</font> being   <a href="finseq_1.html#NM1" title="FINSEQ_1:NM.1">FinSequence</a> st <br/>(  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Olive" title="b1">fs</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 &amp; (  for <font color="Olive" title="b2">p</font> being   <a href="ordinal1.html#NM6" title="ORDINAL1:NM.6">Nat</a>  st <font color="Olive" title="b2">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Olive" title="b2">p</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 holds <br/><font color="Olive" title="b1">fs</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b2">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">[:</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Olive" title="b2">p</font>)</span>)</span>,<span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<span class="p3">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> <font color="Olive" title="b2">p</font></span>)</span>)</span>)</span></span><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">:]</a></span> ) &amp;  <a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Maroon" title="c2">n</font>) <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="card_3.html#K3" title="CARD_3:func.3">Union</a> <span class="p1">(<span class="default"><a href="card_3.html#K2" title="CARD_3:func.2">disjoin</a> <font color="Olive" title="b1">fs</font></span>)</span> ) )</span><br/>



<span class="kw">assume </span><a NAME="E1:54"/>
<font color="Maroon" title="c2">n</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 2
 ; <a class="txt" onmouseover="tooltip.show('hs',this)" onmouseout="tooltip.hide()" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide">  ex <font color="Olive" title="b1">fs</font> being   <a href="finseq_1.html#NM1" title="FINSEQ_1:NM.1">FinSequence</a> st <br/>(  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Olive" title="b1">fs</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 &amp; (  for <font color="Olive" title="b2">p</font> being   <a href="ordinal1.html#NM6" title="ORDINAL1:NM.6">Nat</a>  st <font color="Olive" title="b2">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Olive" title="b2">p</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 holds <br/><font color="Olive" title="b1">fs</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b2">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">[:</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Olive" title="b2">p</font>)</span>)</span>,<span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<span class="p3">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> <font color="Olive" title="b2">p</font></span>)</span>)</span>)</span></span><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">:]</a></span> ) &amp;  <a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Maroon" title="c2">n</font>) <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="card_3.html#K3" title="CARD_3:func.3">Union</a> <span class="p1">(<span class="default"><a href="card_3.html#K2" title="CARD_3:func.2">disjoin</a> <font color="Olive" title="b1">fs</font></span>)</span> )</span><br/>

<span class="kw">then </span><span class="kw">consider </span><font color="Maroon" title="c3">fs</font> being   <a href="finseq_1.html#NM1" title="FINSEQ_1:NM.1">FinSequence</a><span class="kw"> such that </span><br/><a NAME="E3:54"/><span class="lab"><font color="Green" title="E25">A1</font></span>: 
(  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c3">fs</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 &amp; (  for <font color="Olive" title="b1">p</font> being   <a href="ordinal1.html#NM6" title="ORDINAL1:NM.6">Nat</a>  st <font color="Olive" title="b1">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Olive" title="b1">p</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 holds <br/><font color="Maroon" title="c3">fs</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b1">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">[:</a><span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="algstr_4.html#K10" title="ALGSTR_4:func.10">free_magma_seq</a> <font color="Maroon" title="c1">X</font></span>)</span> <a href="nat_1.html#K8" title="NAT_1:func.8">.</a> <font color="Olive" title="b1">p</font></span>)</span>,<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="algstr_4.html#K10" title="ALGSTR_4:func.10">free_magma_seq</a> <font color="Maroon" title="c1">X</font></span>)</span> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <span class="p3">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> <font color="Olive" title="b1">p</font></span>)</span></span>)</span></span><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">:]</a></span> ) &amp; <span class="p1">(<span class="default"><a href="algstr_4.html#K10" title="ALGSTR_4:func.10">free_magma_seq</a> <font color="Maroon" title="c1">X</font></span>)</span> <a href="nat_1.html#K8" title="NAT_1:func.8">.</a> <font color="Maroon" title="c2">n</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="card_3.html#K3" title="CARD_3:func.3">Union</a> <span class="p1">(<span class="default"><a href="card_3.html#K2" title="CARD_3:func.2">disjoin</a> <font color="Maroon" title="c3">fs</font></span>)</span> )
 <span class="kw">by</span> <span class="lab"><a class="ref" href="algstr_4.html#D13" target="_self" onmouseover="rs('algstr_4/D13')" onmouseout="rh()">Def13</a></span>;<br/>
<span class="kw">take </span>
<font color="Maroon" title="c3">fs</font>
; <a class="txt" onmouseover="tooltip.show('hs',this)" onmouseout="tooltip.hide()" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> (  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c3">fs</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 &amp; (  for <font color="Olive" title="b1">p</font> being   <a href="ordinal1.html#NM6" title="ORDINAL1:NM.6">Nat</a>  st <font color="Olive" title="b1">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Olive" title="b1">p</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 holds <br/><font color="Maroon" title="c3">fs</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b1">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">[:</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Olive" title="b1">p</font>)</span>)</span>,<span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<span class="p3">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> <font color="Olive" title="b1">p</font></span>)</span>)</span>)</span></span><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">:]</a></span> ) &amp;  <a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Maroon" title="c2">n</font>) <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="card_3.html#K3" title="CARD_3:func.3">Union</a> <span class="p1">(<span class="default"><a href="card_3.html#K2" title="CARD_3:func.2">disjoin</a> <font color="Maroon" title="c3">fs</font></span>)</span> )</span><br/>

<span class="kw">thus </span><a NAME="E4:54"/>
 <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c3">fs</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:54"><span class="lab"><font color="Green" title="E25">A1</font></span></a></span>; <a class="txt" onmouseover="tooltip.show('hs',this)" onmouseout="tooltip.hide()" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> ( (  for <font color="Olive" title="b1">p</font> being   <a href="ordinal1.html#NM6" title="ORDINAL1:NM.6">Nat</a>  st <font color="Olive" title="b1">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Olive" title="b1">p</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 holds <br/><font color="Maroon" title="c3">fs</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b1">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">[:</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Olive" title="b1">p</font>)</span>)</span>,<span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<span class="p3">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> <font color="Olive" title="b1">p</font></span>)</span>)</span>)</span></span><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">:]</a></span> ) &amp;  <a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Maroon" title="c2">n</font>) <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="card_3.html#K3" title="CARD_3:func.3">Union</a> <span class="p1">(<span class="default"><a href="card_3.html#K2" title="CARD_3:func.2">disjoin</a> <font color="Maroon" title="c3">fs</font></span>)</span> )</span><br/>

<span class="kw">thus </span><a NAME="E5:54"/>
 for <font color="Olive" title="b1">p</font> being   <a href="ordinal1.html#NM6" title="ORDINAL1:NM.6">Nat</a>  st <font color="Olive" title="b1">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Olive" title="b1">p</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 holds <br/><font color="Maroon" title="c3">fs</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b1">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">[:</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Olive" title="b1">p</font>)</span>)</span>,<span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<span class="p3">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> <font color="Olive" title="b1">p</font></span>)</span>)</span>)</span></span><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">:]</a></span>
  <a class="txt" onmouseover="tooltip.show('hs',this)" onmouseout="tooltip.hide()" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide">  <a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Maroon" title="c2">n</font>) <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="card_3.html#K3" title="CARD_3:func.3">Union</a> <span class="p1">(<span class="default"><a href="card_3.html#K2" title="CARD_3:func.2">disjoin</a> <font color="Maroon" title="c3">fs</font></span>)</span></span><div><a class="txt" onmouseover="tooltip.show('hs2',this)" onmouseout="tooltip.hide()" onclick="hs2(this)" href="javascript:()" title="54_1"><span class="kw">proof </span></a><div class="add">

<span class="kw">let </span><font color="Maroon" title="c4">p</font> be   <a href="ordinal1.html#NM6" title="ORDINAL1:NM.6">Nat</a>; <a class="txt" onmouseover="tooltip.show('hs',this)" onmouseout="tooltip.hide()" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> ( <font color="Maroon" title="c4">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Maroon" title="c4">p</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 implies <font color="Maroon" title="c3">fs</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c4">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">[:</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Maroon" title="c4">p</font>)</span>)</span>,<span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<span class="p3">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> <font color="Maroon" title="c4">p</font></span>)</span>)</span>)</span></span><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">:]</a></span> )</span><br/>

<span class="kw">assume </span><a NAME="E1:54_1"/><span class="lab"><font color="Green" title="E26">A2</font></span>: 
( <font color="Maroon" title="c4">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 1 &amp; <font color="Maroon" title="c4">p</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1 )
 ; <a class="txt" onmouseover="tooltip.show('hs',this)" onmouseout="tooltip.hide()" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> <font color="Maroon" title="c3">fs</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c4">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">[:</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Maroon" title="c4">p</font>)</span>)</span>,<span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<span class="p3">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> <font color="Maroon" title="c4">p</font></span>)</span>)</span>)</span></span><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">:]</a></span></span><br/>

<a NAME="E2:54_1"/><span class="kw">then </span>
(  <a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c4">p</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a>  <a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1 &amp;  <a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c4">p</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a>  <a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <span class="p1">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span> )
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="xreal_1.html#T24" onmouseover="rs('xreal_1/T24')" onmouseout="rh()">XREAL_1:24</a></span>;<br/>
<a NAME="E3:54_1"/><span class="kw">then </span>
( <span class="p1">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c4">p</font></span>)</span> <a href="xcmplx_0.html#K2" title="XCMPLX_0:func.2">+</a> <font color="Maroon" title="c2">n</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <span class="p1">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span> <a href="xcmplx_0.html#K2" title="XCMPLX_0:func.2">+</a> <font color="Maroon" title="c2">n</font> &amp; <span class="p1">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c4">p</font></span>)</span> <a href="xcmplx_0.html#K2" title="XCMPLX_0:func.2">+</a> <font color="Maroon" title="c2">n</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> <span class="p1">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <span class="p2">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span></span>)</span> <a href="xcmplx_0.html#K2" title="XCMPLX_0:func.2">+</a> <font color="Maroon" title="c2">n</font> )
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="xreal_1.html#T6" onmouseover="rs('xreal_1/T6')" onmouseout="rh()">XREAL_1:6</a></span>;<br/>
<a NAME="E4:54_1"/><span class="kw">then </span>
<font color="Maroon" title="c2">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> <font color="Maroon" title="c4">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c2">n</font> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> <font color="Maroon" title="c4">p</font>
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="xreal_0.html#D2" onmouseover="rs('xreal_0/D2')" onmouseout="rh()">XREAL_0:def 2</a></span>;<br/>
<span class="kw">hence </span><a NAME="E5:54_1"/>
<font color="Maroon" title="c3">fs</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c4">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">[:</a><span class="default"><span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Maroon" title="c4">p</font>)</span>)</span>,<span class="p2">(<span class="default"><a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<span class="p3">(<span class="default"><font color="Maroon" title="c2">n</font> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> <font color="Maroon" title="c4">p</font></span>)</span>)</span>)</span></span><a href="zfmisc_1.html#K2" title="ZFMISC_1:func.2">:]</a></span>
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E1:54_1"><span class="lab"><font color="Green" title="E26">A2</font></span></a>, <a class="txt" href="#E3:54"><span class="lab"><font color="Green" title="E25">A1</font></span></a></span>; <a class="txt" onmouseover="tooltip.show('hs',this)" onmouseout="tooltip.hide()" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> verum</span><br/>


</div><span class="kw">end;</span></div>

<span class="kw">thus </span><a NAME="E6:54"/>
 <a href="algstr_4.html#K11" title="ALGSTR_4:func.11">free_magma</a> (<font color="Maroon" title="c1">X</font>,<font color="Maroon" title="c2">n</font>) <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="card_3.html#K3" title="CARD_3:func.3">Union</a> <span class="p1">(<span class="default"><a href="card_3.html#K2" title="CARD_3:func.2">disjoin</a> <font color="Maroon" title="c3">fs</font></span>)</span>
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:54"><span class="lab"><font color="Green" title="E25">A1</font></span></a></span>; <a class="txt" onmouseover="tooltip.show('hs',this)" onmouseout="tooltip.hide()" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> verum</span><br/>


</div>
