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

<span class="kw">let </span><font color="Maroon" title="c1">p</font> be   <a href="gr_cy_3.html#V2" title="GR_CY_3:attr.2">Sophie_Germain</a>  <a href="newton.html#NM1" title="NEWTON:NM.1">Prime</a>; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="Red">::  thesis: </font></span></a><span class="hide"> ( <font color="Maroon" title="c1">p</font> <a href="xxreal_0.html#NR4" title="XXREAL_0:NR.4">&gt;</a> 2 &amp; <font color="Maroon" title="c1">p</font> <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> 4 <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> 1 implies  ex <font color="Olive" title="b1">q</font> being  <a href="gr_cy_3.html#V1" title="GR_CY_3:attr.1">Safe</a>  <a href="newton.html#NM1" title="NEWTON:NM.1">Prime</a> st <span class="p1">(<span class="default"><a href="gr_cy_3.html#K1" title="GR_CY_3:func.1">Mersenne</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> <font color="Olive" title="b1">q</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Olive" title="b1">q</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 2 )</span><br/>

<span class="kw">assume </span><span class="kw">that </span><br/><a NAME="E1:34"/><span class="lab"><font color="Green" title="E17">A1</font></span>: 
<font color="Maroon" title="c1">p</font> <a href="xxreal_0.html#NR4" title="XXREAL_0:NR.4">&gt;</a> 2
 <span class="kw">and </span><br/><a NAME="E2:34"/><span class="lab"><font color="Green" title="E18">A2</font></span>: 
<font color="Maroon" title="c1">p</font> <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> 4 <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> 1
 ; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="Red">::  thesis: </font></span></a><span class="hide">  ex <font color="Olive" title="b1">q</font> being  <a href="gr_cy_3.html#V1" title="GR_CY_3:attr.1">Safe</a>  <a href="newton.html#NM1" title="NEWTON:NM.1">Prime</a> st <span class="p1">(<span class="default"><a href="gr_cy_3.html#K1" title="GR_CY_3:func.1">Mersenne</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> <font color="Olive" title="b1">q</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Olive" title="b1">q</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 2</span><br/>

<span class="kw">set </span><font color="Maroon" title="c2">q</font> = <span class="p1">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1;<br/>
<a NAME="E3:34"/><span class="lab"><font color="Green" title="E19">A3</font></span>: 
<span class="p1">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1 is   <a href="gr_cy_3.html#V1" title="GR_CY_3:attr.1">Safe</a>  <a href="newton.html#NM1" title="NEWTON:NM.1">Prime</a>
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="gr_cy_3.html#D1" target="_self" title="GR_CY_3:def.1">Def1</a>, <a class="ref" href="gr_cy_3.html#D2" target="_self" title="GR_CY_3:def.2">Def2</a></span>;<br/>
<a NAME="E4:34"/><span class="lab"><font color="Green" title="E20">A4</font></span>: 
<span class="p1">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1 <a href="xxreal_0.html#NR4" title="XXREAL_0:NR.4">&gt;</a> 5
 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E1:34"><span class="lab"><font color="Green" title="E17">A1</font></span></a>, <a class="txt" href="gr_cy_3.html#E13"><span class="lab"><font color="Green" title="E9">Lm1</font></span></a></span>;<br/>
<a NAME="E5:34"/><span class="kw">then </span><span class="lab"><font color="Green" title="E21">A5</font></span>: 
<span class="p1">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1 <a href="xxreal_0.html#NR4" title="XXREAL_0:NR.4">&gt;</a> 5 <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 3
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="xreal_1.html#T53" title="XREAL_1:th.53">XREAL_1:53</a></span>;<br/>
<a NAME="E6:34"/><span class="kw">then </span>
2,<span class="p1">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1 <a href="int_2.html#R1" title="INT_2:pred.1">are_relative_prime</a> 
 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:34"><span class="lab"><font color="Green" title="E19">A3</font></span></a>, <a class="ref" href="int_2.html#T44" title="INT_2:th.44">INT_2:44</a>, <a class="ref" href="int_2.html#T47" title="INT_2:th.47">INT_2:47</a></span>;<br/>
<a NAME="E7:34"/><span class="kw">then </span><span class="lab"><font color="Green" title="E22">A6</font></span>: 
2 <a href="nat_d.html#K6" title="NAT_D:func.6">gcd</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> 1
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="int_2.html#D4" title="INT_2:def.4">INT_2:def 4</a></span>;<br/>
<a NAME="E8:34"/>
<font color="Maroon" title="c1">p</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><font color="Maroon" title="c1">p</font> <a href="nat_d.html#K3" title="NAT_D:func.3">div</a> 4</span>)</span> <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> 4</span>)</span> <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:34"><span class="lab"><font color="Green" title="E18">A2</font></span></a>, <a class="ref" href="int_1.html#T86" title="INT_1:th.86">INT_1:86</a></span>;<br/>
<a NAME="E9:34"/><span class="kw">then </span>
<span class="p1">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1 <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default"><font color="Maroon" title="c1">p</font> <a href="nat_d.html#K3" title="NAT_D:func.3">div</a> 4</span>)</span> <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> 8</span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 3
 
;<br/>
<span class="kw">then </span><span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> 8 = 
3 <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> 8
<span class="kw">by</span> <span class="lab"><a class="ref" href="nat_d.html#T21" title="NAT_D:th.21">NAT_D:21</a></span>
<br/>.= 
3
<span class="kw">by</span> <span class="lab"><a class="ref" href="nat_d.html#T24" title="NAT_D:th.24">NAT_D:24</a></span>
;<br/>
<a NAME="E11:34"/><span class="kw">then </span>
not 2 <a href="int_5.html#R1" title="INT_5:pred.1">is_quadratic_residue_mod</a> <span class="p1">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <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="#E3:34"><span class="lab"><font color="Green" title="E19">A3</font></span></a>, <a class="txt" href="#E5:34"><span class="lab"><font color="Green" title="E21">A5</font></span></a>, <a class="ref" href="int_5.html#T44" title="INT_5:th.44">INT_5:44</a></span>;<br/>
<a NAME="E12:34"/><span class="kw">then </span>
<span class="p1">(<span class="default">2 <a href="newton.html#K15" title="NEWTON:func.15">|^</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">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="nat_d.html#K7" title="NAT_D:func.7">-'</a> 1</span>)</span> <a href="nat_d.html#K3" title="NAT_D:func.3">div</a> 2</span>)</span></span>)</span> <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1
 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:34"><span class="lab"><font color="Green" title="E19">A3</font></span></a>, <a class="txt" href="#E5:34"><span class="lab"><font color="Green" title="E21">A5</font></span></a>, <a class="txt" href="#E7:34"><span class="lab"><font color="Green" title="E22">A6</font></span></a>, <a class="ref" href="int_5.html#T19" title="INT_5:th.19">INT_5:19</a></span>;<br/>
<a NAME="E13:34"/><span class="kw">then </span><span class="lab"><font color="Green" title="E23">A7</font></span>: 
<span class="p1">(<span class="default">2 <a href="newton.html#K15" title="NEWTON:func.15">|^</a> <span class="p2">(<span class="default"><span class="p3">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_d.html#K3" title="NAT_D:func.3">div</a> 2</span>)</span></span>)</span> <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="nat_d.html#T34" title="NAT_D:th.34">NAT_D:34</a></span>;<br/>
<a NAME="E14:34"/><span class="lab"><font color="Green" title="E24">A8</font></span>: 
<span class="p1">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1 <a href="xxreal_0.html#NR4" title="XXREAL_0:NR.4">&gt;</a> 5 <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 4
 
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E4:34"><span class="lab"><font color="Green" title="E20">A4</font></span></a>, <a class="ref" href="xreal_1.html#T53" title="XREAL_1:th.53">XREAL_1:53</a></span>;<br/>
<a NAME="E15:34"/><span class="kw">then </span>
<span class="p1">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <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> 1 <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="nat_1.html#T13" title="NAT_1:th.13">NAT_1:13</a></span>;<br/>
<a NAME="E16:34"/><span class="kw">then </span><span class="lab"><font color="Green" title="E25">A9</font></span>: 
<span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 2 is   <a href="nat_1.html#NM1" title="NAT_1:NM.1">Nat</a>
 
<span class="kw">by</span> <span class="lab"><a class="ref" href="nat_1.html#T21" title="NAT_1:th.21">NAT_1:21</a></span>;<br/>
<span class="p1">(<span class="default"><a href="gr_cy_3.html#K1" title="GR_CY_3:func.1">Mersenne</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> = 
<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default">2 <a href="newton.html#K3" title="NEWTON:func.3">|^</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> <span class="p2">(<span class="default">1 <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span> <a href="int_1.html#K6" title="INT_1:func.6">mod</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span>
<span class="kw">by</span> <span class="lab"><a class="ref" href="int_6.html#T7" title="INT_6:th.7">INT_6:7</a></span>
<br/>.= 
<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> <span class="p2">(<span class="default">1 <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> <span class="p3">(<span class="default"><span class="p4">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span></span>)</span></span>)</span> <a href="int_1.html#K6" title="INT_1:func.6">mod</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span>
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E13:34"><span class="lab"><font color="Green" title="E23">A7</font></span></a>, <a class="ref" href="nat_d.html#T18" title="NAT_D:th.18">NAT_D:18</a></span>
<br/>.= 
<span class="p1">(<span class="default"><span class="p2">(<span class="default"><span class="p3">(<span class="default"><span class="p4">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 1</span>)</span> <a href="int_1.html#K6" title="INT_1:func.6">mod</a> <span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span>
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E14:34"><span class="lab"><font color="Green" title="E24">A8</font></span></a>, <a class="ref" href="pepin.html#T5" title="PEPIN:th.5">PEPIN:5</a></span>
<br/>.= 
<span class="p1">(<span class="default"><span class="p2">(<span class="default">2 <a href="nat_1.html#K4" title="NAT_1:func.4">*</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_1.html#K2" title="NAT_1:func.2">+</a> 1</span>)</span> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 2
<span class="kw">by</span> <span class="lab"><a class="txt" href="#E16:34"><span class="lab"><font color="Green" title="E25">A9</font></span></a>, <a class="ref" href="nat_d.html#T24" title="NAT_D:th.24">NAT_D:24</a>, <a class="ref" href="xreal_1.html#T46" title="XREAL_1:th.46">XREAL_1:46</a></span>
;<br/>
<span class="kw">hence </span><a NAME="E18:34"/>
 ex <font color="Olive" title="b1">q</font> being  <a href="gr_cy_3.html#V1" title="GR_CY_3:attr.1">Safe</a>  <a href="newton.html#NM1" title="NEWTON:NM.1">Prime</a> st <span class="p1">(<span class="default"><a href="gr_cy_3.html#K1" title="GR_CY_3:func.1">Mersenne</a> <font color="Maroon" title="c1">p</font></span>)</span> <a href="nat_d.html#K4" title="NAT_D:func.4">mod</a> <font color="Olive" title="b1">q</font> <a href="hidden.html#R1" title="HIDDEN:pred.1">=</a> <font color="Olive" title="b1">q</font> <a href="xcmplx_0.html#K6" title="XCMPLX_0:func.6">-</a> 2
 <span class="kw">by</span> <span class="lab"><a class="txt" href="#E3:34"><span class="lab"><font color="Green" title="E19">A3</font></span></a></span>; <a class="txt" onclick="hs(this)" href="javascript:()"><span class="comment"><font color="Red">::  thesis: </font></span></a><span class="hide"> verum</span><br/>


</div>
