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

<b>consider </b><font color="Maroon" title="c4">h</font> being    <a href="pboole.html#M1" title="PBOOLE:mode.1">ManySortedSet</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a> <b> such that </b><br/><a NAME="E2:22_1_1"/><i><font color="Green" title="E17">A1</font></i>: 
<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>  <a href="fscirc_2.html#K3" title="FSCIRC_2:func.3">-BitBorrowOutput</a> <font color="Maroon" title="c2">x</font>,<font color="Maroon" title="c3">y</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c4">h</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
 <b>and </b><br/><a NAME="E3:22_1_1"/><i><font color="Green" title="E18">A2</font></i>: 
<font color="Maroon" title="c4">h</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a>  <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1"><a href="tarski.html#K4" title="TARSKI:func.4">[</a><span class="default"><a href="facirc_2.html#K3" title="FACIRC_2:func.3">&lt;*&gt;</a> ,<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="numbers.html#K6" title="NUMBERS:func.6">0</a>  <a href="finseq_2.html#K4" title="FINSEQ_2:func.4">-tuples_on</a> <a href="circcomb.html#K10" title="CIRCCOMB:func.10">BOOLEAN</a> </span>)</span> <a href="circcomb.html#K5" title="CIRCCOMB:func.5">--&gt;</a> <a href="margrel1.html#K8" title="MARGREL1:func.8">TRUE</a> </span>)</span></span><a href="tarski.html#K4" title="TARSKI:func.4">]</a></span>
 <b>and </b><br/><a NAME="E4:22_1_1"/>
for <font color="Olive" title="b1">n</font> being   <a href="subset_1.html#M1" title="SUBSET_1:mode.1">Element</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a>  holds  <font color="Maroon" title="c4">h</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <span class="p1">(<span class="default"><font color="Olive" title="b1">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="fscirc_1.html#K6" title="FSCIRC_1:func.6">BorrowOutput</a> <span class="p1">(<span class="default"><font color="Maroon" title="c2">x</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <span class="p2">(<span class="default"><font color="Olive" title="b1">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p1">(<span class="default"><font color="Maroon" title="c3">y</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <span class="p2">(<span class="default"><font color="Olive" title="b1">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p1">(<span class="default"><font color="Maroon" title="c4">h</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Olive" title="b1">n</font></span>)</span>
 <b>by </b><i><a class="ref" href="fscirc_2.html#D3" target="_self" title="FSCIRC_2:def.3">Def3</a></i>;<br/>
<b>defpred </b><font color="Maroon">S<sub>1</sub></font>[   <a href="subset_1.html#M1" title="SUBSET_1:mode.1">Element</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a> ] <b>means </b><font color="Maroon" title="c1">n</font> <a href="fscirc_2.html#K3" title="FSCIRC_2:func.3">-BitBorrowOutput</a> <font color="Maroon" title="c2">x</font>,<font color="Maroon" title="c3">y</font> is <a href="facirc_1.html#V1" title="FACIRC_1:attr.1">pair</a>;<br/>
<a NAME="E5:22_1_1"/><i><font color="Green" title="E19">A3</font></i>: 
<font color="Maroon">S<sub>1</sub></font>[ <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> ]
 
<b>by </b><i><a class="txt" href="fscirc_2.html#E2:22_1_1"><i><font color="Green" title="E17">A1</font></i></a>, <a class="txt" href="fscirc_2.html#E3:22_1_1"><i><font color="Green" title="E18">A2</font></i></a></i>;<br/>
<a NAME="E6:22_1_1"/><i><font color="Green" title="E20">A4</font></i>: 
for <font color="Olive" title="b1">n</font> being   <a href="subset_1.html#M1" title="SUBSET_1:mode.1">Element</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a>   st <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#K2" title="NAT_1:func.2">+</a> 1]
 
<div><a class="txt" onclick="hs2(this)" href="javascript:()" title="22_1_1_1"><b>proof </b></a><div class="add">

<b>let </b><font color="Maroon" title="c5">n</font> be    <a href="subset_1.html#M1" title="SUBSET_1:mode.1">Element</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a> ;<br/>

<span class="p1">(<span class="default"><font color="Maroon" title="c5">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="fscirc_2.html#K3" title="FSCIRC_2:func.3">-BitBorrowOutput</a> <font color="Maroon" title="c2">x</font>,<font color="Maroon" title="c3">y</font> = 
 <a href="fscirc_1.html#K6" title="FSCIRC_1:func.6">BorrowOutput</a> <span class="p1">(<span class="default"><font color="Maroon" title="c2">x</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <span class="p2">(<span class="default"><font color="Maroon" title="c5">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p1">(<span class="default"><font color="Maroon" title="c3">y</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <span class="p2">(<span class="default"><font color="Maroon" title="c5">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p1">(<span class="default"><font color="Maroon" title="c5">n</font> <a href="fscirc_2.html#K3" title="FSCIRC_2:func.3">-BitBorrowOutput</a> <font color="Maroon" title="c2">x</font>,<font color="Maroon" title="c3">y</font></span>)</span>
<b>by </b><i><a class="ref" href="fscirc_2.html#T7" target="_self" title="FSCIRC_2:th.7">Th7</a></i>
<br/>.= 
<span class="p1"><a href="tarski.html#K4" title="TARSKI:func.4">[</a><span class="default"><span class="p2"><a href="facirc_1.html#K7" title="FACIRC_1:func.7">&lt;*</a><span class="default"><span class="p3"><a href="tarski.html#K4" title="TARSKI:func.4">[</a><span class="default"><span class="p4"><a href="facirc_1.html#K6" title="FACIRC_1:func.6">&lt;*</a><span class="default"><span class="p5">(<span class="default"><font color="Maroon" title="c2">x</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <span class="p0">(<span class="default"><font color="Maroon" title="c5">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p5">(<span class="default"><font color="Maroon" title="c3">y</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <span class="p0">(<span class="default"><font color="Maroon" title="c5">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span><a href="facirc_1.html#K6" title="FACIRC_1:func.6">*&gt;</a></span>,<a href="twoscomp.html#K3" title="TWOSCOMP:func.3">and2a</a> </span><a href="tarski.html#K4" title="TARSKI:func.4">]</a></span>,<span class="p3"><a href="tarski.html#K4" title="TARSKI:func.4">[</a><span class="default"><span class="p4"><a href="facirc_1.html#K6" title="FACIRC_1:func.6">&lt;*</a><span class="default"><span class="p5">(<span class="default"><font color="Maroon" title="c3">y</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <span class="p0">(<span class="default"><font color="Maroon" title="c5">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p5">(<span class="default"><font color="Maroon" title="c5">n</font> <a href="fscirc_2.html#K3" title="FSCIRC_2:func.3">-BitBorrowOutput</a> <font color="Maroon" title="c2">x</font>,<font color="Maroon" title="c3">y</font></span>)</span></span><a href="facirc_1.html#K6" title="FACIRC_1:func.6">*&gt;</a></span>,<a href="twoscomp.html#K2" title="TWOSCOMP:func.2">and2</a> </span><a href="tarski.html#K4" title="TARSKI:func.4">]</a></span>,<span class="p3"><a href="tarski.html#K4" title="TARSKI:func.4">[</a><span class="default"><span class="p4"><a href="facirc_1.html#K6" title="FACIRC_1:func.6">&lt;*</a><span class="default"><span class="p5">(<span class="default"><font color="Maroon" title="c2">x</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <span class="p0">(<span class="default"><font color="Maroon" title="c5">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p5">(<span class="default"><font color="Maroon" title="c5">n</font> <a href="fscirc_2.html#K3" title="FSCIRC_2:func.3">-BitBorrowOutput</a> <font color="Maroon" title="c2">x</font>,<font color="Maroon" title="c3">y</font></span>)</span></span><a href="facirc_1.html#K6" title="FACIRC_1:func.6">*&gt;</a></span>,<a href="twoscomp.html#K3" title="TWOSCOMP:func.3">and2a</a> </span><a href="tarski.html#K4" title="TARSKI:func.4">]</a></span></span><a href="facirc_1.html#K7" title="FACIRC_1:func.7">*&gt;</a></span>,<a href="facirc_1.html#K4" title="FACIRC_1:func.4">or3</a> </span><a href="tarski.html#K4" title="TARSKI:func.4">]</a></span>

;<br/>
<b>hence </b><a NAME="E2:22_1_1_1"/>
( <font color="Maroon">S<sub>1</sub></font>[<font color="Maroon" title="c5">n</font>] implies <font color="Maroon">S<sub>1</sub></font>[<font color="Maroon" title="c5">n</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1] )
 ;<br/>


</div><b>end;</b></div>
<a NAME="E7:22_1_1"/>
for <font color="Olive" title="b1">n</font> being   <a href="subset_1.html#M1" title="SUBSET_1:mode.1">Element</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a>  holds  <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#S1" title="NAT_1:sch.1">NAT_1:sch 1</a>(<a class="txt" href="fscirc_2.html#E5:22_1_1"><i><font color="Green" title="E19">A3</font></i></a>, <a class="txt" href="fscirc_2.html#E6:22_1_1"><i><font color="Green" title="E20">A4</font></i></a>);<br/></i>
<b>hence </b><a NAME="E8:22_1_1"/>
<font color="Maroon" title="c1">n</font> <a href="fscirc_2.html#K3" title="FSCIRC_2:func.3">-BitBorrowOutput</a> <font color="Maroon" title="c2">x</font>,<font color="Maroon" title="c3">y</font> is <a href="facirc_1.html#V1" title="FACIRC_1:attr.1">pair</a>
 ;<br/>


</div>
