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

<b>let </b><font color="Maroon">n</font> be    <a href="subset_1.html#M1">Element</a> of  <a href="numbers.html#K5">NAT</a> ;<br/><b>let </b><font color="Maroon">p0</font> be    <a href="subset_1.html#M1">Element</a> of  <a href="numbers.html#K5">NAT</a> ;<br/>



<b>set </b><font color="Maroon">i1</font> = <a href="scmp_gcd.html#K2">GBP</a>  <a href="scmpds_2.html#K6">:=</a> 0;<br/>
<b>set </b><font color="Maroon">i2</font> = <a href="scmp_gcd.html#K2">GBP</a> ,1 <a href="scmpds_2.html#K11">:=</a> 0;<br/>
<b>set </b><font color="Maroon">i3</font> = <a href="scmp_gcd.html#K2">GBP</a> ,2 <a href="scmpds_2.html#K11">:=</a> <span class="p1">(<span class="default"><font color="Maroon">n</font> <a href="xcmplx_0.html#K6">-</a> 1</span>)</span>;<br/>
<b>set </b><font color="Maroon">i4</font> = <a href="scmp_gcd.html#K2">GBP</a> ,3 <a href="scmpds_2.html#K11">:=</a> <font color="Maroon">p0</font>;<br/>
<b>thus </b> <a href="card_1.html#K4">card</a> <span class="p1">(<span class="default"><a href="scpisort.html#K1" target="_self">insert-sort</a> <font color="Maroon">n</font>,<font color="Maroon">p0</font></span>)</span> = 
<span class="p1">(<span class="default"><a href="card_1.html#K4">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">GBP</a>  <a href="scmpds_2.html#K6">:=</a> 0</span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p5">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,1 <a href="scmpds_2.html#K11">:=</a> 0</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p4">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,2 <a href="scmpds_2.html#K11">:=</a> <span class="p5">(<span class="default"><font color="Maroon">n</font> <a href="xcmplx_0.html#K6">-</a> 1</span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p3">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,3 <a href="scmpds_2.html#K11">:=</a> <font color="Maroon">p0</font></span>)</span></span>)</span></span>)</span> <a href="nat_1.html#K1">+</a> <span class="p1">(<span class="default"><a href="card_1.html#K4">card</a> <span class="p2">(<span class="default"><a href="scmpds_7.html#K2">for-down</a> <a href="scmp_gcd.html#K2">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">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,3,1</span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,4 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,3</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p0">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,1,1</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p5">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,6 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,1</span>)</span></span>)</span> <a href="scmpds_4.html#K3">';'</a> <span class="p4">(<span class="default"><a href="scmpds_8.html#K3">while&gt;0</a> <a href="scmp_gcd.html#K2">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">GBP</a> ,5 <a href="scmpds_2.html#K17">:=</a> <span class="p2">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p2">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p1">(<span class="default"><a href="scmpds_2.html#K14">SubFrom</a> <a href="scmp_gcd.html#K2">GBP</a> ,5,<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0</span>)</span></span>)</span> <a href="scmpds_4.html#K3">';'</a> <span class="p0">(<span class="default"><a href="scmpds_6.html#K3">if&gt;0</a> <a href="scmp_gcd.html#K2">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">GBP</a> ,5 <a href="scmpds_2.html#K17">:=</a> <span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span> <a href="scmpds_2.html#K17">:=</a> <span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,5</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,4,<span class="p4">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,6,<span class="p3">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span></span>)</span>,<span class="p1">(<span class="default"><a href="scmpds_4.html#K1">Load</a> <span class="p2">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,6 <a href="scmpds_2.html#K11">:=</a> 0</span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span>
<b>by </b><i><a class="ref" href="scmpds_4.html#T45">SCMPDS_4:45</a></i>
<br/>.= 
<span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="card_1.html#K4">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">GBP</a>  <a href="scmpds_2.html#K6">:=</a> 0</span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p5">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,1 <a href="scmpds_2.html#K11">:=</a> 0</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p4">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,2 <a href="scmpds_2.html#K11">:=</a> <span class="p5">(<span class="default"><font color="Maroon">n</font> <a href="xcmplx_0.html#K6">-</a> 1</span>)</span></span>)</span></span>)</span></span>)</span> <a href="nat_1.html#K1">+</a> 1</span>)</span> <a href="nat_1.html#K1">+</a> <span class="p1">(<span class="default"><a href="card_1.html#K4">card</a> <span class="p2">(<span class="default"><a href="scmpds_7.html#K2">for-down</a> <a href="scmp_gcd.html#K2">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">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,3,1</span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,4 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,3</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p0">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,1,1</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p5">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,6 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,1</span>)</span></span>)</span> <a href="scmpds_4.html#K3">';'</a> <span class="p4">(<span class="default"><a href="scmpds_8.html#K3">while&gt;0</a> <a href="scmp_gcd.html#K2">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">GBP</a> ,5 <a href="scmpds_2.html#K17">:=</a> <span class="p2">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p2">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p1">(<span class="default"><a href="scmpds_2.html#K14">SubFrom</a> <a href="scmp_gcd.html#K2">GBP</a> ,5,<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0</span>)</span></span>)</span> <a href="scmpds_4.html#K3">';'</a> <span class="p0">(<span class="default"><a href="scmpds_6.html#K3">if&gt;0</a> <a href="scmp_gcd.html#K2">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">GBP</a> ,5 <a href="scmpds_2.html#K17">:=</a> <span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span> <a href="scmpds_2.html#K17">:=</a> <span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,5</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,4,<span class="p4">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,6,<span class="p3">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span></span>)</span>,<span class="p1">(<span class="default"><a href="scmpds_4.html#K1">Load</a> <span class="p2">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,6 <a href="scmpds_2.html#K11">:=</a> 0</span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span>
<b>by </b><i><a class="ref" href="scmp_gcd.html#T8">SCMP_GCD:8</a></i>
<br/>.= 
<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="card_1.html#K4">card</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a>  <a href="scmpds_2.html#K6">:=</a> 0</span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p5">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,1 <a href="scmpds_2.html#K11">:=</a> 0</span>)</span></span>)</span></span>)</span> <a href="nat_1.html#K1">+</a> 1</span>)</span> <a href="nat_1.html#K1">+</a> 1</span>)</span> <a href="nat_1.html#K1">+</a> <span class="p1">(<span class="default"><a href="card_1.html#K4">card</a> <span class="p2">(<span class="default"><a href="scmpds_7.html#K2">for-down</a> <a href="scmp_gcd.html#K2">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">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,3,1</span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,4 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,3</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p0">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,1,1</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p5">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,6 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,1</span>)</span></span>)</span> <a href="scmpds_4.html#K3">';'</a> <span class="p4">(<span class="default"><a href="scmpds_8.html#K3">while&gt;0</a> <a href="scmp_gcd.html#K2">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">GBP</a> ,5 <a href="scmpds_2.html#K17">:=</a> <span class="p2">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p2">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p1">(<span class="default"><a href="scmpds_2.html#K14">SubFrom</a> <a href="scmp_gcd.html#K2">GBP</a> ,5,<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0</span>)</span></span>)</span> <a href="scmpds_4.html#K3">';'</a> <span class="p0">(<span class="default"><a href="scmpds_6.html#K3">if&gt;0</a> <a href="scmp_gcd.html#K2">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">GBP</a> ,5 <a href="scmpds_2.html#K17">:=</a> <span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span> <a href="scmpds_2.html#K17">:=</a> <span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,5</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,4,<span class="p4">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,6,<span class="p3">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span></span>)</span>,<span class="p1">(<span class="default"><a href="scmpds_4.html#K1">Load</a> <span class="p2">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,6 <a href="scmpds_2.html#K11">:=</a> 0</span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span>
<b>by </b><i><a class="ref" href="scmp_gcd.html#T8">SCMP_GCD:8</a></i>
<br/>.= 
<span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K1">+</a> 1</span>)</span> <a href="nat_1.html#K1">+</a> 1</span>)</span> <a href="nat_1.html#K1">+</a> <span class="p1">(<span class="default"><a href="card_1.html#K4">card</a> <span class="p2">(<span class="default"><a href="scmpds_7.html#K2">for-down</a> <a href="scmp_gcd.html#K2">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">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,3,1</span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,4 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,3</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p0">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,1,1</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p5">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,6 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,1</span>)</span></span>)</span> <a href="scmpds_4.html#K3">';'</a> <span class="p4">(<span class="default"><a href="scmpds_8.html#K3">while&gt;0</a> <a href="scmp_gcd.html#K2">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">GBP</a> ,5 <a href="scmpds_2.html#K17">:=</a> <span class="p2">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p2">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p1">(<span class="default"><a href="scmpds_2.html#K14">SubFrom</a> <a href="scmp_gcd.html#K2">GBP</a> ,5,<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0</span>)</span></span>)</span> <a href="scmpds_4.html#K3">';'</a> <span class="p0">(<span class="default"><a href="scmpds_6.html#K3">if&gt;0</a> <a href="scmp_gcd.html#K2">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">GBP</a> ,5 <a href="scmpds_2.html#K17">:=</a> <span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span> <a href="scmpds_2.html#K17">:=</a> <span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,5</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,4,<span class="p4">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,6,<span class="p3">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span></span>)</span>,<span class="p1">(<span class="default"><a href="scmpds_4.html#K1">Load</a> <span class="p2">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,6 <a href="scmpds_2.html#K11">:=</a> 0</span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span>
<b>by </b><i><a class="ref" href="scmp_gcd.html#T9">SCMP_GCD:9</a></i>
<br/>.= 
4 <a href="nat_1.html#K1">+</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="card_1.html#K4">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">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,3,1</span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p1">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,4 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,3</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p0">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,1,1</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p5">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,6 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,1</span>)</span></span>)</span> <a href="scmpds_4.html#K3">';'</a> <span class="p4">(<span class="default"><a href="scmpds_8.html#K3">while&gt;0</a> <a href="scmp_gcd.html#K2">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">GBP</a> ,5 <a href="scmpds_2.html#K17">:=</a> <span class="p2">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p2">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p1">(<span class="default"><a href="scmpds_2.html#K14">SubFrom</a> <a href="scmp_gcd.html#K2">GBP</a> ,5,<span class="p2">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0</span>)</span></span>)</span> <a href="scmpds_4.html#K3">';'</a> <span class="p0">(<span class="default"><a href="scmpds_6.html#K3">if&gt;0</a> <a href="scmp_gcd.html#K2">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">GBP</a> ,5 <a href="scmpds_2.html#K17">:=</a> <span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span> <a href="scmpds_4.html#K6">';'</a> <span class="p5">(<span class="default"><span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,<span class="p0">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span> <a href="scmpds_2.html#K17">:=</a> <span class="p0">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="scmp_gcd.html#K1">intpos</a> 4</span>)</span>,0 <a href="scmpds_2.html#K17">:=</a> <a href="scmp_gcd.html#K2">GBP</a> ,5</span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,4,<span class="p4">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K5">';'</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K12">AddTo</a> <a href="scmp_gcd.html#K2">GBP</a> ,6,<span class="p3">(<span class="default"><a href="xcmplx_0.html#K4">-</a> 1</span>)</span></span>)</span></span>)</span>,<span class="p1">(<span class="default"><a href="scmpds_4.html#K1">Load</a> <span class="p2">(<span class="default"><a href="scmp_gcd.html#K2">GBP</a> ,6 <a href="scmpds_2.html#K11">:=</a> 0</span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span></span>)</span> <a href="nat_1.html#K1">+</a> 3</span>)</span>
<b>by </b><i><a class="ref" href="scmpds_7.html#T60">SCMPDS_7:60</a></i>
<br/>.= 
23
<b>by </b><i/>
;<br/>


</div>
