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

<span class="kw">let </span><font color="Maroon" title="c30">n</font>, <font color="Maroon" title="c31">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">  <a href="card_1.html#K5" title="CARD_1:func.5">card</a> <span class="p1">(<span class="default"><a href="scpisort.html#K1" title="SCPISORT:func.1">insert-sort</a> (<font color="Maroon" title="c30">n</font>,<font color="Maroon" title="c31">p0</font>)</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> 23</span><br/>



<span class="kw">set </span><font color="Maroon" title="c32">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="c33">i2</font> = (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a>;<br/>
<span class="kw">set </span><font color="Maroon" title="c34">i3</font> = (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <span class="p1">(<span class="default"><font color="Maroon" title="c30">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span>;<br/>
<span class="kw">set </span><font color="Maroon" title="c35">i4</font> = (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <font color="Maroon" title="c31">p0</font>;<br/>
<span class="kw">thus </span> <a href="card_1.html#K5" title="CARD_1:func.5">card</a> <span class="p1">(<span class="default"><a href="scpisort.html#K1" title="SCPISORT:func.1">insert-sort</a> (<font color="Maroon" title="c30">n</font>,<font color="Maroon" title="c31">p0</font>)</span>)</span> = 
<span class="p1">(<span class="default"><a href="card_1.html#K5" title="CARD_1:func.5">card</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">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</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">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <span class="p5">(<span class="default"><font color="Maroon" title="c30">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p3">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <font color="Maroon" title="c31">p0</font></span>)</span></span>)</span></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <span class="p1">(<span class="default"><a href="card_1.html#K5" title="CARD_1:func.5">card</a> <span class="p2">(<span class="default"><a href="scmpds_7.html#K2" title="SCMPDS_7:func.2">for-down</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1,<span class="p3">(<span class="default"><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="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> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,4) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p0">(<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>,1,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">';'</a> <span class="p4">(<span class="default"><a href="scmpds_8.html#K2" title="SCMPDS_8:func.2">while&gt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6,<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>,5) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<span class="p2">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default"><a href="scmpds_2.html#K14" title="SCMPDS_2:func.14">SubFrom</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5,<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span></span>)</span> <a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">';'</a> <span class="p0">(<span class="default"><a href="scmpds_6.html#K3" title="SCMPDS_6:func.3">if&gt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5,<span class="p1">(<span class="default"><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>,5) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</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> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<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> 4</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5)</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>,4,<span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</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>,6,<span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</span>)</span></span>)</span>,<span class="p1">(<span class="default"><a href="compos_1.html#K14" title="COMPOS_1:func.14">Load</a> <span class="p2">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>)</span>)</span></span>)</span>)</span>)</span></span>)</span>)</span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="afinsq_1.html#T17" title="AFINSQ_1:th.17">AFINSQ_1:17</a></span>
<br/>.= 
<span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="card_1.html#K5" title="CARD_1:func.5">card</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">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</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">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <span class="p5">(<span class="default"><font color="Maroon" title="c30">n</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span></span>)</span></span>)</span></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <span class="p1">(<span class="default"><a href="card_1.html#K5" title="CARD_1:func.5">card</a> <span class="p2">(<span class="default"><a href="scmpds_7.html#K2" title="SCMPDS_7:func.2">for-down</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1,<span class="p3">(<span class="default"><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="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> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,4) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p0">(<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>,1,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">';'</a> <span class="p4">(<span class="default"><a href="scmpds_8.html#K2" title="SCMPDS_8:func.2">while&gt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6,<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>,5) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<span class="p2">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default"><a href="scmpds_2.html#K14" title="SCMPDS_2:func.14">SubFrom</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5,<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span></span>)</span> <a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">';'</a> <span class="p0">(<span class="default"><a href="scmpds_6.html#K3" title="SCMPDS_6:func.3">if&gt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5,<span class="p1">(<span class="default"><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>,5) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</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> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<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> 4</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5)</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>,4,<span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</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>,6,<span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</span>)</span></span>)</span>,<span class="p1">(<span class="default"><a href="compos_1.html#K14" title="COMPOS_1:func.14">Load</a> <span class="p2">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>)</span>)</span></span>)</span>)</span>)</span></span>)</span>)</span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmp_gcd.html#T4" title="SCMP_GCD:th.4">SCMP_GCD:4</a></span>
<br/>.= 
<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="card_1.html#K5" title="CARD_1:func.5">card</a> <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">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <span class="p1">(<span class="default"><a href="card_1.html#K5" title="CARD_1:func.5">card</a> <span class="p2">(<span class="default"><a href="scmpds_7.html#K2" title="SCMPDS_7:func.2">for-down</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1,<span class="p3">(<span class="default"><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="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> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,4) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p0">(<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>,1,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">';'</a> <span class="p4">(<span class="default"><a href="scmpds_8.html#K2" title="SCMPDS_8:func.2">while&gt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6,<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>,5) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<span class="p2">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default"><a href="scmpds_2.html#K14" title="SCMPDS_2:func.14">SubFrom</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5,<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span></span>)</span> <a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">';'</a> <span class="p0">(<span class="default"><a href="scmpds_6.html#K3" title="SCMPDS_6:func.3">if&gt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5,<span class="p1">(<span class="default"><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>,5) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</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> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<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> 4</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5)</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>,4,<span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</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>,6,<span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</span>)</span></span>)</span>,<span class="p1">(<span class="default"><a href="compos_1.html#K14" title="COMPOS_1:func.14">Load</a> <span class="p2">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>)</span>)</span></span>)</span>)</span>)</span></span>)</span>)</span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmp_gcd.html#T4" title="SCMP_GCD:th.4">SCMP_GCD:4</a></span>
<br/>.= 
<span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <span class="p1">(<span class="default"><a href="card_1.html#K5" title="CARD_1:func.5">card</a> <span class="p2">(<span class="default"><a href="scmpds_7.html#K2" title="SCMPDS_7:func.2">for-down</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,2,1,<span class="p3">(<span class="default"><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="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> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,4) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p0">(<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>,1,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">';'</a> <span class="p4">(<span class="default"><a href="scmpds_8.html#K2" title="SCMPDS_8:func.2">while&gt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6,<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>,5) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<span class="p2">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default"><a href="scmpds_2.html#K14" title="SCMPDS_2:func.14">SubFrom</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5,<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span></span>)</span> <a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">';'</a> <span class="p0">(<span class="default"><a href="scmpds_6.html#K3" title="SCMPDS_6:func.3">if&gt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5,<span class="p1">(<span class="default"><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>,5) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</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> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<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> 4</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5)</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>,4,<span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</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>,6,<span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</span>)</span></span>)</span>,<span class="p1">(<span class="default"><a href="compos_1.html#K14" title="COMPOS_1:func.14">Load</a> <span class="p2">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>)</span>)</span></span>)</span>)</span>)</span></span>)</span>)</span>)</span></span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmp_gcd.html#T5" title="SCMP_GCD:th.5">SCMP_GCD:5</a></span>
<br/>.= 
4 <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="card_1.html#K5" title="CARD_1:func.5">card</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"><span class="p1">(<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> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,4) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,3)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p0">(<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>,1,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p5">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,1)</span>)</span></span>)</span> <a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">';'</a> <span class="p4">(<span class="default"><a href="scmpds_8.html#K2" title="SCMPDS_8:func.2">while&gt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6,<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>,5) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<span class="p2">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</span>)</span> <a href="scmpds_4.html#K4" title="SCMPDS_4:func.4">';'</a> <span class="p1">(<span class="default"><a href="scmpds_2.html#K14" title="SCMPDS_2:func.14">SubFrom</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5,<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>)</span>)</span></span>)</span> <a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">';'</a> <span class="p0">(<span class="default"><a href="scmpds_6.html#K3" title="SCMPDS_6:func.3">if&gt;0</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5,<span class="p1">(<span class="default"><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>,5) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</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> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<span class="p0">(<span class="default"><a href="scmp_gcd.html#K1" title="SCMP_GCD:func.1">intpos</a> 4</span>)</span>,<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> 4</span>)</span>,<a href="numbers.html#K6" title="NUMBERS:func.6">0</a>) <a href="scmpds_2.html#K17" title="SCMPDS_2:func.17">:=</a> (<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,5)</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>,4,<span class="p4">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</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>,6,<span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> 1</span>)</span>)</span>)</span></span>)</span>,<span class="p1">(<span class="default"><a href="compos_1.html#K14" title="COMPOS_1:func.14">Load</a> <span class="p2">(<span class="default">(<a href="scmp_gcd.html#K2" title="SCMP_GCD:func.2">GBP</a>,6) <a href="scmpds_2.html#K11" title="SCMPDS_2:func.11">:=</a> <a href="numbers.html#K6" title="NUMBERS:func.6">0</a></span>)</span></span>)</span>)</span>)</span></span>)</span>)</span>)</span></span>)</span></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 3</span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="scmpds_7.html#T41" title="SCMPDS_7:th.41">SCMPDS_7:41</a></span>
<br/>.= 
23
<span class="kw">by</span> <span class="lab"><a class="txt" href="scpisort.html#E20"><span class="lab"><font color="Green" title="E12">Lm6</font></span></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>
