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

<span class="kw">deffunc </span><font color="Maroon">H<sub>1</sub></font>(  <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>) <span class="kw">-&gt; </span>   <a href="subset_1.html#M1" title="SUBSET_1:mode.1">Element</a> of  <a href="numbers.html#K4" title="NUMBERS:func.4">INT</a>  = <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span> <a href="polyform.html#K2" title="POLYFORM:func.2">|^</a> <span class="p2">(<span class="default">$1 <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1</span>)</span></span>)</span> <a href="polyform.html#K1" title="POLYFORM:func.1">*</a> <span class="p1">(<span class="default"><a href="polyform.html#K11" title="POLYFORM:func.11">num-polytopes</a> <font color="Maroon" title="c1">p</font>,<span class="p2">(<span class="default">$1 <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span></span>)</span>;<br/>
<span class="kw">consider </span><font color="Maroon" title="c2">s</font> being    <a href="finseq_1.html#M2" title="FINSEQ_1:mode.2">FinSequence</a> of  <a href="numbers.html#K4" title="NUMBERS:func.4">INT</a> <span class="kw"> such that </span><br/><a NAME="E2:83_1_1"/><span class="lab"><font color="Green" title="E61">A1</font></span>: 
 <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c2">s</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="polyform.html#K7" title="POLYFORM:func.7">dim</a> <font color="Maroon" title="c1">p</font>
 <span class="kw">and </span><br/><a NAME="E3:83_1_1"/><span class="lab"><font color="Green" title="E62">A2</font></span>: 
for <font color="Olive" title="b1">j</font> being  <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>  st <font color="Olive" title="b1">j</font> <a href="hidden.html#R2" title="HIDDEN:pred.2">in</a>  <a href="finseq_1.html#K4" title="FINSEQ_1:func.4">dom</a> <font color="Maroon" title="c2">s</font> holds <br/><font color="Maroon" title="c2">s</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b1">j</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon">H<sub>1</sub></font>(<font color="Olive" title="b1">j</font>)
 <span class="kw">from</span> <span class="lab"><a class="ref" href="finseq_2.html#S1" title="FINSEQ_2:sch.1">FINSEQ_2:sch 1</a>();<br/></span>
<span class="kw">take </span>
<font color="Maroon" title="c2">s</font>
; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="Red">::  thesis: </font></span></a><span class="hide"> (  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c2">s</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="polyform.html#K7" title="POLYFORM:func.7">dim</a> <font color="Maroon" title="c1">p</font> &amp; ( for <font color="Olive" title="b1">k</font> being  <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>  st 1 <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Olive" title="b1">k</font> &amp; <font color="Olive" title="b1">k</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a>  <a href="polyform.html#K7" title="POLYFORM:func.7">dim</a> <font color="Maroon" title="c1">p</font> holds <br/><font color="Maroon" title="c2">s</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b1">k</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="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span> <a href="polyform.html#K2" title="POLYFORM:func.2">|^</a> <span class="p2">(<span class="default"><font color="Olive" title="b1">k</font> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1</span>)</span></span>)</span> <a href="polyform.html#K1" title="POLYFORM:func.1">*</a> <span class="p1">(<span class="default"><a href="polyform.html#K11" title="POLYFORM:func.11">num-polytopes</a> <font color="Maroon" title="c1">p</font>,<span class="p2">(<span class="default"><font color="Olive" title="b1">k</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span></span>)</span> ) )</span><br/>

<a NAME="E4:83_1_1"/><span class="lab"><font color="Green" title="E63">A3</font></span>: 
 <a href="finseq_1.html#K4" title="FINSEQ_1:func.4">dom</a> <font color="Maroon" title="c2">s</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="finseq_1.html#K2" title="FINSEQ_1:func.2">Seg</a> <span class="p1">(<span class="default"><a href="polyform.html#K7" title="POLYFORM:func.7">dim</a> <font color="Maroon" title="c1">p</font></span>)</span>
 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E2:83_1_1"><span class="lab"><font color="Green" title="E61">A1</font></span></a>, <a class="ref" href="finseq_1.html#D3" title="FINSEQ_1:def.3">FINSEQ_1:def 3</a></span>;<br/>
<a NAME="E5:83_1_1"/>
for <font color="Olive" title="b1">j</font> being  <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>  st 1 <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Olive" title="b1">j</font> &amp; <font color="Olive" title="b1">j</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a>  <a href="polyform.html#K7" title="POLYFORM:func.7">dim</a> <font color="Maroon" title="c1">p</font> holds <br/><font color="Maroon" title="c2">s</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b1">j</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="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span> <a href="polyform.html#K2" title="POLYFORM:func.2">|^</a> <span class="p2">(<span class="default"><font color="Olive" title="b1">j</font> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1</span>)</span></span>)</span> <a href="polyform.html#K1" title="POLYFORM:func.1">*</a> <span class="p1">(<span class="default"><a href="polyform.html#K11" title="POLYFORM:func.11">num-polytopes</a> <font color="Maroon" title="c1">p</font>,<span class="p2">(<span class="default"><font color="Olive" title="b1">j</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span></span>)</span>
 
<div><a class="txt" onclick="hs2(this)" href="javascript:()" title="83_1_1_1"><span class="kw">proof </span></a><div class="add">

<span class="kw">let </span><font color="Maroon" title="c3">j</font> be   <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="Red">::  thesis: </font></span></a><span class="hide"> ( 1 <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c3">j</font> &amp; <font color="Maroon" title="c3">j</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a>  <a href="polyform.html#K7" title="POLYFORM:func.7">dim</a> <font color="Maroon" title="c1">p</font> implies <font color="Maroon" title="c2">s</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c3">j</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="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span> <a href="polyform.html#K2" title="POLYFORM:func.2">|^</a> <span class="p2">(<span class="default"><font color="Maroon" title="c3">j</font> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1</span>)</span></span>)</span> <a href="polyform.html#K1" title="POLYFORM:func.1">*</a> <span class="p1">(<span class="default"><a href="polyform.html#K11" title="POLYFORM:func.11">num-polytopes</a> <font color="Maroon" title="c1">p</font>,<span class="p2">(<span class="default"><font color="Maroon" title="c3">j</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span></span>)</span> )</span><br/>

<span class="kw">assume </span><a NAME="E1:83_1_1_1"/>
( 1 <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c3">j</font> &amp; <font color="Maroon" title="c3">j</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a>  <a href="polyform.html#K7" title="POLYFORM:func.7">dim</a> <font color="Maroon" title="c1">p</font> )
 ; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="Red">::  thesis: </font></span></a><span class="hide"> <font color="Maroon" title="c2">s</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c3">j</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="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span> <a href="polyform.html#K2" title="POLYFORM:func.2">|^</a> <span class="p2">(<span class="default"><font color="Maroon" title="c3">j</font> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1</span>)</span></span>)</span> <a href="polyform.html#K1" title="POLYFORM:func.1">*</a> <span class="p1">(<span class="default"><a href="polyform.html#K11" title="POLYFORM:func.11">num-polytopes</a> <font color="Maroon" title="c1">p</font>,<span class="p2">(<span class="default"><font color="Maroon" title="c3">j</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span></span>)</span></span><br/>

<a NAME="E2:83_1_1_1"/><span class="kw">then </span>
<font color="Maroon" title="c3">j</font> <a href="hidden.html#R2" title="HIDDEN:pred.2">in</a>  <a href="finseq_1.html#K2" title="FINSEQ_1:func.2">Seg</a> <span class="p1">(<span class="default"><a href="polyform.html#K7" title="POLYFORM:func.7">dim</a> <font color="Maroon" title="c1">p</font></span>)</span>
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="finseq_1.html#T3" title="FINSEQ_1:th.3">FINSEQ_1:3</a></span>;<br/>
<span class="kw">hence </span><a NAME="E3:83_1_1_1"/>
<font color="Maroon" title="c2">s</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c3">j</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="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span> <a href="polyform.html#K2" title="POLYFORM:func.2">|^</a> <span class="p2">(<span class="default"><font color="Maroon" title="c3">j</font> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1</span>)</span></span>)</span> <a href="polyform.html#K1" title="POLYFORM:func.1">*</a> <span class="p1">(<span class="default"><a href="polyform.html#K11" title="POLYFORM:func.11">num-polytopes</a> <font color="Maroon" title="c1">p</font>,<span class="p2">(<span class="default"><font color="Maroon" title="c3">j</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span></span>)</span>
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:83_1_1"><span class="lab"><font color="Green" title="E62">A2</font></span></a>, <a class="txt" href="#E4:83_1_1"><span class="lab"><font color="Green" title="E63">A3</font></span></a></span>; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="Red">::  thesis: </font></span></a><span class="hide"> verum</span><br/>


</div><span class="kw">end;</span></div>
<span class="kw">hence </span><a NAME="E6:83_1_1"/>
(  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c2">s</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="polyform.html#K7" title="POLYFORM:func.7">dim</a> <font color="Maroon" title="c1">p</font> &amp; ( for <font color="Olive" title="b1">k</font> being  <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>  st 1 <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Olive" title="b1">k</font> &amp; <font color="Olive" title="b1">k</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a>  <a href="polyform.html#K7" title="POLYFORM:func.7">dim</a> <font color="Maroon" title="c1">p</font> holds <br/><font color="Maroon" title="c2">s</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b1">k</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="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span> <a href="polyform.html#K2" title="POLYFORM:func.2">|^</a> <span class="p2">(<span class="default"><font color="Olive" title="b1">k</font> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 1</span>)</span></span>)</span> <a href="polyform.html#K1" title="POLYFORM:func.1">*</a> <span class="p1">(<span class="default"><a href="polyform.html#K11" title="POLYFORM:func.11">num-polytopes</a> <font color="Maroon" title="c1">p</font>,<span class="p2">(<span class="default"><font color="Olive" title="b1">k</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span></span>)</span> ) )
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E2:83_1_1"><span class="lab"><font color="Green" title="E61">A1</font></span></a></span>; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="Red">::  thesis: </font></span></a><span class="hide"> verum</span><br/>


</div>
