
    S_f                        d dl Z d dlZd dlZd dlmZmZmZ d dlm	Z	 d dl
mZ d dlmZ eZd Zej                   j#                  ddd	g      ej                   j#                  d
g d      ej                   j#                  dg d      ej                   j#                  dddg      d                             Zd Zej                   j#                  dddg      d        Zy)    N)fhtifht	fhtoffset)poch)array_api_compatible)xp_assert_closec                    d }t        j                  ddd      }t        j                  |d   |d   z        }d}d}d}| j                   |||            }t	        |||||	      }g d
}	| j                  |	| j
                        }	t        ||	       t        |||      }t	        |||||	      }g d}	| j                  |	| j
                        }	t        ||	       d}t        |||      }t	        |||||	      }g d}	| j                  |	| j
                        }	t        ||	       d}t        |||      }t	        |||||	      }g d}	| j                  |	| j
                        }	t        ||	       y )Nc                 L    | |dz   z  t        j                  | dz   dz        z  S )N      )npexp)rmus     ;lib/python3.12/site-packages/scipy/fft/tests/test_fftlog.pyfz&test_fht_agrees_with_fftlog.<locals>.f   s'    2a4yAa((          r   r   g333333?        offsetbias)g=lSgl1Z?gpR_g~]
o?g0d@?g?g02u?g7c4Uo?gU/5?gޠ3JgQiIg!m9?g 1g?Jb7?g tj3Bg 	'K?)dtyper   )g Dy?g TIg 94?gB M?gQ89w?gĥ?gZT3%?gz;_x?g9%P?gv@݆gAAY]?gayig;gGI<!?g F\mgH ?g @(LGg?)gU_g0E>y7?g4⬞	F?gR^ء*9g-g?g!a?gR޴ ?gmMUU?g .?g'?eHgZ7ZP?gmܷ`%gCGT?g2Tg҅u>g/&g)gG3>g`4]<]?g[8+?g,8GdP?g
u?g,ח$5?g~}?gra,4?gV?gh`>EgDgyٖ?gP2ZSg͆˝?gܺJ?g[U+@g"%@)r   logspacelogasarrayr   float64r   r   )
xpr   r   dlnr   r   r   aourstheirss
             r   test_fht_agrees_with_fftlogr&      s   ) 	B2A
&&1ad
C	BFD


1Q8A q#r&t4D@F ZZbjjZ1FD&! sBT*Fq#r&t4D@F ZZbjjZ1FD&! DsBT*Fq#r&t4D@F ZZbjjZ1FD&! DsBT*Fq#r&t4D@F ZZbjjZ1FD&!r   optimalTFr   )r         ?g      r   )r   g?gn@   ?   c                 D   t         j                  j                  d      }|j                  |j	                  |             }|j                  dd      }|j                  dd      }|rt        ||||      }t        |||||      }	t        |	||||      }
t        |
|       y )N   E3  r   r   initialr   r   )
r   randomRandomStater   standard_normaluniformr   r   r   r   )r)   r   r   r'   r!   rngr#   r"   r   Aa_s              r   test_fht_identityr9   Z   s    
 ))



+C


3&&q)*A
++b!
C	R	B3F>AsBvD1A	abd	3BBr   c                    t         j                  j                  d      }| j                  |j	                  d            }|j                  dd      }d\  }}t        j                  d      5 }t        ||||       |rJ d	       	 d d d        d
\  }}t        j                  d      5 }t        ||||       |rJ d	       	 d d d        d\  }}t        j                  t              5 }t        ||||       |sJ d       	 d d d        d
\  }}t        j                  t              5 }t        ||||       |sJ d       	 d d d        y # 1 sw Y   xY w# 1 sw Y   xY w# 1 sw Y   bxY w# 1 sw Y   y xY w)Nr-   r*   r.   r   )g      r(   T)recordr   z)fht warned about a well-defined transform)g            ?)g      r<   z+fht did not warn about a singular transformz,ifht did not warn about a singular transform)r   r2   r3   r   r4   r5   warningscatch_warningsr   pytestwarnsWarningr   )r!   r6   r#   r"   r   r   r;   s          r   test_fht_special_casesrB   n   s   
))



+C


3&&r*+A
++b!
C
 HB		 	 	- GAsBT"FFFz6G
 HB		 	 	- GAsBT"FFFz6G
 HB	g	 E&AsBT"DDDvE
 HB	g	 F&QRd#EEEvF F%G GG GE EF Fs0   -E*E*E%*E1EE"%E.1E:c                    t         j                  j                  d      }|j                  dd      }|j                  d|z
  d      }t        j                  dd|       }|j                  ||z        }t        j                  |d   |d   z        }t        ||d	|
      }t        |||||      }	t        j                  |      |d d d   z  }
|j                  d|
z  |z  t        |dz   |z
  dz  |      z        }t        |	|       y )Nr-   r      r.   r<   r/   r   r   r   r0   r   )r   r2   r3   r5   r   r   r   r   r   r   r   r   )r)   r!   r6   r   gammar   r#   r"   r   r7   kAts               r   test_fht_exactrH      s    
))



+C
 
Q	B KK2s#E
B1A


1e8A
&&1ad
CsB%8FAsBvE2A
vq2wA 
QqS5L4AeQ#>>	?BArr   )r=   numpyr   r?   scipy.fft._fftlogr   r   r   scipy.specialr   scipy.conftestr   scipy._lib._array_apir   
pytestmarkr&   markparametrizer9   rB   rH    r   r   <module>rR      s       2 2  / 1!
I"X T5M2#340r2h' ( 1 5 3 FB r2h' (r   