o
    i[                     @   s  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yG   edZY nw G dd dZG d	d
 d
ZG dd dZdd Zdd Zdd Zd>ddZdd Zd>d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'd'd( Z(d)d* Z)d+d, Z*ej!%d-g d.g d/g d0g d1g d2g d3g d4g d5g d6g d7g d8g d9gd:d; Z+G d<d= d=Z,dS )?z
Test cdflib functions versus mpmath, if available.

The following functions still need tests:

- ncfdtri
- ncfdtridfn
- ncfdtridfd
- ncfdtrinc
- nbdtrik
- nbdtrin
- pdtrik
- 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   Y/home/kim/smarthome/.venv/lib/python3.10/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   7   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$   6   s    r$   c                   @   s4   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
s(d | _d | _d S |
d us0|d urWt	|
t
r9|
| _n	|
gt| j | _t	|t
rL|| _d S |gt| j | _d S 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   D   s*   





z_CDFData.__init__c                 G   s   | j r>| j| }t|rtjS t|}||| j< t| j	 | j
t| }t|j}W d    |S 1 s7w   Y  |S t| j	 | j
| }t|j}W d    n1 sYw   Y  t|}||| j< | jt| }|S r%   )r3   r/   r   isnannanr6   r1   r   workdpsr4   r0   tupler
   real)r   argsresr   r   r   idmapa   s*   





z_CDFData.idmapc                 C   s   | j d u r| jd u rd S g }t| j | j| jD ],\}}}|d u r*|d u r*|d  q|d u r1d}n|d u r7d}|t|j|j|| q|S )N        )r7   r8   zipr2   appendr$   r   r   )r   filtersr&   r'   specr   r   r   get_param_filteru   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,   C   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rt dS | |kr#t 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   )dfndfdr*   Zubr@   r   r   r   _f_cdf   s   
"r\   c                 C   s   |d u rt jj}t |F t | t |} }t dd| d  d|d  |  }||t d| d   9 }|t t j|  t d|    }d| W  d    S 1 sVw   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   ""$re   c                 C   sR   t |d d t ||  }|t | |  d | | |d d   d 9 }|S )NrY   r      r]   )r   Zbesselira   exp)rd   rc   ncr@   r   r   r   _noncentral_chi_pdf   s   0ri   c                    s~   |d u rt jj}t | t  t }  t | t  fddd| g}|W  d    S 1 s8w   Y  d S )Nc                    s   t |  S r%   )ri   )rd   rc   rh   r   r   <lambda>       z%_noncentral_chi_cdf.<locals>.<lambda>r   )r   r_   r4   rT   r<   Zquad)r*   rc   rh   r4   r@   r   rj   r   _noncentral_chi_cdf   s   "$rm   c                 C   s   | | d|  |  | S )Nr   r   )rW   lmbdar   r   r   _tukey_lmbda_quantile   s   ro   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   rr   rs   )NNư>r&   r8   )rP   ru   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      t j| ||ddS NTrR   r   rU   r   r   r*   r   r   r   rk          z)TestCDFlib.test_btdtria.<locals>.<lambda>r         Y@Finclusive_ar   r   inclusive_brx   rt   )rP   ru   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   r|   r}   r~   r   r   r   r   rk      r   z)TestCDFlib.test_btdtrib.<locals>.<lambda>r   r   r   Fr   r   Hz>)NgC]r2<V瞯<ry   )rP   ru   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   rt   )rP   ru   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      t j|| | ddS NTr   rS   r   Zgammaincr   r   r   r   rk          z(TestCDFlib.test_gdtria.<locals>.<lambda>r        @@Fr   g     @r   Nr   绽|=ry   )rP   ru   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   r   r   r   r   r   r   r   rk     r   z(TestCDFlib.test_gdtrib.<locals>.<lambda>r   r   r   Fr   r   h㈵>rt   )rP   ru   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   r   r   r   r   r   r   r   rk     r   z(TestCDFlib.test_gdtrix.<locals>.<lambda>rY   r   r   Fr   r   r   ry   )rP   ru   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      t || |S r%   r   Zncdfr*   yzr   r   r   rk   !      z*TestCDFlib.test_nrdtrimn.<locals>.<lambda>r   皙?Fr   g    _g    _Br   rt   )rP   ru   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   r   r%   r   r   r   r   r   rk   +  r   z*TestCDFlib.test_nrdtrisd.<locals>.<lambda>r   
   Fr   g}Ô%ITr   rt   )rP   ru   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   rt   )r   ru   stdtrre   r   r   r   r   r   r   r   r   
test_stdtr2  s
   
zTestCDFlib.test_stdtrc                 C   s    t tjtdt t gdd d S )Nr   r   rt   )rP   ru   stdtridfre   r   r   r   r   r   r   test_stdtridf9  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   ry   )rP   ru   stdtritre   r   r   r   r   r   r   test_stdtrit@  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   rk   J  s    z)TestCDFlib.test_chdtriv.<locals>.<lambda>r   r   r   rs   rt   )rP   ru   chdtrivr   r   r   r   r   r   test_chdtrivG  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   rr   rs   r   r   r&   r'   )rP   ru   	chndtridfrm   r   r   r   r   r   r   test_chndtridfM  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   rr   rs   r   r   )rP   ru   	chndtrincrm   r   r   r   r   r   r   r   test_chndtrincW  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   rr   rs   r   )rx   NN)r   r&   r'   r8   )rP   ru   chndtrixrm   r   r   r   r   r   r   r   test_chndtrix`  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   )ru   tklmbdar*   r   r   r   rk   m  rl   z4TestCDFlib.test_tklmbda_zero_shape.<locals>.<lambda>c                    s    t |     S r%   )r   rg   r   oner   r   rk   n  r   r   rt   )r   rT   r   r   r   r   r   r   test_tklmbda_zero_shapei  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   ru   r   ro   r   r   r   r   r   r   test_tklmbda_neg_shapeq  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_shapey  s   
z!TestCDFlib.test_tklmbda_pos_shapern   )r]         ?g       @c                 C   s(   d| }t t| |g|ddg d S )Nr   rB   r   )r   ru   r   )r   rn   boundr   r   r   test_tklmbda_lmbda1  s    zTestCDFlib.test_tklmbda_lmbda1N)r    r!   r"   pytestmarkxfailrw   r{   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   parametrizer   r   r   r   r   rp      s:    







	
	
rp   ))r   r   )r   r   )rv   r   )rz   r   )r   rY   )Zchndtrr   )r   r   )r   r   )r   r   )r   r   )ncfdtrrf   )Zncfdtrirf   )Z
ncfdtridfnrf   )Z
ncfdtridfdrf   )Z	ncfdtrincrf   )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>  r   r   )Zidsc                 C   sh   t jd}tt| } dd ||D }tj| D ]}| | }tdd |D r0t|t j	 q	 qd 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     s   $ z"test_nonfinite.<locals>.<listcomp>c                 s   s    | ]}t |V  qd S r%   )r   r:   r   r   r   r   	<genexpr>  s    z!test_nonfinite.<locals>.<genexpr>)
r   randomZdefault_rnggetattrru   	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         4@rx   )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@)ru   r   r   Zaranger   )r@   Zres_expr   r   r   test_chndtrix_gh2158  s   r   c                  C   sB   g d} g d}g d}g d}t | ||}t||ddd d S )N)
MbP?\(\?皙#@b     i'  r   r   r   r   )
r   r   r   皙?+?r   r   r   r   r   )
~jtX?333333?r^      ,  r   r   r^   r   r   )
K ˸@gtI?x9" @g.$Bt+@gO,oq@r   gZc^?r   g@gjgdy=rB   r&   r'   )ru   r   r   )ZdfarrZparrZtarrZ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sJ t t tt j g ds*J d S )N      rB   r   )rB   g      ?r]   g      ?r   )r   allr:   ru   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|sNJ d S )	Ng      $r   rB   r   r]   gH.?r         $@)
r   arrayr;   r   Z
atleast_2dr   r:   ru   rv   r   )r   rW   r   r   r   test_bdtrik_nbdtrik_inf  s     $r   zdfn,dfd,nc,f,expected)r   r   r   r   g,]?)r   r   {Gz?r   gsCr:)r   r   r   r   gnhUg?)r   r   r   r   g%g{E?)r   r   r   r   g 	
1)r   r   r   r   gڞ^)k;)r   r   r   r   glB?)r   r   r   r   g)Dt^\,?)r   r   r   r   g|?)r   r   r   r   g?)r   r   r   r   r   )r   r   r   r   g*}?c                 C   s    t t| ||||ddd d S )NvIh%<=r   r   )r   ru   r   )rZ   r[   rh   fexpectedr   r   r   test_ncfdtr  s    :r   c                   @   s  e Zd Zejdg dddddddd	d
dddddddddddddddddddddd d!d"d#d$d%d&d'd(d)d*d+d,d-d.d/d0d1d2d3d4d5d6d7d8d9d:d;d<d=d>d?ejd@dAdBdCejjdDdEdFdGdHdI ZdJdK Z	ejdLg dMg dNg dOg dPdQdQe
jdQdRgdQdQe
j dRdRggdSdT ZdUS )V
TestNctdtrzdf, nc, x, expected)r   ffffffr   gD i?)r   r   r   g?)r   r   r^   g7?)r   r   r   gU?)r   RQ?r   g?)r   r   r   gx$p?)r   r   r^   g7?)r   r   r   g]ŧe?)r   ffffff@r   g樼?)r   r   r   g:GF ?)r   r   r^   gpa?)r   r   r   gfO!t?)r   &   r   g    )r   r   r   gQb] )r   r   r^   gy+)r   r   r   guQRm?)r   r   r   g/C*i?)r   r   r   g.b?)r   r   r^   gI'v?)r   r   r   g?)r   r   r   g?)r   r   r   gD-?)r   r   r^   gy0 ?)r   r   r   gC?)r   r   r   g?)r   r   r   g:e!?)r   r   r^   gh?)r   r   r   g?)r   r   r   g+    )r   r   r   gPDp   )r   r   r^   gM)r   r   r   ggS>^X#>)r   r   r   gNG0i?)r   r   r   g%Wح?)r   r   r^   g?)r   r   r   r   )r   r   r   g aYҏ?)r   r   r   gpku+?)r   r   r^   gZVq?)r   r   r   r   )r   r   r   g_a?)r   r   r   g+,!?)r   r   r^   gqgb?)r   r   r   g?)r   r   r   gQ    )r   r   r   g%Q   )r   r   r^   gTh-1)r   r   r   g¤5)r   r   r   geK0i?)r   r   r   g?)r   r   r^   gjS?)r   r   r   r   )r   r   r   g|S׏?)r   r   r   gfG-?)r   r   r^   g^"?)r   r   r   r   )r   r   r   gm?)r   r   r   g|q]/!?)r   r   r^   g+%αs?)r   r   r   r   )r   r   r   gn    )r   r   r   gm   r   r   r^   gDdz+Bug in underlying Boost math implementation)reason)Zmarks)r   r   r   g>H*c                 C   s"   t |||}t||ddd d S )Nr   gr   )ru   r   r   )r   rc   rh   r*   r   resultr   r   r   test_gh19896S  s   IzTestNctdtr.test_gh19896c                 C   s*   d\}}}d}t t||||dd d S )N)i  r   r   g-^?g+=rt   r   ru   r   )r   rc   rh   r*   r   r   r   r   test_nctdtr_gh8344  s   
zTestNctdtr.test_nctdtr_gh8344zdf, nc, x, expected, rtol)g      @g      @g       gG>g:0y5>)r   r   r   g'$ <r   )r   g      g       @gjx?r   )r   r   r   ge*mt-r   r   rB   c                 C   s   t t|||||d d S )Nrt   r   )r   rc   rh   r*   r   r&   r   r   r   test_accuracy  s   zTestNctdtr.test_accuracyN)r    r!   r"   r   r   r   paramr   r   r   r   r   r  r   r   r   r   r   +  s&   
(	
 !"#$%&'()*+,-./0123456789:;<=>?B
D
r   r%   )-r#   r   numpyr   Znumpy.testingr   r   r   Zscipy.specialZspecialru   Zscipy.special._testutilsr   r   r   Zscipy.special._mptestutilsr   r   r	   r
   r   r   ImportErrorr   r$   r,   rP   rX   r\   re   ri   rm   ro   r   Zslowrp   funcsr   r   r   r   r   r   r   r   r   r   r   r   <module>   sh    P
	
	 <#


.