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

<b>let </b><font color="Maroon" title="c1">R</font> be  non <a href="struct_0.html#V2" title="STRUCT_0:attr.2">empty</a>  <a href="struct_0.html#L2" title="STRUCT_0:struct.2">ZeroStr</a> ;<br/><b>let </b><font color="Maroon" title="c2">p</font> be   <a href="algseq_1.html#NM1" title="ALGSEQ_1:NM.1">AlgSequence</a> of <font color="Maroon" title="c1">R</font>;<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>$1 <a href="algseq_1.html#R1" title="ALGSEQ_1:pred.1">is_at_least_length_of</a> <font color="Maroon" title="c2">p</font>;<br/>
<a NAME="E1:6"/><i><font color="Green" title="E5">A1</font></i>: 
 ex <font color="Olive" title="b1">m</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">m</font>]
 
<b>by </b><i><a class="txt" href="algseq_1.html#E21"><i><font color="Green" title="E3">Lm1</font></i></a></i>;<br/>
<a NAME="E2:6"/>
 ex <font color="Olive" title="b1">k</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 <br/>( <font color="Maroon">S<sub>1</sub></font>[<font color="Olive" title="b1">k</font>] &amp; ( for <font color="Olive" title="b2">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="b2">n</font>] holds <br/><font color="Olive" title="b1">k</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Olive" title="b2">n</font> ) )
 
<b>from </b><i><a class="ref" href="nat_1.html#S5" title="NAT_1:sch.5">NAT_1:sch 5</a>(<a class="txt" href="algseq_1.html#E1:6"><i><font color="Green" title="E5">A1</font></i></a>);<br/></i>
<b>then consider </b><font color="Maroon" title="c3">k</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> <b> such that </b><br/><a NAME="E4:6"/><i><font color="Green" title="E6">A2</font></i>: 
( <font color="Maroon" title="c3">k</font> <a href="algseq_1.html#R1" title="ALGSEQ_1:pred.1">is_at_least_length_of</a> <font color="Maroon" title="c2">p</font> &amp; ( 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="Olive" title="b1">n</font> <a href="algseq_1.html#R1" title="ALGSEQ_1:pred.1">is_at_least_length_of</a> <font color="Maroon" title="c2">p</font> holds <br/><font color="Maroon" title="c3">k</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Olive" title="b1">n</font> ) )
 ;<br/>
<b>take </b>
<font color="Maroon" title="c3">k</font>
;<br/>

<b>thus </b><a NAME="E5:6"/>
( <font color="Maroon" title="c3">k</font> <a href="algseq_1.html#R1" title="ALGSEQ_1:pred.1">is_at_least_length_of</a> <font color="Maroon" title="c2">p</font> &amp; ( 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="Olive" title="b1">n</font> <a href="algseq_1.html#R1" title="ALGSEQ_1:pred.1">is_at_least_length_of</a> <font color="Maroon" title="c2">p</font> holds <br/><font color="Maroon" title="c3">k</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Olive" title="b1">n</font> ) )
 <b>by </b><i><a class="txt" href="algseq_1.html#E4:6"><i><font color="Green" title="E6">A2</font></i></a></i>;<br/>


</div>
