o
    hk4                     @   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#dd Z$d d! Z%dS )#z
Test cdflib functions versus mpmath, if available.

The following functions still need tests:

- ncfdtr
- ncfdtri
- ncfdtridfn
- ncfdtridfd
- ncfdtrinc
- nbdtrik
- nbdtrin
- nrdtrimn
- nrdtrisd
- 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   Z/var/www/html/scripts/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 )
z5Return an array containing approximatively n numbers.r      ig333333?gffffff?F)endpointNi)maxnplogspacelog10linspacer_unique)r   nmv1v2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   :   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   xmask1mask2r   r   r   __call__@   s   ((zEndpointFilter.__call__N)r&   r'   r(   r   r3   r   r   r   r   r*   9   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   r7   r8   r9   r:   r;   r<   r   r,   r-   r?   r@   r   r   r   r   G   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+   )r;   r7   r   isnannanr>   r9   r   workdpsr<   r8   tupler
   real)r   argsresr   r   r   idmapd   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        )r?   r@   zipr:   appendr*   r   r   )r   filtersr,   r-   specr   r   r   get_param_filterx   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-   
vectorizedparam_filter)r	   r:   r   rO   rE   rangeshaper   hstackr9   reshaper   rI   r,   r-   check)r   rG   rS   rP   rQ   r   r   r   rX      s   
*

z_CDFData.check)Tr5   r6   NNNN)r&   r'   r(   r   rI   rO   rX   r   r   r   r   r4   F   s    
r4   c                  O   s   t | i |}|  d S r+   )r4   rX   )r   kwdr   r   r   _assert_inverts   s   r[   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x2regularized)r   mpffsubbetainc)kr   ponempr   r   r   _binomial_cdf   s   "

rf   c                 C   sf   |dk r	t dS t | t |t |} }}| | | | |  }t j| d |d |dd}|S )Nr      Tr]   )r   r`   rb   )dfndfdr0   ubrH   r   r   r   _f_cdf   s   
"rk   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   g      ?rg   )	r   mpr<   rD   r`   hyp2f1gammasqrtpi)dftr<   facr   r   r   _student_t_cdf   s   ""$ru   c                 C   sR   t |d d t ||  }|t | |  d | | |d d   d 9 }|S )Nrg   r      rl   )r   besselirp   exp)rs   rr   ncrH   r   r   r   _noncentral_chi_pdf   s   0rz   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+   )rz   )rs   rr   ry   r   r   <lambda>       z%_noncentral_chi_cdf.<locals>.<lambda>r   )r   rm   r<   r`   rD   quad)r0   rr   ry   r<   rH   r   r{   r   _noncentral_chi_cdf   s   "$r   c                 C   s   | | d|  |  | S )Nr   r   )rd   lmbdar   r   r   _tukey_lmbda_quantile   s   r   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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 ),
TestCDFlibF)runc                 C   s(   t tjtdt tddt gdd d S )Nr   r     -C6?r,   )r[   spbdtrikrf   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   r   r   )NNư>r,   r@   )r[   r   bdtrinrf   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 NTr]   r   rb   r   r   r0   r   r   r   r|          z)TestCDFlib.test_btdtria.<locals>.<lambda>r         Y@Finclusive_ar   r   inclusive_br   r   )r[   r   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   r|      r   z)TestCDFlib.test_btdtrib.<locals>.<lambda>r   r   r   Fr   r   Hz>)NgC]r2<V瞯<r   )r[   r   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   r   )r[   r   fdtridfdrk   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   r_   r   gammaincr   r   r   r   r|          z(TestCDFlib.test_gdtria.<locals>.<lambda>r        @@Fr   g     @r   Nr   绽|=r   )r[   r   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   r|     r   z(TestCDFlib.test_gdtrib.<locals>.<lambda>r   r   r   Fr   r   h㈵>r   )r[   r   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   r|     r   z(TestCDFlib.test_gdtrix.<locals>.<lambda>rg   r   r   Fr   r   r   r   )r[   r   gdtrixr   r   r   r   r   r   test_gdtrix
  s   
zTestCDFlib.test_gdtrixc                 C   s(   t tjttddtdtjgdd d S )Nr   r   r   r   r   )r   r   stdtrru   r   r   r   infr   r   r   r   
test_stdtr  s
   
zTestCDFlib.test_stdtrc                 C   s    t tjtdt t gdd d S )Nr   r   r   )r[   r   stdtridfru   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   r   )r[   r   stdtritru   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 )Nrg   Tr   r   )r$   r0   r   r   r   r|   *  s    z)TestCDFlib.test_chdtriv.<locals>.<lambda>r   r   r   r   r   )r[   r   chdtrivr   r   r   r   r   r   test_chdtriv'  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   r   r   r   r   r,   r-   )r[   r   	chndtridfr   r   r   r   r   r   r   test_chndtridf-  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 )Nrg   r   r   Fr   r   r   r   r   r   )r[   r   	chndtrincr   r   r   r   r   r   r   r   test_chndtrinc7  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   r   r   r   )r   NN)r   r,   r-   r@   )r[   r   chndtrixr   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   )r   tklmbdar0   r   r   r   r|   M  r}   z4TestCDFlib.test_tklmbda_zero_shape.<locals>.<lambda>c                    s    t |     S r+   )r   rx   r   oner   r   r|   N  r   r   r   )r   r`   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&.>)r;   r,   r@   r[   r   r   r   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   )r;   r,   r   r   r   r   r   test_tklmbda_pos_shapeY  s   
z!TestCDFlib.test_tklmbda_pos_shaper   )rl         ?g       @c                 C   s(   d| }t t| |g|ddg d S )Nr   rJ   r   )r   r   r   )r   r   boundr   r   r   test_tklmbda_lmbda1b  s    zTestCDFlib.test_tklmbda_lmbda1N)r&   r'   r(   pytestmarkxfailr   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   r   parametrizer   r   r   r   r   r      s6    
	


	
	
r   c                  C   s   g d} t jd | D ]1\}}tt|}dd t j|D }tj| D ]}|| }tdd |D r;t	|t j
 q%	 q%qd S )N))r   r   )r   r   )r   r   )r   r   )r   rg   )chndtrr   )r   r   )r   r   )r   r   )r   r   )ncfdtrrv   )ncfdtrirv   )
ncfdtridfnrv   )
ncfdtridfdrv   )	ncfdtrincrv   )r   r   )r   r   )r   r   )nbdtrikr   )nbdtrinr   )nrdtrimnr   )nrdtrisdr   )pdtrikrg   )r   rg   )r   rg   )r   rg   )nctdtrr   )nctdtritr   )	nctdtridfr   )	nctdtrincr   )r   rg   r   c                 S   s$   g | ]}t |tjtjtj fqS r   )floatr   rC   r   .0r0   r   r   r   
<listcomp>  s   $ z"test_nonfinite.<locals>.<listcomp>c                 s   s    | ]}t |V  qd S r+   )r   rB   r   r   r   r   	<genexpr>  s    z!test_nonfinite.<locals>.<genexpr>)r   randomseedgetattrr   rand	itertoolsproductanyr   rC   )funcsfuncnumargsargs_choicesrG   rH   r   r   r   test_nonfiniteh  s   "

r   c                  C   s.   t ddtdd } g d}t| | d S )Ng!?rg   g      4@r   )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@)r   r   r   aranger   )rH   res_expr   r   r   test_chndtrix_gh2158  s   r   r+   )&r)   r   numpyr   numpy.testingr   r   r   scipy.specialspecialr   scipy.special._testutilsr   r   r   scipy.special._mptestutilsr   r   r	   r
   r   r   ImportErrorr   r*   r4   r[   rf   rk   ru   rz   r   r   r   slowr   r   r   r   r   r   r   <module>   s:    P
	
	 7