a
    h!D                     @   sz  d Z ddlZddlZddlmZmZ ddlZddlm	Z
 ddlmZmZmZ ddlmZmZmZmZmZ zddlZW n ey   edZY n0 G dd dZG d	d
 d
ZG dd dZdd Zdd Zdd Zd0ddZdd Zd1ddZdd Z ej!j"eedG dd dZ#g dZ$ej!j%de$d d! e$D d"d#d$ Z&d%d& Z'ej!(d'd(d) Z)d*d+ Z*d,d- Z+d.d/ Z,dS )2z
Test cdflib functions versus mpmath, if available.

The following functions still need tests:

- ncfdtr
- ncfdtri
- ncfdtridfn
- ncfdtridfd
- ncfdtrinc
- nbdtrik
- nbdtrin
- pdtrik
- nctdtr
- nctdtrit
- nctdtridf
- nctdtrinc

    N)assert_equalassert_allclose)MissingModulecheck_versionFuncData)ArgIntArgget_args	mpf2floatassert_mpmath_equalmpmathc                   @   s    e Zd ZdZdd Zdd ZdS )ProbArgz*Generate a set of probabilities on [0, 1].c                 C   s   d| _ d| _d S )Nr      )abself r   [/var/www/html/assistant/venv/lib/python3.9/site-packages/scipy/special/tests/test_cdflib.py__init__)   s    zProbArg.__init__c                 C   sr   t d|d }tdtd|}tjdd|d dddd }dttdd	| }tj|||f }t|S )
z3Return an array containing approximately n numbers.r      i333333?gffffff?F)ZendpointNi)maxnpZlogspacelog10ZlinspaceZr_unique)r   nmZv1Zv2Zv3vr   r   r   values.   s    zProbArg.valuesN)__name__
__module____qualname____doc__r   r   r   r   r   r   r   &   s   r   c                   @   s   e Zd Zdd Zdd ZdS )EndpointFilterc                 C   s   || _ || _|| _|| _d S N)r   r   rtolatol)r   r   r   r&   r'   r   r   r   r   9   s    zEndpointFilter.__init__c                 C   sb   t || j | jt | j | j k }t || j | jt | j | j k }t ||B ddS )NFT)r   absr   r&   r'   r   where)r   xZmask1Zmask2r   r   r   __call__?   s    ((zEndpointFilter.__call__N)r    r!   r"   r   r+   r   r   r   r   r$   8   s   r$   c                   @   s.   e Zd ZdddZdd Zd	d
 Zdd ZdS )_CDFDataT     Nc                 C   s   || _ || _|| _|| _|| _|| _|| _|| _|	| _t	|t
sNd | _d | _nf|
d us^|d urt	|
t
rp|
| _n|
gt| j | _t	|t
r|| _q|gt| j | _nd | _d | _d S r%   )spfuncmpfuncindexargspecspfunc_firstdpsr   r&   r'   
isinstancelist
endpt_rtol
endpt_atollen)r   r/   r0   r1   r2   r3   r4   r   r&   r'   r7   r8   r   r   r   r   F   s*    


z_CDFData.__init__c                 G   s   | j rx| j| }t|r tjS t|}||| j< t| j	( | j
t| }t|j}W d    q1 sl0    Y  n`t| j	$ | j
| }t|j}W d    n1 s0    Y  t|}||| j< | jt| }|S r%   )r3   r/   r   isnannanr6   r1   r   workdpsr4   r0   tupler
   real)r   argsresr   r   r   idmapc   s     


*
(
z_CDFData.idmapc                 C   s   | j d u r| jd u rd S g }t| j | j| jD ]Z\}}}|d u rV|d u rV|d  q.n|d u rdd}n|d u rpd}|t|j|j|| q.|S )N        )r7   r8   zipr2   appendr$   r   r   )r   filtersr&   r'   specr   r   r   get_param_filterw   s    
z_CDFData.get_param_filterc              
   C   s   t | j| j}|  }tt|jd }|jd }t||d d | j	f 
|jd df}t| j|||| j| jd|d  d S )Nr   r   F)param_columnsresult_columnsr&   r'   Z
vectorizedparam_filter)r	   r2   r   rG   r=   rangeshaper   Zhstackr1   Zreshaper   rA   r&   r'   check)r   r?   rJ   rH   rI   r   r   r   rM      s    
*
z_CDFData.check)Tr-   r.   NNNN)r    r!   r"   r   rA   rG   rM   r   r   r   r   r,   E   s      
r,   c                  O   s   t | i |}|  d S r%   )r,   rM   )r   kwdr   r   r   _assert_inverts   s    rP   c                 C   sp   t | t |t |  } }}| dkr4t dS | |krFt dS t jd|dd}t j||  | d |ddS )Nr   r   T)exactZx2regularized)r   mpfZfsubbetainc)kr   pZonempr   r   r   _binomial_cdf   s    "

rX   c                 C   sf   |dk rt dS t | t |t |  } }}| | | | |  }t j| d |d |dd}|S )Nr      TrR   )r   rT   rU   )dfnZdfdr*   Zubr@   r   r   r   _f_cdf   s    
"r[   c                 C   s   |d u rt jj}t | t | t | } }t dd| d  d|d  |  }||t d| d   9 }|t t j|  t d|    }d| W  d    S 1 s0    Y  d S )N      ?r         ?rY   )	r   mpr4   r<   rT   Zhyp2f1gammasqrtpi)dftr4   Zfacr   r   r   _student_t_cdf   s    ""rd   c                 C   sR   t |d d t ||  }|t | |  d | | |d d   d 9 }|S )NrY   r      r\   )r   Zbesselir`   exp)rc   rb   ncr@   r   r   r   _noncentral_chi_pdf   s    0rh   c                    s~   |d u rt jj}t | t  t   }  t |. t  fddd| g}|W  d    S 1 sp0    Y  d S )Nc                    s   t |  S r%   )rh   )rc   rb   rg   r   r   <lambda>       z%_noncentral_chi_cdf.<locals>.<lambda>r   )r   r^   r4   rT   r<   Zquad)r*   rb   rg   r4   r@   r   ri   r   _noncentral_chi_cdf   s    "rl   c                 C   s   | | d|  |  | S )Nr   r   )rW   lmbdar   r   r   _tukey_lmbda_quantile   s    rn   z0.19c                   @   s  e Zd Zejjdddd Zdd Zdd Zd	d
 Z	ejjdddd Z
dd Zdd Zdd Zdd Zdd Zdd Zejjdddd Zdd Zdd Zejjdddd  Zejjddd!d" Zd#d$ Zd%d& Zd'd( Zejjddd)d* Zejd+g d,d-d. Zd/S )0
TestCDFlibF)runc                 C   s(   t tjtdt tddt gdd d S )Nr   r     -C6?r&   )rP   spbdtrikrX   r   r   r   r   r   r   test_bdtrik   s    zTestCDFlib.test_bdtrikc                 C   s.   t tjtdtddt t gdg dd d S )Nr   rq   rr   )NNư>r&   r8   )rP   rt   bdtrinrX   r   r   r   r   r   r   test_bdtrin   s    zTestCDFlib.test_bdtrinc                 C   s:   t tjdd dt tddddtdddddgd	d
 d S )Nc                 S   s   t j| ||ddS NTrR   r   rU   r   r   r*   r   r   r   rj      rk   z)TestCDFlib.test_btdtria.<locals>.<lambda>r         Y@Finclusive_ar   r   inclusive_brw   rs   )rP   rt   btdtriar   r   r   r   r   r   test_btdtria   s    zTestCDFlib.test_btdtriac                 C   s@   t tjdd dtddddt tdddddgd	g d
d d S )Nc                 S   s   t j| ||ddS r{   r|   r}   r   r   r   rj      rk   z)TestCDFlib.test_btdtrib.<locals>.<lambda>r   r   r~   Fr   r   Hz>)NgC]r2<V瞯<rx   )rP   rt   btdtribr   r   r   r   r   r   test_btdtrib   s    zTestCDFlib.test_btdtribc                 C   s0   t tjtdtddt tddddgdd d S )Nr   d   r   Fr   r   rs   )rP   rt   fdtridfdr[   r   r   r   r   r   r   r   test_fdtridfd   s    zTestCDFlib.test_fdtridfdc                 C   s>   t tjdd dt tddddtddddgdg d	d
 d S )Nc                 S   s   t j|| | ddS NTr   rS   r   Zgammaincr}   r   r   r   rj      rk   z(TestCDFlib.test_gdtria.<locals>.<lambda>r        @@Fr   g     @r   Nr   绽|=rx   )rP   rt   gdtriar   r   r   r   r   r   test_gdtria   s    zTestCDFlib.test_gdtriac                 C   s8   t tjdd dtddddt tddddgd	d
 d S )Nc                 S   s   t j|| | ddS r   r   r}   r   r   r   rj   
  rk   z(TestCDFlib.test_gdtrib.<locals>.<lambda>r   r   r~   Fr   r   h㈵>rs   )rP   rt   gdtribr   r   r   r   r   r   test_gdtrib  s    zTestCDFlib.test_gdtribc              
   C   s>   t tjdd dtddddtddddt gdg d	d
 d S )Nc                 S   s   t j|| | ddS r   r   r}   r   r   r   rj     rk   z(TestCDFlib.test_gdtrix.<locals>.<lambda>rY   r   r   Fr   r   r   rx   )rP   rt   gdtrixr   r   r   r   r   r   test_gdtrix  s    zTestCDFlib.test_gdtrixc                 C   s8   t tjdd dt tdtjdddtddgd	d
 d S )Nc                 S   s   t || |S r%   r   Zncdfr*   yzr   r   r   rj   #  rk   z*TestCDFlib.test_nrdtrimn.<locals>.<lambda>r   皙?Fr   g    _g    _Br   rs   )rP   rt   nrdtrimnr   r   r   infr   r   r   r   test_nrdtrimn   s    zTestCDFlib.test_nrdtrimnc              
   C   s:   t tjdd dttj ddddt tddgdd	 d S )
Nc                 S   s   t || |S r%   r   r   r   r   r   rj   -  rk   z*TestCDFlib.test_nrdtrisd.<locals>.<lambda>r   
   Fr   g}Ô%ITr   rs   )rP   rt   nrdtrisdr   r   r   r   r   r   r   r   test_nrdtrisd*  s    zTestCDFlib.test_nrdtrisdc                 C   s(   t tjttddtdtjgdd d S )Nr   r   r   r   rs   )r   rt   stdtrrd   r   r   r   r   r   r   r   r   
test_stdtr4  s
    zTestCDFlib.test_stdtrc                 C   s    t tjtdt t gdd d S )Nr   r   rs   )rP   rt   stdtridfrd   r   r   r   r   r   r   test_stdtridf;  s
    zTestCDFlib.test_stdtridfc                 C   s*   t tjtdtddt gdd dgd d S )Nr   r   r   r   rx   )rP   rt   stdtritrd   r   r   r   r   r   r   test_stdtritB  s    zTestCDFlib.test_stdtritc                 C   s(   t tjdd dt tddgdd d S )Nc                 S   s   t j| d |d ddS )NrY   Tr   r   )r   r*   r   r   r   rj   L  rk   z)TestCDFlib.test_chdtriv.<locals>.<lambda>r   r   r   rr   rs   )rP   rt   chdtrivr   r   r   r   r   r   test_chdtrivI  s
    zTestCDFlib.test_chdtrivc                 C   s8   t tjtdtddddt tddddgdddd	 d S )
Nr   r   r   Fr   rq   rr   r   r   r&   r'   )rP   rt   	chndtridfrl   r   r   r   r   r   r   test_chndtridfO  s    zTestCDFlib.test_chndtridfc              	   C   s4   t tjtdtddddtddt gddd	d
 d S )NrY   r   r   Fr   r   rq   rr   r   r   )rP   rt   	chndtrincrl   r   r   r   r   r   r   r   test_chndtrincY  s    zTestCDFlib.test_chndtrincc                 C   s:   t tjtdt tddtddddgdddg d	d
 d S )Nr   r   r   Fr   rq   rr   r   )rw   NN)r   r&   r'   r8   )rP   rt   chndtrixrl   r   r   r   r   r   r   r   test_chndtrixb  s    zTestCDFlib.test_chndtrixc                    s.   t d tdd  fddt gdd d S )Nr   c                 S   s   t | dS )Nr   )rt   tklmbdar*   r   r   r   rj   o  rk   z4TestCDFlib.test_tklmbda_zero_shape.<locals>.<lambda>c                    s    t |     S r%   )r   rf   r   oner   r   rj   p  rk   r   rs   )r   rT   r   r   r   r   r   r   test_tklmbda_zero_shapek  s    

z"TestCDFlib.test_tklmbda_zero_shapec              
   C   s0   t tjtdt tddddgddddgd d S )Nr   iF)r   r   g&.>)r3   r&   r8   rP   rt   r   rn   r   r   r   r   r   r   test_tklmbda_neg_shapes  s    z!TestCDFlib.test_tklmbda_neg_shapec              
   C   s*   t tjtdt tddddgddd d S )Nr   r   Fr   r   )r3   r&   r   r   r   r   r   test_tklmbda_pos_shape{  s    z!TestCDFlib.test_tklmbda_pos_shaperm   )r\         ?g       @c                 C   s(   d| }t t| |g|ddg d S )Nr   rB   r   )r   rt   r   )r   rm   boundr   r   r   test_tklmbda_lmbda1  s    zTestCDFlib.test_tklmbda_lmbda1N)r    r!   r"   pytestmarkZxfailrv   rz   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   parametrizer   r   r   r   r   ro      s8   







	
	
ro   ))r   r   )r   r   )ru   r   )ry   r   )r   rY   )Zchndtrr   )r   r   )r   r   )r   r   )r   r   )Zncfdtrre   )Zncfdtrire   )Z
ncfdtridfnre   )Z
ncfdtridfdre   )Z	ncfdtrincre   )r   r   )r   r   )r   r   )nbdtrikr   )Znbdtrinr   )r   r   )r   r   )ZpdtrikrY   )r   rY   )r   rY   )r   rY   )nctdtrr   )Znctdtritr   )Z	nctdtridfr   )	nctdtrincr   )r   rY   zfunc,numargsc                 C   s   g | ]}|d  qS )r   r   .0r*   r   r   r   
<listcomp>  rk   r   )Zidsc                 C   sf   t jd}tt| } dd ||D }tj| D ],}| | }tdd |D r4t|t j	 q4q4d S )Nl   7'}?J-0 c                 S   s$   g | ]}t |tjtjtj fqS r   )floatr   r;   r   r   r   r   r   r     rk   z"test_nonfinite.<locals>.<listcomp>c                 s   s   | ]}t |V  qd S r%   )r   r:   r   r   r   r   	<genexpr>  rk   z!test_nonfinite.<locals>.<genexpr>)
r   randomZdefault_rnggetattrrt   	itertoolsproductanyr   r;   )funcZnumargsrngZargs_choicesr?   r@   r   r   r   test_nonfinite  s    
r   c                  C   s.   t ddtdd } g d}t| | d S )Ng!?rY   g      4@rw   )gyY;@gA@gʾC@g-E@g-oG@gNCEI@g0_{J@gY-L@gjrM@gZǧ9N@g-]fP@gmj#P@ggAQ@gl@Q@gndhR@g$܂R@g@FTxS@gēT@g]gϖT@gc$U@)rt   r   r   Zaranger   )r@   Zres_expr   r   r   test_chndtrix_gh2158  s    r   z&32bit fails due to algorithm thresholdc                  C   sf   g d} g d}g d}g d}g }t | ||D ]\}}}|t|||g7 }q2t||ddd d S )N)\(\?皙#@b     )gffffffgRQ?gffffff@&   )~jtX?333333?r]      )@礎pFh?r   gM/q?gea?g?gx$p?g0?gkeŧe?+1?r   ga?gip#t?rB   rB   rB   g!Ȩm?r   r   g3v?r   g?g:-?gy0 ?gC?r   r   g@;?gN?rB   rB   rB   g   >r   r   g$?r   g\+aYҏ?g0ku+?g2{q?r   r   r   g@L7d?r   rB   rB   rB   rB   r   r   g?r   g׏?gڙ-?g_"?r   r   r   g fu?r   rB   rB   rB   rB   rw   rB   r&   r'   )r   r   rt   r   r   )dfarrZpnoncarrtarrZresarrZactarrrb   rW   rc   r   r   r   test_nctdtr_gh19896  s    r   c                  C   sB   g d} g d}g d}g d}t | ||}t||ddd d S )N)
MbP?r   r   r   r   i'  r   r   r   r   )
r   r   r   皙?+?r   r   r   r   r   )
r   r   r]   r   ,  r   r   r]   r   r   )
K ˸@gtI?x9" @g.$Bt+@gO,oq@r   gZc^?r   g@gjgdy=rB   r   )rt   r   r   )r   Zparrr   Zdesiredactualr   r   r   test_nctdtrinc_gh19896  s    r   c                   C   sX   t t tt j t j dddt jgs0J t t tt j g dsTJ d S )N      rB   r   )rB   g      ?r\   g      ?r   )r   allr:   rt   r   r   r   r   r   r   r   test_stdtr_stdtrit_neg_inf  s    0r   c                  C   s   t t jt j ddddddddt jg} | d d d f } t t jt j ddddddt jg	}t t t| t j|s|J t t t	| t j|sJ d S )	Ng      $r   rB   r   r\   gH.?r   g      $@)
r   arrayr;   r   Z
atleast_2dr   r:   rt   ru   r   )r   rW   r   r   r   test_bdtrik_nbdtrik_inf  s      r   )N)N)-r#   r   numpyr   Znumpy.testingr   r   r   Zscipy.specialZspecialrt   Zscipy.special._testutilsr   r   r   Zscipy.special._mptestutilsr   r   r	   r
   r   r   ImportErrorr   r$   r,   rP   rX   r[   rd   rh   rl   rn   r   Zslowro   funcsr   r   r   Zxfail_on_32bitr   r   r   r   r   r   r   r   <module>   sD   P	

	 <#


"