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

<b>defpred </b><font color="Maroon">S<sub>1</sub></font>[   <a href="hidden.html#M1">set</a> ,   <a href="hidden.html#M1">set</a> ] <b>means </b>for <font color="Olive">U1</font> being <a href="unialg_1.html#V3">strict</a>  <a href="unialg_2.html#M3">SubAlgebra</a> of <font color="Maroon">U01</font>  st <font color="Olive">U1</font> <a href="hidden.html#R1">=</a> <font color="Maroon">a<sub>1</sub></font> holds <br/>for <font color="Olive">S</font> being  <a href="struct_0.html#NM2">Subset</a> of <font color="Maroon">U02</font>  st <font color="Olive">S</font> <a href="hidden.html#R1">=</a> <font color="Maroon">F</font> <a href="relset_1.html#K10">.:</a> the <a href="struct_0.html#U1">carrier</a> of <font color="Olive">U1</font> holds <br/><font color="Maroon">a<sub>2</sub></font> <a href="hidden.html#R1">=</a>  <a href="unialg_2.html#K7">GenUnivAlg</a> <span class="p1">(<span class="default"><font color="Maroon">F</font> <a href="relset_1.html#K10">.:</a> the <a href="struct_0.html#U1">carrier</a> of <font color="Olive">U1</font></span>)</span>;<br/>
<a NAME="E1:33_1_1"/><i><font color="Green">E26</font></i>: 
for <font color="Olive">u1</font> being   <a href="hidden.html#M1">set</a>   st <font color="Olive">u1</font> <a href="hidden.html#R2">in</a> the <a href="struct_0.html#U1">carrier</a> of <span class="p1">(<span class="default"><a href="unialg_2.html#K12">UnSubAlLattice</a> <font color="Maroon">U01</font></span>)</span> holds <br/> ex <font color="Olive">u2</font> being   <a href="hidden.html#M1">set</a>  st <br/>( <font color="Olive">u2</font> <a href="hidden.html#R2">in</a> the <a href="struct_0.html#U1">carrier</a> of <span class="p1">(<span class="default"><a href="unialg_2.html#K12">UnSubAlLattice</a> <font color="Maroon">U02</font></span>)</span> &amp; <font color="Maroon">S<sub>1</sub></font>[<font color="Olive">u1</font>,<font color="Olive">u2</font>] )
 
<div><a class="txt" onclick="hs2(this)" href="javascript:()" title="33_1_1_1"><b>proof </b></a><div class="add">

<b>let </b><font color="Maroon">u1</font> be    <a href="hidden.html#M1">set</a> ;<br/>

<b>assume </b><a NAME="E1:33_1_1_1"/>
<font color="Maroon">u1</font> <a href="hidden.html#R2">in</a> the <a href="struct_0.html#U1">carrier</a> of <span class="p1">(<span class="default"><a href="unialg_2.html#K12">UnSubAlLattice</a> <font color="Maroon">U01</font></span>)</span>
 ;<br/>

<a NAME="E2:33_1_1_1"/><b>then </b>
<font color="Maroon">u1</font> <a href="hidden.html#R2">in</a>  <a href="unialg_3.html#K1" target="_self">Sub</a> <font color="Maroon">U01</font>
 
;<br/>
<b>then consider </b><font color="Maroon">U2</font> being  <a href="unialg_1.html#V3">strict</a>  <a href="unialg_2.html#M3">SubAlgebra</a> of <font color="Maroon">U01</font><b> such that </b><br/><a NAME="E4:33_1_1_1"/><i><font color="Green">E35</font></i>: 
<font color="Maroon">U2</font> <a href="hidden.html#R1">=</a> <font color="Maroon">u1</font>
 <b>by </b><i/>;<br/>
<b>reconsider </b><font color="Maroon">u2</font> =  <a href="unialg_2.html#K7">GenUnivAlg</a> <span class="p1">(<span class="default"><font color="Maroon">F</font> <a href="relset_1.html#K10">.:</a> the <a href="struct_0.html#U1">carrier</a> of <font color="Maroon">U2</font></span>)</span> as  <a href="unialg_1.html#V3">strict</a>  <a href="unialg_2.html#M3">SubAlgebra</a> of <font color="Maroon">U02</font> ;<br/>
<a NAME="E6:33_1_1_1"/>
<font color="Maroon">u2</font> <a href="hidden.html#R2">in</a>  <a href="unialg_3.html#K1" target="_self">Sub</a> <font color="Maroon">U02</font>
 
<b>by </b><i><a class="ref" href="unialg_2.html#D15">UNIALG_2:def 15</a></i>;<br/>
<b>then reconsider </b><font color="Maroon">u2</font> = <font color="Maroon">u2</font> as   <a href="struct_0.html#NM1">Element</a> of <span class="p1">(<span class="default"><a href="unialg_2.html#K12">UnSubAlLattice</a> <font color="Maroon">U02</font></span>)</span> ;<br/>
<b>take </b>
<font color="Maroon">u2</font>
;<br/>

<b>thus </b><a NAME="E8:33_1_1_1"/>
( <font color="Maroon">u2</font> <a href="hidden.html#R2">in</a> the <a href="struct_0.html#U1">carrier</a> of <span class="p1">(<span class="default"><a href="unialg_2.html#K12">UnSubAlLattice</a> <font color="Maroon">U02</font></span>)</span> &amp; <font color="Maroon">S<sub>1</sub></font>[<font color="Maroon">u1</font>,<font color="Maroon">u2</font>] )
 <b>by </b><i/>;<br/>


</div><b>end;</b></div>
<b>consider </b><font color="Maroon">f1</font> being   <a href="funct_2.html#NM1">Function</a> of the <a href="struct_0.html#U1">carrier</a> of <span class="p1">(<span class="default"><a href="unialg_2.html#K12">UnSubAlLattice</a> <font color="Maroon">U01</font></span>)</span>,the <a href="struct_0.html#U1">carrier</a> of <span class="p1">(<span class="default"><a href="unialg_2.html#K12">UnSubAlLattice</a> <font color="Maroon">U02</font></span>)</span><b> such that </b><br/><a NAME="E3:33_1_1"/><i><font color="Green">E37</font></i>: 
for <font color="Olive">u1</font> being   <a href="hidden.html#M1">set</a>   st <font color="Olive">u1</font> <a href="hidden.html#R2">in</a> the <a href="struct_0.html#U1">carrier</a> of <span class="p1">(<span class="default"><a href="unialg_2.html#K12">UnSubAlLattice</a> <font color="Maroon">U01</font></span>)</span> holds <br/><font color="Maroon">S<sub>1</sub></font>[<font color="Olive">u1</font>,<font color="Maroon">f1</font> <a href="funct_1.html#K1">.</a> <font color="Olive">u1</font>]
 <b>from </b><i><a class="ref" href="funct_2.html#S1">FUNCT_2:sch 1</a>();<br/></i>
<b>take </b>
<font color="Maroon">f1</font>
;<br/>

<b>thus </b><a NAME="E4:33_1_1"/>
for <font color="Olive">U1</font> being <a href="unialg_1.html#V3">strict</a>  <a href="unialg_2.html#M3">SubAlgebra</a> of <font color="Maroon">U01</font><br/> for <font color="Olive">H</font> being  <a href="struct_0.html#NM2">Subset</a> of <font color="Maroon">U02</font>  st <font color="Olive">H</font> <a href="hidden.html#R1">=</a> <font color="Maroon">F</font> <a href="relset_1.html#K10">.:</a> the <a href="struct_0.html#U1">carrier</a> of <font color="Olive">U1</font> holds <br/><font color="Maroon">f1</font> <a href="funct_1.html#K1">.</a> <font color="Olive">U1</font> <a href="hidden.html#R1">=</a>  <a href="unialg_2.html#K7">GenUnivAlg</a> <font color="Olive">H</font>
 <div><a class="txt" onclick="hs2(this)" href="javascript:()" title="33_1_1_2"><b>proof </b></a><div class="add">

<b>let </b><font color="Maroon">U1</font> be  <a href="unialg_1.html#V3">strict</a>  <a href="unialg_2.html#M3">SubAlgebra</a> of <font color="Maroon">U01</font>;<br/><b>let </b><font color="Maroon">S</font> be   <a href="struct_0.html#NM2">Subset</a> of <font color="Maroon">U02</font>;<br/>



<b>assume </b><a NAME="E1:33_1_1_2"/><i><font color="Green">E46</font></i>: 
<font color="Maroon">S</font> <a href="hidden.html#R1">=</a> <font color="Maroon">F</font> <a href="relset_1.html#K10">.:</a> the <a href="struct_0.html#U1">carrier</a> of <font color="Maroon">U1</font>
 ;<br/>

<a NAME="E2:33_1_1_2"/>
<font color="Maroon">U1</font> is    <a href="unialg_3.html#M2" target="_self">Element</a> of  <a href="unialg_3.html#K1" target="_self">Sub</a> <font color="Maroon">U01</font>
 
<b>by </b><i><a class="ref" href="unialg_2.html#D15">UNIALG_2:def 15</a></i>;<br/>
<a NAME="E3:33_1_1_2"/><b>then </b>
<font color="Maroon">U1</font> is   <a href="struct_0.html#NM1">Element</a> of <span class="p1">(<span class="default"><a href="unialg_2.html#K12">UnSubAlLattice</a> <font color="Maroon">U01</font></span>)</span>
 
;<br/>
<b>hence </b><a NAME="E4:33_1_1_2"/>
<font color="Maroon">f1</font> <a href="funct_1.html#K1">.</a> <font color="Maroon">U1</font> <a href="hidden.html#R1">=</a>  <a href="unialg_2.html#K7">GenUnivAlg</a> <font color="Maroon">S</font>
 <b>by </b><i>, <a class="ref" href="unialg_3.html#D1" target="_self">Def1</a></i>;<br/>


</div><b>end;</b></div>


</div>
