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

<b>let </b><font color="Maroon" title="c17">I</font> be   <a href="scmpds_4.html#NM1" title="SCMPDS_4:NM.1">Program-block</a>;<br/><b>let </b><font color="Maroon" title="c18">a</font> be    <a href="scmpds_2.html#M1" title="SCMPDS_2:mode.1">Int_position</a> ;<br/><b>let </b><font color="Maroon" title="c19">i</font> be   <a href="int_1.html#NM1" title="INT_1:NM.1">Integer</a>;<br/>





<b>set </b><font color="Maroon" title="c20">i1</font> = <font color="Maroon" title="c18">a</font>,<font color="Maroon" title="c19">i</font> <a href="scmpds_2.html#K8" title="SCMPDS_2:func.8">&lt;&gt;0_goto</a> 2;<br/>
<b>set </b><font color="Maroon" title="c21">i2</font> =  <a href="scmpds_2.html#K4" title="SCMPDS_2:func.4">goto</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><a href="card_1.html#K4" title="CARD_1:func.4">card</a> <font color="Maroon" title="c17">I</font></span>)</span> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 2</span>)</span>;<br/>
<b>set </b><font color="Maroon" title="c22">i3</font> =  <a href="scmpds_2.html#K4" title="SCMPDS_2:func.4">goto</a> <span class="p1">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default"><a href="card_1.html#K4" title="CARD_1:func.4">card</a> <font color="Maroon" title="c17">I</font></span>)</span> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 2</span>)</span></span>)</span>;<br/>
<a NAME="E1:31"/><i><font color="Green" title="E24">A1</font></i>: 
 <a href="card_1.html#K4" title="CARD_1:func.4">card</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><font color="Maroon" title="c18">a</font>,<font color="Maroon" title="c19">i</font> <a href="scmpds_2.html#K8" title="SCMPDS_2:func.8">&lt;&gt;0_goto</a> 2</span>)</span> <a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">';'</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K4" title="SCMPDS_2:func.4">goto</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default"><a href="card_1.html#K4" title="CARD_1:func.4">card</a> <font color="Maroon" title="c17">I</font></span>)</span> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 2</span>)</span></span>)</span></span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> 2
 
<b>by </b><i><a class="ref" href="scmp_gcd.html#T9" title="SCMP_GCD:th.9">SCMP_GCD:9</a></i>;<br/>
<a NAME="E2:31"/>
 <a href="scpinvar.html#K3" title="SCPINVAR:func.3">while&lt;&gt;0</a> <font color="Maroon" title="c18">a</font>,<font color="Maroon" title="c19">i</font>,<font color="Maroon" title="c17">I</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><font color="Maroon" title="c18">a</font>,<font color="Maroon" title="c19">i</font> <a href="scmpds_2.html#K8" title="SCMPDS_2:func.8">&lt;&gt;0_goto</a> 2</span>)</span> <a href="scmpds_4.html#K6" title="SCMPDS_4:func.6">';'</a> <span class="p3">(<span class="default"><a href="scmpds_2.html#K4" title="SCMPDS_2:func.4">goto</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="card_1.html#K4" title="CARD_1:func.4">card</a> <font color="Maroon" title="c17">I</font></span>)</span> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 2</span>)</span></span>)</span></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <font color="Maroon" title="c17">I</font></span>)</span> <a href="scmpds_4.html#K3" title="SCMPDS_4:func.3">';'</a> <span class="p1">(<span class="default"><a href="scmpds_4.html#K1" title="SCMPDS_4:func.1">Load</a> <span class="p2">(<span class="default"><a href="scmpds_2.html#K4" title="SCMPDS_2:func.4">goto</a> <span class="p3">(<span class="default"><a href="xcmplx_0.html#K4" title="XCMPLX_0:func.4">-</a> <span class="p4">(<span class="default"><span class="p5">(<span class="default"><a href="card_1.html#K4" title="CARD_1:func.4">card</a> <font color="Maroon" title="c17">I</font></span>)</span> <a href="nat_1.html#K1" title="NAT_1:func.1">+</a> 2</span>)</span></span>)</span></span>)</span></span>)</span>
 
<b>by </b><i><a class="ref" href="scmpds_4.html#D5" title="SCMPDS_4:def.5">SCMPDS_4:def 5</a></i>;<br/>
<b>hence </b><a NAME="E3:31"/>
 <a href="scmpds_3.html#K6" title="SCMPDS_3:func.6">Shift</a> <font color="Maroon" title="c17">I</font>,2 <a href="tarski.html#R1" title="TARSKI:pred.1">c=</a>  <a href="scpinvar.html#K3" title="SCPINVAR:func.3">while&lt;&gt;0</a> <font color="Maroon" title="c18">a</font>,<font color="Maroon" title="c19">i</font>,<font color="Maroon" title="c17">I</font>
 <b>by </b><i><a class="txt" href="scpinvar.html#E1:31"><i><font color="Green" title="E24">A1</font></i></a>, <a class="ref" href="scmpds_7.html#T16" title="SCMPDS_7:th.16">SCMPDS_7:16</a></i>;<br/>


</div>
