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

<span class="kw">let </span><font color="Maroon" title="c11">P</font> be   <a href="compos_1.html#NM2" title="COMPOS_1:NM.2">Instruction-Sequence</a> of <a href="scmpds_2.html#K1" title="SCMPDS_2:func.1">SCMPDS</a>; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide">  for <font color="Olive" title="b1">s</font> being   <a href="numbers.html#K6" title="NUMBERS:func.6">0</a>  <a href="memstr_0.html#V4" title="MEMSTR_0:attr.4">-started</a>  <a href="memstr_0.html#NM2" title="MEMSTR_0:NM.2">State</a> of <a href="scmpds_2.html#K1" title="SCMPDS_2:func.1">SCMPDS</a><br/>  for <font color="Olive" title="b2">n</font>, <font color="Olive" title="b3">p0</font> being    <a href="subset_1.html#M2" title="SUBSET_1:mode.2">Element</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a> <br/>  for <font color="Olive" title="b4">f</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>   st <font color="Olive" title="b3">p0</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 3 &amp; <font color="Olive" title="b4">f</font> <a href="scpisort.html#R1" title="SCPISORT:pred.1">is_FinSequence_on</a> <font color="Olive" title="b1">s</font>,<font color="Olive" title="b3">p0</font> &amp;  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Olive" title="b4">f</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Olive" title="b2">n</font> holds <br/>( <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Olive" title="b2">n</font>,<font color="Olive" title="b3">p0</font>)</span>)</span>,<font color="Maroon" title="c11">P</font>,<font color="Olive" title="b1">s</font>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="gr_cy_1.html#K1" title="GR_CY_1:func.1">Sum</a> <font color="Olive" title="b4">f</font> &amp;  <a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Olive" title="b2">n</font>,<font color="Olive" title="b3">p0</font>) <a href="scmpds_6.html#R2" title="SCMPDS_6:pred.2">is_halting_on</a> <font color="Olive" title="b1">s</font>,<font color="Maroon" title="c11">P</font> )</span><br/><span class="kw">let </span><font color="Maroon" title="c12">s</font> be   <a href="numbers.html#K6" title="NUMBERS:func.6">0</a>  <a href="memstr_0.html#V4" title="MEMSTR_0:attr.4">-started</a>  <a href="memstr_0.html#NM2" title="MEMSTR_0:NM.2">State</a> of <a href="scmpds_2.html#K1" title="SCMPDS_2:func.1">SCMPDS</a>; <a class="txt" 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>, <font color="Olive" title="b2">p0</font> being    <a href="subset_1.html#M2" title="SUBSET_1:mode.2">Element</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a> <br/>  for <font color="Olive" title="b3">f</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>   st <font color="Olive" title="b2">p0</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 3 &amp; <font color="Olive" title="b3">f</font> <a href="scpisort.html#R1" title="SCPISORT:pred.1">is_FinSequence_on</a> <font color="Maroon" title="c12">s</font>,<font color="Olive" title="b2">p0</font> &amp;  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Olive" title="b3">f</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Olive" title="b1">n</font> holds <br/>( <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Olive" title="b1">n</font>,<font color="Olive" title="b2">p0</font>)</span>)</span>,<font color="Maroon" title="c11">P</font>,<font color="Maroon" title="c12">s</font>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="gr_cy_1.html#K1" title="GR_CY_1:func.1">Sum</a> <font color="Olive" title="b3">f</font> &amp;  <a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Olive" title="b1">n</font>,<font color="Olive" title="b2">p0</font>) <a href="scmpds_6.html#R2" title="SCMPDS_6:pred.2">is_halting_on</a> <font color="Maroon" title="c12">s</font>,<font color="Maroon" title="c11">P</font> )</span><br/><span class="kw">let </span><font color="Maroon" title="c13">n</font>, <font color="Maroon" title="c14">p0</font> be    <a href="subset_1.html#M2" title="SUBSET_1:mode.2">Element</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a> ; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide">  for <font color="Olive" title="b1">f</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>   st <font color="Maroon" title="c14">p0</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 3 &amp; <font color="Olive" title="b1">f</font> <a href="scpisort.html#R1" title="SCPISORT:pred.1">is_FinSequence_on</a> <font color="Maroon" title="c12">s</font>,<font color="Maroon" title="c14">p0</font> &amp;  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Olive" title="b1">f</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c13">n</font> holds <br/>( <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Maroon" title="c13">n</font>,<font color="Maroon" title="c14">p0</font>)</span>)</span>,<font color="Maroon" title="c11">P</font>,<font color="Maroon" title="c12">s</font>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="gr_cy_1.html#K1" title="GR_CY_1:func.1">Sum</a> <font color="Olive" title="b1">f</font> &amp;  <a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Maroon" title="c13">n</font>,<font color="Maroon" title="c14">p0</font>) <a href="scmpds_6.html#R2" title="SCMPDS_6:pred.2">is_halting_on</a> <font color="Maroon" title="c12">s</font>,<font color="Maroon" title="c11">P</font> )</span><br/><span class="kw">let </span><font color="Maroon" title="c15">f</font> be    <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> ; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> ( <font color="Maroon" title="c14">p0</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 3 &amp; <font color="Maroon" title="c15">f</font> <a href="scpisort.html#R1" title="SCPISORT:pred.1">is_FinSequence_on</a> <font color="Maroon" title="c12">s</font>,<font color="Maroon" title="c14">p0</font> &amp;  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c15">f</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c13">n</font> implies ( <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Maroon" title="c13">n</font>,<font color="Maroon" title="c14">p0</font>)</span>)</span>,<font color="Maroon" title="c11">P</font>,<font color="Maroon" title="c12">s</font>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="gr_cy_1.html#K1" title="GR_CY_1:func.1">Sum</a> <font color="Maroon" title="c15">f</font> &amp;  <a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Maroon" title="c13">n</font>,<font color="Maroon" title="c14">p0</font>) <a href="scmpds_6.html#R2" title="SCMPDS_6:pred.2">is_halting_on</a> <font color="Maroon" title="c12">s</font>,<font color="Maroon" title="c11">P</font> ) )</span><br/>







<a NAME="E1:10"/><span class="lab"><font color="Green" title="E8">I</font></span>: 
 <a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c12">s</font>
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="memstr_0.html#T44" title="MEMSTR_0:th.44">MEMSTR_0:44</a></span>;<br/>
<span class="kw">assume </span><span class="kw">that </span><br/><a NAME="E2:10"/><span class="lab"><font color="Green" title="E9">A1</font></span>: 
<font color="Maroon" title="c14">p0</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 3
 <span class="kw">and </span><br/><a NAME="E3:10"/><span class="lab"><font color="Green" title="E10">A2</font></span>: 
<font color="Maroon" title="c15">f</font> <a href="scpisort.html#R1" title="SCPISORT:pred.1">is_FinSequence_on</a> <font color="Maroon" title="c12">s</font>,<font color="Maroon" title="c14">p0</font>
 <span class="kw">and </span><br/><a NAME="E4:10"/><span class="lab"><font color="Green" title="E11">A3</font></span>: 
 <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c15">f</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c13">n</font>
 ; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> ( <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Maroon" title="c13">n</font>,<font color="Maroon" title="c14">p0</font>)</span>)</span>,<font color="Maroon" title="c11">P</font>,<font color="Maroon" title="c12">s</font>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="gr_cy_1.html#K1" title="GR_CY_1:func.1">Sum</a> <font color="Maroon" title="c15">f</font> &amp;  <a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Maroon" title="c13">n</font>,<font color="Maroon" title="c14">p0</font>) <a href="scmpds_6.html#R2" title="SCMPDS_6:pred.2">is_halting_on</a> <font color="Maroon" title="c12">s</font>,<font color="Maroon" title="c11">P</font> )</span><br/>

<span class="kw">set </span><font color="Maroon" title="c16">a</font> =  <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> ;<br/>
<span class="kw">set </span><font color="Maroon" title="c17">i1</font> = <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a>;<br/>
<span class="kw">set </span><font color="Maroon" title="c18">i2</font> = <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a>;<br/>
<span class="kw">set </span><font color="Maroon" title="c19">i3</font> = <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p1">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span>;<br/>
<span class="kw">set </span><font color="Maroon" title="c20">i4</font> = <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p1">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span>;<br/>
<span class="kw">set </span><font color="Maroon" title="c21">t0</font> =  <a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font>;<br/>
<span class="kw">set </span><font color="Maroon" title="c22">I4</font> = <span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>;<br/>
<span class="kw">set </span><font color="Maroon" title="c23">t1</font> =  <a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>);<br/>
<span class="kw">set </span><font color="Maroon" title="c24">Q1</font> = <font color="Maroon" title="c11">P</font>;<br/>
<span class="kw">set </span><font color="Maroon" title="c25">t2</font> =  <a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>);<br/>
<span class="kw">set </span><font color="Maroon" title="c26">t3</font> =  <a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>);<br/>
<span class="kw">set </span><font color="Maroon" title="c27">t4</font> =  <a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p1">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span>,<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>);<br/>
<div><a class="txt" onclick="hs2(this)" href="javascript:()" title="10_1"><span class="kw">now </span></a><div class="add"><span class="kw">let </span><font color="Maroon" title="c28">i</font> be    <a href="subset_1.html#M2" title="SUBSET_1:mode.2">Element</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a> ; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  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="c28">i</font> &amp; <font color="Maroon" title="c28">i</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a>  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c15">f</font> implies <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c15">f</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c28">i</font> )</span><br/><span class="kw">assume </span><span class="kw">that </span><br/><a NAME="E1:10_1"/><span class="lab"><font color="Green" title="E12">A4</font></span>: 
1 <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c28">i</font>
 <span class="kw">and </span><br/><a NAME="E2:10_1"/><span class="lab"><font color="Green" title="E13">A5</font></span>: 
<font color="Maroon" title="c28">i</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a>  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c15">f</font>
 ; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Maroon" title="c15">f</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c28">i</font></span><br/><a NAME="E3:10_1"/><span class="lab"><font color="Green" title="E14">A6</font></span>: 
<font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1 <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> 3 <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E2:10"><span class="lab"><font color="Green" title="E9">A1</font></span></a>, <a class="ref" href="xreal_1.html#T6" title="XREAL_1:th.6">XREAL_1:6</a></span>;<br/><a NAME="E4:10_1"/><span class="lab"><font color="Green" title="E15">A7</font></span>: 
<font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font> <a href="xxreal_0.html#NR2" title="XXREAL_0:NR.2">&gt;=</a> <font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E1:10_1"><span class="lab"><font color="Green" title="E12">A4</font></span></a>, <a class="ref" href="xreal_1.html#T6" title="XREAL_1:th.6">XREAL_1:6</a></span>;<br/><a NAME="E5:10_1"/><span class="kw">then </span>
<font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a> 3
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:10_1"><span class="lab"><font color="Green" title="E14">A6</font></span></a>, <a class="ref" href="xxreal_0.html#T2" title="XXREAL_0:th.2">XXREAL_0:2</a></span>;<br/><a NAME="E6:10_1"/><span class="kw">then </span><span class="lab"><font color="Green" title="E16">A8</font></span>: 
 <a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p1">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a>  <a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3
 <span class="kw">by</span> <span class="lab"><a class="ref" href="zfmisc_1.html#T27" title="ZFMISC_1:th.27">ZFMISC_1:27</a></span>;<br/><a NAME="E7:10_1"/>
<font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a>  <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:10_1"><span class="lab"><font color="Green" title="E14">A6</font></span></a>, <a class="txt" href="#E4:10_1"><span class="lab"><font color="Green" title="E15">A7</font></span></a>, <a class="ref" href="xxreal_0.html#T2" title="XXREAL_0:th.2">XXREAL_0:2</a></span>;<br/><a NAME="E8:10_1"/><span class="kw">then </span><span class="lab"><font color="Green" title="E17">A9</font></span>: 
 <a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p1">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a>  <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> 
 <span class="kw">by</span> <span class="lab"><a class="ref" href="zfmisc_1.html#T27" title="ZFMISC_1:th.27">ZFMISC_1:27</a></span>;<br/><a NAME="E9:10_1"/>
<font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a> 1
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:10_1"><span class="lab"><font color="Green" title="E14">A6</font></span></a>, <a class="txt" href="#E4:10_1"><span class="lab"><font color="Green" title="E15">A7</font></span></a>, <a class="ref" href="xxreal_0.html#T2" title="XXREAL_0:th.2">XXREAL_0:2</a></span>;<br/><a NAME="E10:10_1"/><span class="kw">then </span><span class="lab"><font color="Green" title="E18">A10</font></span>: 
 <a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p1">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a>  <a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1
 <span class="kw">by</span> <span class="lab"><a class="ref" href="zfmisc_1.html#T27" title="ZFMISC_1:th.27">ZFMISC_1:27</a></span>;<br/><a NAME="E11:10_1"/>
<font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a> 2
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:10_1"><span class="lab"><font color="Green" title="E14">A6</font></span></a>, <a class="txt" href="#E4:10_1"><span class="lab"><font color="Green" title="E15">A7</font></span></a>, <a class="ref" href="xxreal_0.html#T2" title="XXREAL_0:th.2">XXREAL_0:2</a></span>;<br/><a NAME="E12:10_1"/><span class="kw">then </span><span class="lab"><font color="Green" title="E19">A11</font></span>: 
 <a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p1">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span> <a href="hidden.html#NR2" title="HIDDEN:NR.2">&lt;&gt;</a>  <a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2
 <span class="kw">by</span> <span class="lab"><a class="ref" href="zfmisc_1.html#T27" title="ZFMISC_1:th.27">ZFMISC_1:27</a></span>;<br/><span class="kw">thus </span><span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span> = 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T41" title="SCMPDS_5:th.41">SCMPDS_5:41</a></span>
<br/>.= 
<span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E6:10_1"><span class="lab"><font color="Green" title="E16">A8</font></span></a>, <a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
<br/>.= 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span>,<span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T41" title="SCMPDS_5:th.41">SCMPDS_5:41</a></span>
<br/>.= 
<span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E12:10_1"><span class="lab"><font color="Green" title="E19">A11</font></span></a>, <a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
<br/>.= 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span>,<span class="p2">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p3">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T42" title="SCMPDS_5:th.42">SCMPDS_5:42</a></span>
<br/>.= 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E10:10_1"><span class="lab"><font color="Green" title="E18">A10</font></span></a>, <a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
<br/>.= 
<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E8:10_1"><span class="lab"><font color="Green" title="E17">A9</font></span></a>, <a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
<br/>.= 
<font color="Maroon" title="c12">s</font> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T15" title="SCMPDS_5:th.15">SCMPDS_5:15</a></span>
<br/>.= 
<font color="Maroon" title="c15">f</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c28">i</font>
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:10"><span class="lab"><font color="Green" title="E10">A2</font></span></a>, <a class="txt" href="#E1:10_1"><span class="lab"><font color="Green" title="E12">A4</font></span></a>, <a class="txt" href="#E2:10_1"><span class="lab"><font color="Green" title="E13">A5</font></span></a>, <a class="ref" href="scpisort.html#D1" title="SCPISORT:def.1">SCPISORT:def 1</a></span>
; <a class="txt" 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>
<a NAME="E6:10"/><span class="kw">then </span><span class="lab"><font color="Green" title="E12">A12</font></span>: 
<font color="Maroon" title="c15">f</font> <a href="scpisort.html#R1" title="SCPISORT:pred.1">is_FinSequence_on</a>  <a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>),<font color="Maroon" title="c14">p0</font>
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="scpisort.html#D1" title="SCPISORT:def.1">SCPISORT:def 1</a></span>;<br/>
<a NAME="E7:10"/><span class="lab"><font color="Green" title="E13">A13</font></span>: 
<font color="Maroon" title="c15">f</font> <a href="scpisort.html#R1" title="SCPISORT:pred.1">is_FinSequence_on</a>  <a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>,<font color="Maroon" title="c14">p0</font>
 
<div><a class="txt" onclick="hs2(this)" href="javascript:()" title="10_2"><span class="kw">proof </span></a><div class="add">

<span class="kw">let </span><font color="Maroon" title="c28">i</font> be    <a href="subset_1.html#M2" title="SUBSET_1:mode.2">Element</a> of  <a href="numbers.html#K5" title="NUMBERS:func.5">NAT</a> ; <span class="comment"><font color="firebrick">:: according to </font></span><a class="ref" href="scpisort.html#D1" title="SCPISORT:def.1">SCPISORT:def 1</a> <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> (  not 1 <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c28">i</font> or  not <font color="Maroon" title="c28">i</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a>  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c15">f</font> or <font color="Maroon" title="c15">f</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c28">i</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span></span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span> )</span><br/>

<span class="kw">assume </span><a NAME="E1:10_2"/>
( 1 <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a> <font color="Maroon" title="c28">i</font> &amp; <font color="Maroon" title="c28">i</font> <a href="xxreal_0.html#R1" title="XXREAL_0:pred.1">&lt;=</a>  <a href="finseq_1.html#K3" title="FINSEQ_1:func.3">len</a> <font color="Maroon" title="c15">f</font> )
 ; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> <font color="Maroon" title="c15">f</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c28">i</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span></span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span></span><br/>

<a NAME="E2:10_2"/><span class="kw">then </span>
<font color="Maroon" title="c15">f</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c28">i</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span>
 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E6:10"><span class="lab"><font color="Green" title="E12">A12</font></span></a>, <a class="ref" href="scpisort.html#D1" title="SCPISORT:def.1">SCPISORT:def 1</a></span>;<br/>
<span class="kw">hence </span><a NAME="E3:10_2"/>
<font color="Maroon" title="c15">f</font> <a href="funct_1.html#K1" title="FUNCT_1:func.1">.</a> <font color="Maroon" title="c28">i</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span></span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> <span class="p2">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <font color="Maroon" title="c28">i</font></span>)</span></span>)</span>
 <span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T15" title="SCMPDS_5:th.15">SCMPDS_5:15</a></span>; <a class="txt" 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>
<a NAME="E8:10"/><span class="lab"><font color="Green" title="E14">A14</font></span>: 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>;<br/>
<span class="lab"><font color="Green" title="E15">A15</font></span>: <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> = 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span>,<span class="p2">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p3">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T42" title="SCMPDS_5:th.42">SCMPDS_5:42</a></span>
<br/>.= 
 <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E8:10"><span class="lab"><font color="Green" title="E14">A14</font></span></a>, <a class="ref" href="ami_3.html#T10" title="AMI_3:th.10">AMI_3:10</a>, <a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
;<br/>
<span class="lab"><font color="Green" title="E16">A16</font></span>: <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> = 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span>,<span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T41" title="SCMPDS_5:th.41">SCMPDS_5:41</a></span>
<br/>.= 
 <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E9:10"><span class="lab"><font color="Green" title="E15">A15</font></span></a>, <a class="ref" href="ami_3.html#T10" title="AMI_3:th.10">AMI_3:10</a>, <a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
;<br/>
<span class="lab"><font color="Green" title="E17">A17</font></span>: <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> = 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T41" title="SCMPDS_5:th.41">SCMPDS_5:41</a></span>
<br/>.= 
<font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
;<br/>
<a NAME="E12:10"/><span class="lab"><font color="Green" title="E18">A18</font></span>: 
<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span></span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span>
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T15" title="SCMPDS_5:th.15">SCMPDS_5:15</a></span>;<br/>
<span class="lab"><font color="Green" title="E19">A19</font></span>: <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> = 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span>,<span class="p2">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p3">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T42" title="SCMPDS_5:th.42">SCMPDS_5:42</a></span>
<br/>.= 
 <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
;<br/>
<span class="lab"><font color="Green" title="E20">A20</font></span>: <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> = 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span>,<span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T41" title="SCMPDS_5:th.41">SCMPDS_5:41</a></span>
<br/>.= 
 <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E13:10"><span class="lab"><font color="Green" title="E19">A19</font></span></a>, <a class="ref" href="ami_3.html#T10" title="AMI_3:th.10">AMI_3:10</a>, <a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
;<br/>
<a NAME="E15:10"/><span class="lab"><font color="Green" title="E21">A21</font></span>: 
<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span></span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span>
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T15" title="SCMPDS_5:th.15">SCMPDS_5:15</a></span>;<br/>
<span class="lab"><font color="Green" title="E22">A22</font></span>: <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> = 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T41" title="SCMPDS_5:th.41">SCMPDS_5:41</a></span>
<br/>.= 
 <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E14:10"><span class="lab"><font color="Green" title="E20">A20</font></span></a>, <a class="ref" href="ami_3.html#T10" title="AMI_3:th.10">AMI_3:10</a>, <a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
;<br/>
<span class="lab"><font color="Green" title="E23">A23</font></span>: <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> = 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span>,<span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T41" title="SCMPDS_5:th.41">SCMPDS_5:41</a></span>
<br/>.= 
 <a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
;<br/>
<a NAME="E18:10"/><span class="lab"><font color="Green" title="E24">A24</font></span>: 
<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span></span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span>
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T15" title="SCMPDS_5:th.15">SCMPDS_5:15</a></span>;<br/>
<a NAME="E19:10"/><span class="lab"><font color="Green" title="E25">A25</font></span>: 
<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span></span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T15" title="SCMPDS_5:th.15">SCMPDS_5:15</a></span>;<br/>
<span class="lab"><font color="Green" title="E26">A26</font></span>: <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> = 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T41" title="SCMPDS_5:th.41">SCMPDS_5:41</a></span>
<br/>.= 
 <a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font>
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E17:10"><span class="lab"><font color="Green" title="E23">A23</font></span></a>, <a class="ref" href="ami_3.html#T10" title="AMI_3:th.10">AMI_3:10</a>, <a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
;<br/>
<span class="lab"><font color="Green" title="E27">A27</font></span>: <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> = 
<span class="p1">(<span class="default"><a href="extpro_1.html#K2" title="EXTPRO_1:func.2">Exec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span>,<span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_5.html#T41" title="SCMPDS_5:th.41">SCMPDS_5:41</a></span>
<br/>.= 
 <a href="numbers.html#K6" title="NUMBERS:func.6">0</a> 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E10:10"><span class="lab"><font color="Green" title="E16">A16</font></span></a>, <a class="ref" href="ami_3.html#T10" title="AMI_3:th.10">AMI_3:10</a>, <a class="ref" href="scmpds_2.html#T45" title="SCMPDS_2:th.45">SCMPDS_2:45</a></span>
;<br/>
<a NAME="E22:10"/><span class="kw">then </span>
(  <a href="scmpds_8.html#K1" title="SCMPDS_8:func.1">while&lt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmpds_2.html#K13" title="SCMPDS_2:func.13">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1,<span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3,1)</span>)</span></span>)</span>) <a href="scmpds_6.html#R1" title="SCMPDS_6:pred.1">is_closed_on</a>  <a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>,<font color="Maroon" title="c11">P</font> &amp;  <a href="scmpds_8.html#K1" title="SCMPDS_8:func.1">while&lt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmpds_2.html#K13" title="SCMPDS_2:func.13">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1,<span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3,1)</span>)</span></span>)</span>) <a href="scmpds_6.html#R2" title="SCMPDS_6:pred.2">is_halting_on</a>  <a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span>,<font color="Maroon" title="c11">P</font> )
 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E2:10"><span class="lab"><font color="Green" title="E9">A1</font></span></a>, <a class="txt" href="#E4:10"><span class="lab"><font color="Green" title="E11">A3</font></span></a>, <a class="txt" href="#E16:10"><span class="lab"><font color="Green" title="E22">A22</font></span></a>, <a class="txt" href="#E20:10"><span class="lab"><font color="Green" title="E26">A26</font></span></a>, <a class="txt" href="#E11:10"><span class="lab"><font color="Green" title="E17">A17</font></span></a>, <a class="txt" href="scpinvar.html#E7"><span class="lab"><font color="Green" title="E6">Lm3</font></span></a>, <a class="txt" href="#E7:10"><span class="lab"><font color="Green" title="E13">A13</font></span></a>, <a class="txt" href="#E12:10"><span class="lab"><font color="Green" title="E18">A18</font></span></a>, <a class="txt" href="#E15:10"><span class="lab"><font color="Green" title="E21">A21</font></span></a>, <a class="txt" href="#E18:10"><span class="lab"><font color="Green" title="E24">A24</font></span></a>, <a class="txt" href="#E19:10"><span class="lab"><font color="Green" title="E25">A25</font></span></a></span>;<br/>
<a NAME="E23:10"/><span class="kw">then </span><span class="lab"><font color="Green" title="E28">A28</font></span>: 
(  <a href="scmpds_8.html#K1" title="SCMPDS_8:func.1">while&lt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmpds_2.html#K13" title="SCMPDS_2:func.13">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1,<span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3,1)</span>)</span></span>)</span>) <a href="scmpds_6.html#R1" title="SCMPDS_6:pred.1">is_closed_on</a>  <a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>),<font color="Maroon" title="c11">P</font> &amp;  <a href="scmpds_8.html#K1" title="SCMPDS_8:func.1">while&lt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmpds_2.html#K13" title="SCMPDS_2:func.13">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1,<span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3,1)</span>)</span></span>)</span>) <a href="scmpds_6.html#R2" title="SCMPDS_6:pred.2">is_halting_on</a>  <a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p3">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>),<font color="Maroon" title="c11">P</font> )
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_6.html#T125" title="SCMPDS_6:th.125">SCMPDS_6:125</a>, <a class="ref" href="scmpds_6.html#T126" title="SCMPDS_6:th.126">SCMPDS_6:126</a></span>;<br/>
<a NAME="E24:10"/>
 <a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p1">(<span class="default"><a href="scmpds_8.html#K1" title="SCMPDS_8:func.1">while&lt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmpds_2.html#K13" title="SCMPDS_2:func.13">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1,<span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3,1)</span>)</span></span>)</span>)</span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p2">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p5">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p3">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span></span>)</span>) <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p1">(<span class="default"><a href="scmpds_8.html#K1" title="SCMPDS_8:func.1">while&lt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,<span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="scmpds_2.html#K13" title="SCMPDS_2:func.13">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1,<span class="p5">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p4">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3,1)</span>)</span></span>)</span>)</span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p1">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p3">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p4">(<span class="default"><span class="p5">(<span class="default"><span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p1">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p0">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p4">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span></span>)</span></span>)</span>)
 
;<br/>
<a NAME="E25:10"/><span class="kw">then </span>
<span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><a href="scmpds_8.html#K1" title="SCMPDS_8:func.1">while&lt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,<span class="p3">(<span class="default"><span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmpds_2.html#K13" title="SCMPDS_2:func.13">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1,<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p5">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p4">(<span class="default"><a href="scmpds_2.html#K12" title="SCMPDS_2:func.12">AddTo</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3,1)</span>)</span></span>)</span>)</span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p2">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <span class="p3">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p4">(<span class="default"><span class="p5">(<span class="default"><span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p0">(<span class="default"><span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 2</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p1">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <font color="Maroon" title="c13">n</font></span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 3</span>)</span> <a href="scmpds_2.html#K6" title="SCMPDS_2:func.6">:=</a> <span class="p0">(<span class="default"><font color="Maroon" title="c14">p0</font> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span>,<font color="Maroon" title="c11">P</font>,<span class="p4">(<span class="default"><a href="memstr_0.html#K6" title="MEMSTR_0:func.6">Initialize</a> <font color="Maroon" title="c12">s</font></span>)</span>)</span>)</span></span>)</span>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="gr_cy_1.html#K1" title="GR_CY_1:func.1">Sum</a> <font color="Maroon" title="c15">f</font>
 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E2:10"><span class="lab"><font color="Green" title="E9">A1</font></span></a>, <a class="txt" href="#E4:10"><span class="lab"><font color="Green" title="E11">A3</font></span></a>, <a class="txt" href="#E21:10"><span class="lab"><font color="Green" title="E27">A27</font></span></a>, <a class="txt" href="#E16:10"><span class="lab"><font color="Green" title="E22">A22</font></span></a>, <a class="txt" href="#E20:10"><span class="lab"><font color="Green" title="E26">A26</font></span></a>, <a class="txt" href="#E11:10"><span class="lab"><font color="Green" title="E17">A17</font></span></a>, <a class="txt" href="scpinvar.html#E7"><span class="lab"><font color="Green" title="E6">Lm3</font></span></a>, <a class="txt" href="#E7:10"><span class="lab"><font color="Green" title="E13">A13</font></span></a>, <a class="txt" href="#E12:10"><span class="lab"><font color="Green" title="E18">A18</font></span></a>, <a class="txt" href="#E15:10"><span class="lab"><font color="Green" title="E21">A21</font></span></a>, <a class="txt" href="#E18:10"><span class="lab"><font color="Green" title="E24">A24</font></span></a>, <a class="txt" href="#E19:10"><span class="lab"><font color="Green" title="E25">A25</font></span></a></span>;<br/>
<span class="kw">hence </span><a NAME="E26:10"/>
<span class="p1">(<span class="default"><a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">IExec</a> (<span class="p2">(<span class="default"><a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Maroon" title="c13">n</font>,<font color="Maroon" title="c14">p0</font>)</span>)</span>,<font color="Maroon" title="c11">P</font>,<font color="Maroon" title="c12">s</font>)</span>)</span> <a href="scmpds_2.html#K2" title="SCMPDS_2:func.2">.</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a>  <a href="gr_cy_1.html#K1" title="GR_CY_1:func.1">Sum</a> <font color="Maroon" title="c15">f</font>
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E23:10"><span class="lab"><font color="Green" title="E28">A28</font></span></a>, <a class="txt" href="#E1:10"><span class="lab"><font color="Green" title="E8">I</font></span></a>, <a class="ref" href="scpisort.html#T7" title="SCPISORT:th.7">SCPISORT:7</a></span>; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide">  <a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Maroon" title="c13">n</font>,<font color="Maroon" title="c14">p0</font>) <a href="scmpds_6.html#R2" title="SCMPDS_6:pred.2">is_halting_on</a> <font color="Maroon" title="c12">s</font>,<font color="Maroon" title="c11">P</font></span><br/>

<span class="kw">thus </span><a NAME="E27:10"/>
 <a href="scpinvar.html#K1" title="SCPINVAR:func.1">sum</a> (<font color="Maroon" title="c13">n</font>,<font color="Maroon" title="c14">p0</font>) <a href="scmpds_6.html#R2" title="SCMPDS_6:pred.2">is_halting_on</a> <font color="Maroon" title="c12">s</font>,<font color="Maroon" title="c11">P</font>
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E23:10"><span class="lab"><font color="Green" title="E28">A28</font></span></a>, <a class="ref" href="scpisort.html#T9" title="SCPISORT:th.9">SCPISORT:9</a></span>; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="firebrick">::  thesis: </font></span></a><span class="hide"> verum</span><br/>


</div>
