o
    ߗi!F                     @   s  d dl Z d dlmZmZmZmZmZmZmZm	Z	 d dl
Z
d dlmZ d dlmZ d dlmZ d dlmZmZmZ d dlmZmZ g dZe	ded f Zh dZe
jjjZd	ed
edede def
ddZ!de
j"de de
j#de
j"fddZ$	dfdede defddZ%d	edeedf deedf defddZ&de'ded ee d!ed
ede defd"d#Z(de'ded ee d!ed
ede d$e defd%d&Z)de'ded ee d!ed
ede defd'd(Z*eej+e 		)	dgded ee d!ed
edef
d*d+Z,eej-e 		)	dgded ee d!ed
edef
d,d-Z.eej/e 		)	dgded ee d!ed
edef
d.d/Z0eej1e 		)	dgded ee d!ed
edef
d0d1Z2eej3e 		)	dgded ee d!ed
edef
d2d3Z4eej5e 		)	dgded ee d!ed
edef
d4d5Z6G d6d7 d7eZ7ded8ee d!ee de7fd9d:Z8d;ee defd<d=Z9d>e'ded8eedf d!eedf d
ede defd?d@Z:eej;e 			dhdedAee d!ee d
edef
dBdCZ<eej=e 			dhdedAee d!ee d
edef
dDdEZ>eej?e 			dhdedAee d!ee d
edef
dFdGZ@eejAe 			dhdedAee d!ee d
edef
dHdIZBG dJdK dKeZCdLe'dedAee d!ee deCf
dMdNZDeejEe 			dhdedAee d!ee d
edef
dOdPZFeejGe 			dhdedAee d!ee d
edef
dQdRZHeejIe 		S	didedAee d!ee d
edef
dTdUZJeejKe 		S	didedAee d!ee d
edef
dVdWZLeejMe 		S	didedAee d!ee d
edef
dXdYZNeejOe 		S	didedAee d!ee d
edef
dZd[ZPeejQe 		S	didedAee d!ee d
edef
d\d]ZReejSe 		S	didedAee d!ee d
edef
d^d_ZTd!ee d	edee fd`daZUeejVdjded!ee defdbdcZWeejXdjded!ee defdddeZYdS )k    N)IterableListLiteral
NamedTupleOptionalSequenceTupleUnion)register_decomposition)DimsType	ShapeTypeTensorLikeType)_maybe_convert_to_dtypeout_wrapper)fftfft2fftnhffthfft2hfftnrfftrfft2rfftnifftifft2ifftnihfftihfft2ihfftnirfftirfft2irfftnfftshift	ifftshift)forwardbackwardortho>   Nr&   r$   r%   xnormsignal_numelr$   returnc                    sh   t  tv  fdd  dkr| dt|  S | r$ du p) dkp)|o) dk}|r2| d|  S | S )z3Apply normalization to the un-normalized FFT resultc                      
   d  S )NzInvalid normalization mode:  r,   r(   r,   M/home/ubuntu/transcripts/venv/lib/python3.10/site-packages/torch/_refs/fft.py<lambda>.      
 z_apply_norm.<locals>.<lambda>r&      Nr%   r$   )torch_check_NORM_VALUESmathsqrt)r'   r(   r)   r$   	normalizer,   r-   r.   _apply_norm*   s   
r8   dtyperequire_complexdevicec                    sh    j r S  jst  tjtjg}|jdv }|r|tj t	 |v  fdd |r2t
   S )z@Helper to promote a dtype to one supported by the FFT primitives)cudametac                      r+   )NzUnsupported dtype r,   r,   r9   r,   r.   r/   I   r0   z#_promote_type_fft.<locals>.<lambda>)
is_complexis_floating_pointr2   get_default_dtypefloat32float64typeappendfloat16r3   utilscorresponding_complex_dtype)r9   r:   r;   allowed_typesmaybe_support_halfr,   r>   r.   _promote_type_fft9   s   

rK   Ftc                 C   s   | j }t||| j}t| |S )zEHelper to promote a tensor to a dtype supported by the FFT primitives)r9   rK   r;   r   )rL   r:   cur_typenew_typer,   r,   r.   _maybe_promote_tensor_fftQ   s   
rO   dims.sizesc                 C   s   t |t |ks
J d}| j}dgt | d }tt |D ]B}|| dkr'q|||  || k rKd}t |d||   d }|| |||   ||< |||  || kr`| || d|| } q|rit| |S | S )z
    Fixes the shape of x such that x.size(dims[i]) == sizes[i],
    either by zero-padding, or by slicing x starting from 0.
    Fr      Tr1   )lenshaperangenarrowr2   constant_pad_nd)r'   rP   rQ   	must_copyx_sizes
pad_amountipad_idxr,   r,   r.   _resize_fft_inputZ   s   r^   	func_nameinputndimc                    s   t |dd}tj|j|ddf}|dur|nd|j| d   t dk fdd	 |dur;t|| d d fd
}|rBt|}t	j
|| d}t|| |dS )zBCommon code for performing any complex to real FFT (irfft or hfft)Tr:   Fwrap_scalarNrR   r1   c                         d  dS NzInvalid number of data points (z) specifiedr,   r,   last_dim_sizer,   r.   r/          z_fft_c2r.<locals>.<lambda>)rP   rQ   rb   ri   r(   r)   r$   )rO   rG   canonicalize_dimndimrU   r2   r3   r^   conjprimsfft_c2rr8   )r_   r`   ra   rb   r(   r$   rP   outputr,   rh   r.   _fft_c2rt   s   	

rs   onesidedc           	         s   t jj fdd ttjj|ddf}|dur"|nj|  t  dk fdd |dur>t	||ft
j||d}t|| |}|rQ|S t |S )	zBCommon code for performing any real to complex FFT (rfft or ihfft)c                           dj  S )Nz0 expects a floating point input tensor, but got r>   r,   r_   r`   r,   r.   r/          z_fft_r2c.<locals>.<lambda>Frd   Nr1   c                      rf   rg   r,   r,   dim_sizer,   r.   r/      rj   rb   rt   )r2   r3   r9   r?   rO   rG   rm   rn   rU   r^   rp   fft_r2cr8   ro   )	r_   r`   ra   rb   r(   r$   rt   rP   retr,   ry   r_   r`   r.   _fft_r2c   s   
r~   c                    s   t jjfdd tjj|ddf}|dur|nj|  t  dk fdd |dur9t||ft	j
||d}t|| |S )	zCCommon code for performing any complex to complex FFT (fft or ifft)c                      ru   Nz) expects a complex input tensor, but got r>   r,   rv   r,   r.   r/      rw   z_fft_c2c.<locals>.<lambda>Frd   Nr1   c                      rf   rg   r,   r,   rx   r,   r.   r/      rj   rb   r$   )r2   r3   r9   r?   rG   rm   rn   rU   r^   rp   fft_c2cr8   )r_   r`   ra   rb   r(   r$   rP   r|   r,   r}   r.   _fft_c2c   s   	r   rS   c              	   C   s2   | j jrtd| |||ddS td| |||dddS )Nr   Tr$   Fr$   rt   r9   r?   r   r~   r`   ra   rb   r(   r,   r,   r.   r         r   c              	   C   s2   | j jrtd| |||ddS td| |||dddS )Nr   Fr   r   r   r   r,   r,   r.   r      r   r   c              	   C   s   t d| |||dddS )Nr   Tr   r~   r   r,   r,   r.   r         r   c                 C      t d| |||ddS )Nr   Fr   rs   r   r,   r,   r.   r         r   c                 C   r   )Nr   Tr   r   r   r,   r,   r.   r      r   r   c              	   C   s   t d| |||dddS )Nr   FTr   r   r   r,   r,   r.   r     r   r   c                   @   s.   e Zd ZU eedf ed< eedf ed< dS )_ShapeAndDims.rU   rP   N__name__
__module____qualname__r   int__annotations__r,   r,   r,   r.   r     s   
 r   rU   c                    sL  | j  | j|dur*t|ts|f}tj |dd}ttt	|t|kdd  |durut|ts6|f}t|du pCt|t|kdd  t|t k fdd |du rft
t   }t
fdd	t||D }n|du rt
t }t
}nt
fd
d	|D }|D ]tdkfdd qt||dS )zTConvert the shape and dim arguments into a canonical form where neither are optionalNFrd   c                   S      dS )NzFFT dims must be uniquer,   r,   r,   r,   r.   r/   !      z6_canonicalize_fft_shape_and_dim_args.<locals>.<lambda>c                   S   r   )Nz=When given, dim and shape arguments must have the same lengthr,   r,   r,   r,   r.   r/   +  r   c                      s   d d  dS )NzGot shape with z" values but input tensor only has z dimensions.r,   r,   )	input_dimtransform_ndimr,   r.   r/   1  s    c                 3   s(    | ]\}}|d kr|n | V  qdS )rS   Nr,   ).0sdinput_sizesr,   r.   	<genexpr>:  s    
z7_canonicalize_fft_shape_and_dim_args.<locals>.<genexpr>c                 3   s    | ]} | V  qd S Nr,   r   r   r   r,   r.   r   C  s    r   c                      rf   rg   r,   r,   )ra   r,   r.   r/   F  rj   )rU   rP   )rn   rU   
isinstancer   rG   canonicalize_dimsr2   r3   rT   settuplerV   zipr   )r`   rU   rb   ret_dims	ret_shaper,   )r   r   ra   r   r.   $_canonicalize_fft_shape_and_dim_args  sB   



r   xsc                 C   s   d}| D ]}||9 }q|S )zCompute product of a listr1   r,   )r   prodr'   r,   r,   r.   _prodK  s   
r   function_namec                    sJ   t jj fdd t||}tj|||d}t||t||dS )zECommon code for n-dimensional complex to complex FFTs (fftn or ifftn)c                      ru   r   r>   r,   r   r`   r,   r.   r/   ^  s    z_fftn_c2c.<locals>.<lambda>r   rl   )	r2   r3   r9   r?   r^   rp   r   r8   r   )r   r`   rU   rb   r(   r$   r'   rr   r,   r   r.   	_fftn_c2cS  s   	r   r   c                 C   s0   t | ||\}}t| dd}td||||ddS )NTrc   r   r   r   rO   r   r`   r   rb   r(   rU   r'   r,   r,   r.   r   f     r   c                 C   s0   t | ||\}}t| dd}td||||ddS )NTrc   r   Fr   r   r   r,   r,   r.   r   s  r   r   c                    sf   t  jj  fdd t ||\}}t dd t || tj |dd}t	||t
|ddS )Nc                         d j  S )Nz2rfftn expects a real-valued input tensor, but got r>   r,   r`   r,   r.   r/     rj   zrfftn.<locals>.<lambda>Frc   Trz   rl   )r2   r3   r9   r?   r   rO   r^   rp   r{   r8   r   )r`   r   rb   r(   rU   outr,   r   r.   r     s   
r   c                    s   t  jj  fdd t ||\}}t t|dkdd  t dd t || tj	 |dd  dd	}t|d
krNt
|||d dd}t|S t|}tj||d d dd}t
||t|ddS )Nc                      r   )Nz3ihfftn expects a real-valued input tensor, but got r>   r,   r   r,   r.   r/     rj   zihfftn.<locals>.<lambda>r   c                   S   r   )Nz'ihfftn must transform at least one axisr,   r,   r,   r,   r.   r/     r   Frc   rS   Trz   r1   rl   r   )r2   r3   r9   r?   r   rT   rO   r^   rp   r{   r8   ro   conj_physicalr   r   )r`   r   rb   r(   rU   tmpr,   r   r.   r     s   


r   c                   @   s6   e Zd ZU eedf ed< eedf ed< eed< dS )_CanonicalizeC2rReturn.rU   rb   ri   Nr   r,   r,   r,   r.   r     s   
 r   fnamec                    s   t |||\}}tt|dk fdd |du s |d dkr,d|j|d  d  n|d tdkfdd t|}d d |d< tt||d	S )
zCanonicalize shape and dim arguments for n-dimensional c2r transforms,
    as well as calculating the last_dim_size which is shape[dim[-1]] for the outputr   c                      s
     dS )Nz! must transform at least one axisr,   r,   )r   r,   r.   r/     r0   z:_canonicalize_fft_c2r_shape_and_dim_args.<locals>.<lambda>NrS   rR   r1   c                      rf   rg   r,   r,   rh   r,   r.   r/     rj   )rU   rb   ri   )r   r2   r3   rT   rU   listr   r   )r   r`   r   rb   rU   
shape_listr,   )r   ri   r.   (_canonicalize_fft_c2r_shape_and_dim_args  s   

r   c                    s^   t d| ||\}}}t| dd} t| ||} tj| ||d t |t fdd|D ddS )	Nr!   Trc   rk   c                 3   s    | ]} j | V  qd S r   rU   r   r   r,   r.   r     s    zirfftn.<locals>.<genexpr>Fr   )r   rO   r^   rp   rq   r8   r   )r`   r   rb   r(   rU   ri   r,   r   r.   r!     s   
"r!   c                 C   s   t d| ||\}}}t| dd} t| ||} t|dkr(tj| |d d ddn| }t||t|d d dd}t|}tj	||dd  |d}t|||ddS )	Nr   Trc   r1   rS   r   r   rk   )
r   rO   r^   rT   rp   r   r8   r   r   rq   )r`   r   rb   r(   rU   ri   r   r   r,   r,   r.   r     s   
(
r   rS   c                 C      t jj| |||dS N)r   rb   r(   )r2   r   r   r`   r   rb   r(   r,   r,   r.   r     r   r   c                 C   r   r   )r2   r   r   r   r,   r,   r.   r     r   r   c                 C   r   r   )r2   r   r   r   r,   r,   r.   r     r   r   c                 C   r   r   )r2   r   r!   r   r,   r,   r.   r      r   r    c                 C   r   r   )r2   r   r   r   r,   r,   r.   r   #  r   r   c                 C   r   r   )r2   r   r   r   r,   r,   r.   r   .  r   r   c                 C   s.   | du rt t|jS t| ts| gS t | S )zIConvert Optional[DimsType] to a simple list, defaulting to all dimensionsN)r   rV   rn   r   r   )rb   r'   r,   r,   r.   _default_alldims9  s
   
r   c                    *   t | } fdd|D }t ||S )Nc                    s   g | ]	} j | d  qS )rR   r   r   r   r,   r.   
<listcomp>F  s    zfftshift.<locals>.<listcomp>r   r2   rollr`   rb   rP   shiftr,   r   r.   r"   C     
r"   c                    r   )Nc                    s   g | ]} j | d  d qS )r1   rR   r   r   r   r,   r.   r   M  s    zifftshift.<locals>.<listcomp>r   r   r,   r   r.   r#   J  r   r#   )F)NrS   N)NNN)Nr   Nr   )Zr5   typingr   r   r   r   r   r   r   r	   r2   torch._prims_primsrp   torch._prims_common_prims_commonrG   torch._decompr
   r   r   r   torch._prims_common.wrappersr   r   __all__NormTyper4   _opsopsatenr   boolr8   r9   r;   rK   rO   r^   strrs   r~   r   fft_fftr   fft_ifftr   fft_rfftr   	fft_irfftr   fft_hfftr   	fft_ihfftr   r   r   r   r   fft_fftnr   	fft_ifftnr   	fft_rfftnr   
fft_ihfftnr   r   r   
fft_irfftnr!   	fft_hfftnr   fft_fft2r   	fft_ifft2r   	fft_rfft2r   
fft_irfft2r    	fft_hfft2r   
fft_ihfft2r   r   fft_fftshiftr"   fft_ifftshiftr#   r,   r,   r,   r.   <module>   sV   (



	





				
8



						
"