o
    iU1                     @   s   d dl Z d dl mZ d dlZd dlmZmZmZm	Z	m
Z
 d dlmZmZmZ ejejgZejejgZee ZG dd dZG dd dZG d	d
 d
ZdS )    N)raises)lu	lu_factorlu_solveget_lapack_funcssolve)assert_allcloseassert_array_equalassert_equalc                   @   s   e Zd Zdd Zdd Zejdddgddgddgddgddgddgg d	g d
g dg	dd Zejdddgddgddgddgddgddggdd Z	dd Z
dd ZdS )TestLUc                 C      t jd| _d S N   n
@h/ nprandomdefault_rngrngself r   [/home/kim/smarthome/.venv/lib/python3.10/site-packages/scipy/linalg/tests/test_decomp_lu.pysetup_method      zTestLU.setup_methodc              	   C   s  t g dg dg dg}t|\}}}t g dg dg dg}t|t t d t|t j|ddt d  t|t | t g dg dg d	g}t|\}}}t g d
g dg dg}t|t t d t|t j|ddt d  t|t | t g dg dg dg}t|\}}}t|t g dg dg dg t|t g dg dg dg t|t g dg dg dgddd t g dg dg dg}t|\}}}t|t g dg dg dg t|t g dg dg dg t|t g dg dg dgd ddd t g dg dg dg}t|\}}}t|t g dg dg dg t|t g dg dg d g t|t g dg d!g d"gddd t g dg dg dgd }	t|	\}}}t|t g dg dg dg t|t g dg dg d g t|t g dg d!g d"gd ddd t g dg dg dg d#g}
t|
\}}}t|t d$g d%d&d&f  t|t g d'g d(g d)g d*g t|t g d#g d+g d,g t g dg dg dg d#gd }t|\}}}t|t d$g d%d&d&f  t|t g d'g d(g d)g d*g t|t g d#g d+g d,gd  d&S )-z*Tests from old fortran based lu test suite         r         )       @g      @      @)      ?              )r#         ?r%   r   )kr                 @r    )r!   r*   r"   )r#   y       @      r%      r   r          	   )r   r   r   )r   r   r   r   r   r   )g$I$I?r   r   )g$I$I?r#   r   )r   g۶m۶m?g۶m۶m?r   r   r   r%   g+=)ZrtolZatol              ?y               @y              @y              @r*   y              @y              @y               @y              "@r4   r   r   r   r,   r   r    r.   r/   r0   
      r;   )gqq?r   r   )grq?r#   r   )r   gqq?g?gUUUUUU@)r   r   r$   r   r:   r;   r;   r,   )r   r   r   r   N)r&   r   r   )g?r   r   )gffffff?r$   r   )g?g      ?r#   )r   g?g?)r   r   g      ?)r   arrayr   r   Zrot90eyeZtrilZtriu)r   apluZ	result_lubcbhrectchrectvrectcvrectr   r   r   test_old_lu_smoke_tests   s   """"""" """ & 
zTestLU.test_old_lu_smoke_testsshaper   r,      )r   r   r0   r0   )r   r      r   )r   r      r.   c                 C   s   | j jdd|d}t|\}}}t||| |  t|dd\}}t|||  | j jdd|dd }|| j jdd|d7 }t|dd\}}t|||  d S )	N      $      $@sizeTZ	permute_lr4   ir:   r   uniformr   r   )r   rJ   r?   r@   rA   rB   plrC   r   r   r   "test_simple_lu_shapes_real_complexS   s   z)TestLU.test_simple_lu_shapes_real_complexc                 C   sB   | j jdd|d}t|dd\}}}t|||d d f |  d S )NrN   rO   rP   TZ	p_indicesrS   )r   rJ   r?   r@   rA   rB   r   r   r   -test_simple_lu_shapes_real_complex_2d_indicesb   s   z4TestLU.test_simple_lu_shapes_real_complex_2d_indicesc                 C   sN  | j jg dtjd}t|dd\}}}t|tjdtd t|tjdtjd t|| | j jg dtjd}t|\}}}t|tjdtjd t|tjdtjd t|| t|dd\}}t|tjdtjd t|| | j jg dtjdt	d }t|\}}}t|tjdtj	d t|tjdtj	d t|| d S )	N)r,   r   r   r   dtypeTrW   )r,   r   r   rJ   rZ   rR   r4   )
r   r   r   float32r   r   zerosintones	complex64r   r?   r@   rA   rB   rU   r   r   r   test_1by1_input_outputi   s$   


 zTestLU.test_1by1_input_outputc                 C   sL  t ddg}t|\}}}t|t jdt jd t|t jdt jd t|t jdt jd t jddgt jd}t|\}}}t|t jdt jd t|t jdt jd t|t jdt jd t jddgt jd}t|\}}}t|t jdt jd t|t jdt jd t|t jdt jd t|dd	\}}}t|t jd
td t|t jdt jd t|t jdt jd t|dd\}}t|t jdt jd t|t jdt jd t jg dt jd}t|\}}}t|t jdt jd t|t jdt jd t|t jdt jd t g d}t|\}}}t|t jdd t|t jdd t|t jdd t	t
dd tt g  W d    n	1 sNw   Y  t g g}t|\}}}t|t jdd t|t jdd t|t jdd t g gg}t|\}}}t|t jdd t|t jdd t|t jdd d S )Nr   r   r   r[   r   rY   )r   r   )r   r   TrW   r   rR   )r   r   r   )r   r   r   r2   )rJ   zat least two-dimensional)match)r   r   r1   )r   r   r   )r   emptyr   r   float64Zfloat16r\   r`   r^   assert_raises
ValueErrorr=   ra   r   r   r   test_empty_edge_cases   sZ   zTestLU.test_empty_edge_casesN)__name__
__module____qualname__r   rI   pytestmarkparametrizerV   rX   rb   rj   r   r   r   r   r      s     A
 
r   c                   @   s   e Zd Zdd Zdd Zdd Zdd Zd	d
 Zdd Zdd Z	dd Z
dd Zdd Zejdg dejdg dejdedd Zejdg ddd ZdS ) TestLUFactorc                 C   sB  t jd| _t g dg dg dg| _t g dg dg dg| _t g dg dg dg| _t g dg dg d	g| _t g d
g dg dg| _	t g d
g dg dgd | _
t g dg dg dg dg| _dt g dg dg dg dg | _| jd| _| jdd| jd  | _d S )Nr   r   r   r)   r+   r-   r3   r5   r6   r7   r8   r9   r4   r<   )   (   )r   r   r   r   r=   r?   carC   rD   rE   rF   rG   rH   medcmedr   r   r   r   r      s&   $
"zTestLUFactor.setup_methodc                 C   sD   t |\}}td|f\}||dd\}}}t|| t|| d S )N)getrfF)Zoverwrite_a)r   r   r   )r   dataZl_and_u1Zpiv1rw   Zl_and_u2Zpiv2_r   r   r   _test_common_lu_factor   s
   
z#TestLUFactor._test_common_lu_factorc                 C      |  | j d S N)rz   rE   r   r   r   r   test_hrectangular      zTestLUFactor.test_hrectangularc                 C   r{   r|   )rz   rG   r   r   r   r   test_vrectangular   r~   zTestLUFactor.test_vrectangularc                 C   r{   r|   )rz   rF   r   r   r   r   test_hrectangular_complex   r~   z&TestLUFactor.test_hrectangular_complexc                 C   r{   r|   )rz   rH   r   r   r   r   test_vrectangular_complex   r~   z&TestLUFactor.test_vrectangular_complexc                 C      |  | j dS z:Check lu decomposition on medium size, rectangular matrix.N)rz   ru   r   r   r   r   test_medium1      zTestLUFactor.test_medium1c                 C   r   r   )rz   rv   r   r   r   r   test_medium1_complex   r   z!TestLUFactor.test_medium1_complexc                 C   s,   t | jdd\}}}t|| | | j d S )NFZcheck_finite)r   r?   r   )r   r@   rA   rB   r   r   r   test_check_finite   s   zTestLUFactor.test_check_finitec                 C   sd   dD ]-}t jddgddgg|d}t|\}}t|t ddgddgg t|t ddg qd S )NCFr   r   r   r&   order)r   r=   r   r   r	   )r   r   AZLUPr   r   r   test_simple_known   s   zTestLUFactor.test_simple_knownm)r   r   r   nrZ   c                 C   sb   t ||}tj|||d}t|\}}t|j||f t|j| t|j|f t|jtj d S )NrY   )minr   r>   r   r
   rJ   rZ   Zint32)r   r   r   rZ   r(   r?   r   r@   r   r   r   test_shape_dtype   s   
zTestLUFactor.test_shape_dtype)r   r   )rc   )r   r   )r   r   c                 C   sB   t ||f}t|\}}t|t ||f t|t d d S )Nr   )r   r]   r   r   rf   Zarange)r   r   r   r?   r   r@   r   r   r   
test_empty  s   zTestLUFactor.test_emptyN)rk   rl   rm   r   rz   r}   r   r   r   r   r   r   r   rn   ro   rp   DTYPESr   r   r   r   r   r   rq      s"    	
rq   c                	   @   sd   e Zd Zdd Zdd Zdd Zejde	e
ejeejgejde	e
ejeejgd	d
 ZdS )TestLUSolvec                 C   r   r   r   r   r   r   r   r     r   zTestLUSolve.setup_methodc                 C   sZ   | j d}| j d}dD ]}tj||d}t||}t|}t||}t|| qd S )Nr:   r:   r:   r   r   )r   r   r   r=   r   r   r   r   )r   Za0rC   r   r?   x1lu_ax2r   r   r   test_lu  s   

zTestLUSolve.test_luc                 C   sJ   | j d}| j d}t||}t|dd}t||dd}t|| d S )Nr   r   Fr   )r   r   r   r   r   r   )r   r?   rC   r   r   r   r   r   r   r     s   
zTestLUSolve.test_check_finitedtdt_bc                 C   s   t jd|dt g f}t jg |d}t||}|jdksJ tt jd|dddgft jd|d}|j|jks:J t jd|d}t||}|jdksMJ |j|jksUJ d S )Nrc   rY   rd   r   r   r   )	r   rf   r=   Zasarrayr   rJ   r>   r_   rZ   )r   r   r   Z
lu_and_pivrC   xr   r   r   r   r   &  s   
&
zTestLUSolve.test_emptyN)rk   rl   rm   r   r   r   rn   ro   rp   r^   floatr   r\   complexr`   r   r   r   r   r   r     s    r   )rn   r   rh   numpyr   Zscipy.linalgr   r   r   r   r   Znumpy.testingr   r	   r
   r\   rg   ZREAL_DTYPESr`   Z
complex128ZCOMPLEX_DTYPESr   r   rq   r   r   r   r   r   <module>   s     )Y