mò
º�øAc           @   s¯   d  k  i i Z d  k i i Z d  k Z d  k i	 i
 Z
 e
 i d ƒ a e i d d d d d ƒZ e i d d d ƒ d	 „ Z d
 „  Z e i d d d ƒ d d „ Z d „  Z d  S(   Ni'  t   bsdprodi    i   i   t   unitf1.5i   c         C   s©  t  i |  ƒ } | i ƒ  } | i d ƒ }	 t i	 ƒ  d } d } g  } xÛ t t t ƒ ƒ D]Ç } t | }
 | |
 d j o* | t |
 ƒ t |
 d |	 |
 ƒ 9} n | d d j o* | i t i t i |
 ƒ d | ƒ ƒ n t t i |
 ƒ ƒ } | | j o t i | d f d | ƒ qY qY Wt i d d f d ƒ t i | ƒ t i | ƒ t i d ƒ t i | t | ƒ d t i d d	 ƒ d
 |  | f ƒ t i ƒ  d  S(   Ni'  i   i    i2   i   f0.5s   $e^{%s}$f0.20000000000000001f0.10000000000000001s   %s: $%s$(   t   ect   EllipticCurvet   labelt   et	   conductort   Nt   anlistt   vt   gt   axest   ft   j0t   pointst   xranget   lent   Pt   it   pt   floatt   appendt   Gt   Pointt   matht   logt   intt   jt   textt   colort   Ct   patht   ps(   R   R   R   R   R   R   R   R   R   R	   R   (    (    t
   bsdprod.pyt   plot
   s.    
 
**#9c           C   s_   t  d d ƒ t  d d ƒ t  d d ƒ t  d d ƒ t  d d ƒ t  d	 d ƒ t  d
 d ƒ d  S(   Nt   11Ai    i   t   14Af0.5t   37At   37Bt   389At   5077At   33A(   i    i   i    (   i    f0.5i    (   i   i    i    (   i    i    i   (   i    i   i   (   i   i   i    (   i   i    f0.5(   R"   (    (    (    R!   t   go*   s    iè  c         C   s   t  i |  ƒ } | i ƒ  } d GH| i | ƒ } d GH| d j o t	 i
 | ƒ a n d GHt i ƒ  d } d } g  }
 x#t d ƒ D]} | d } t i | ƒ } x | | j  oq t | | j  o` | | j  oS t | }	 | |	 d j o* | t |	 ƒ t |	 d | |	 ƒ 9} n | d 7} q¤ W| | j p | | j o Pn |
 i t i | d	 | ƒ ƒ | d
 d j o' t i | d
 d f d | d
 ƒ q‚ q‚ Wt i d d	 f d ƒ t i | ƒ t i |
 ƒ t i d ƒ t i |
 t  |
 ƒ d t i d d ƒ d |  | f ƒ t i! ƒ  d  S(   Ns   counting pointss   making prime listi'  s   done making prime listi   i    i    f16.0i   i   f0.5s   $e^{%s}$f0.20000000000000001f0.10000000000000001s   %s: $%s$("   R   R   R   R   R   R   R   t   BR	   t   aritht   eratosthenesR   R
   R   R   R   R   R   R   t   kR   t   expt   xR   R   R   R   R   R   R   R   R   R   R    (   R   R   R+   R   R   R   R   R.   R   R   R   R	   R0   (    (    R!   t   plot24   sD     
 
 +
*+9c           C   s_   t  d d ƒ t  d d ƒ t  d d ƒ t  d d ƒ t  d d ƒ t  d	 d ƒ t  d
 d ƒ d  S(   NR#   i    i   R$   f0.5R%   R&   R'   R(   R)   (   i    i   i    (   i    f0.5i    (   i   i    i    (   i    i    i   (   i    i   i   (   i   i   i    (   i   i    f0.5(   R1   (    (    (    R!   t   go2`   s    (   i    i    (   i   i   (   t   manin.ellcurve.ellcurvet   ellcurveR   t   manin.plot.graphR"   t   graphR   R   t   manin.rings.aritht   ringsR,   R-   R   t   GraphR
   t   ColorR*   R1   R2   (	   R"   R,   R   R
   R1   R   R*   R   R2   (    (    R!   t   ?   s   	 	
,