Ë
    qwjæ  ã            	       ó�   — d Z ddlmZ ddlmZ d„ Zd„ Zd„ Zd„ Zd	„ Z	d
„ Z
d„ Zd„ Zd„ Zd„ Zeee	e
eeeedœZd„ Zd„ Zd„ Zd„ Zd„ Zy)aj  
'Generic' Array API backend for RBF interpolation.

The general logic is this: `_rbfinterp.py` implements the user API and calls
into either `_rbfinterp_np` (the "numpy backend"), or `_rbfinterp_xp` (the
"generic backend".

The numpy backend offloads performance-critical computations to the
pythran-compiled `_rbfinterp_pythran` extension. This way, the call chain is

    _rbfinterp.py <-- _rbfinterp_np.py <-- _rbfinterp_pythran.py

The "generic" backend here is a drop-in replacement of the API of
`_rbfinterp_np.py` for use in `_rbfinterp.py` with non-numpy arrays.

The implementation closely follows `_rbfinterp_np + _rbfinterp_pythran`, with
the following differences:

  -  We used vectorized code not explicit loops in `_build_system` and
     `_build_evaluation_coefficients`; this is more torch/jax friendly;
  - RBF kernels are also "vectorized" and not scalar: they receive an
    array of norms not a single norm;
  - RBF kernels accept an extra xp= argument;

In general, we would prefer less code duplication. The main blocker ATM is
that pythran cannot compile functions with an xp= argument where xp is numpy.
é    )ÚLinAlgErroré   )Ú_monomial_powers_implc                 óŒ   — t        | |«      }|j                  |«      }|j                  d   dk(  r|j                  |d| f«      }|S )Nr   )r   ÚasarrayÚshapeÚreshape)ÚndimÚdegreeÚxpÚouts       úd/var/www/html/newmanjeet/manjet/venv/lib/python3.12/site-packages/scipy/interpolate/_rbfinterp_xp.pyÚ_monomial_powersr       sD   € Ü
  fÓ
-€CØ
�*‰*�S‹/€CØ
‡y�y��|�qÒØ�j‰j˜˜q $˜iÓ(ˆØ€Jó    c           	      óH  — t        | ||||||«      \  }}}	}
	 |j                  j                  ||«      }|	|
|fS # t        $ r_ d}|j                  d   }|dkD  r=t        | |	z
  |
z  ||¬«      }|j                  j                  |«      }||k  r	d|› d|› d�}t        |«      ‚w xY w)a   Build and solve the RBF interpolation system of equations.

    Parameters
    ----------
    y : (P, N) float ndarray
        Data point coordinates.
    d : (P, S) float ndarray
        Data values at `y`.
    smoothing : (P,) float ndarray
        Smoothing parameter for each data point.
    kernel : str
        Name of the RBF.
    epsilon : float
        Shape parameter.
    powers : (R, N) int ndarray
        The exponents for each monomial in the polynomial.

    Returns
    -------
    coeffs : (P + R, S) float ndarray
        Coefficients for each RBF and monomial.
    shift : (N,) float ndarray
        Domain shift used to create the polynomial matrix.
    scale : (N,) float ndarray
        Domain scaling used to create the polynomial matrix.

    zSingular matrixr   )r   zqSingular matrix. The matrix of monomials evaluated at the data point coordinates does not have full column rank (Ú/z).)Ú_build_systemÚlinalgÚsolveÚ	Exceptionr   Úpolynomial_matrixÚmatrix_rankr   )ÚyÚdÚ	smoothingÚkernelÚepsilonÚpowersr   ÚlhsÚrhsÚshiftÚscaleÚcoeffsÚmsgÚnmonosÚpmatÚranks                   r   Ú_build_and_solve_systemr(   (   sÕ   € ô8 +Ø	ˆ1ˆi˜ ¨&°"ó
Ñ€Cˆˆe�UðØ—‘—‘  cÓ*ˆð& �%˜ÐÐøô% ò ð
  ˆØ—‘˜a‘ˆØ�AŠ:Ü$ a¨%¡i°Ñ%6¸À2ÔFˆDØ—9‘9×(Ñ(¨Ó.ˆDØ�fŠ}ðà!˜F ! F 8¨2ð/ð ô
 ˜#ÓÐð!ús
   ˜9 ¹A(B!c                 ó   — |  S ©N© ©Úrr   s     r   Úlinearr.   ^   s	   € Øˆ2€Ir   c                 óX   — |j                  | dk(  d| dz  |j                  | «      z  «      S )Nr   é   )ÚwhereÚlogr,   s     r   Úthin_plate_spliner3   b   s*   € à�8‰8�A˜‘F˜A˜q !™t b§f¡f¨Q£iÑ/Ó0Ð0r   c                 ó   — | dz  S )Né   r+   r,   s     r   Úcubicr6   g   s   € Øˆa‰4€Kr   c                 ó   — | dz   S )Né   r+   r,   s     r   Úquinticr9   k   s   € Øˆq‰Dˆ5€Lr   c                 ó2   — |j                  | dz  dz   «       S )Nr0   r   ©Úsqrtr,   s     r   Úmultiquadricr=   o   s   € Ø�G‰G�A�q‘D˜1‘HÓÐÐr   c                 ó6   — d|j                  | dz  dz   «      z  S ©Nç      ð?r0   r;   r,   s     r   Úinverse_multiquadricrA   s   s   € Ø�—‘˜˜A™ ™Ó$Ñ$Ð$r   c                 ó   — d| dz  dz   z  S r?   r+   r,   s     r   Úinverse_quadraticrC   w   s   € Ø�!�Q‘$˜‘*ÑÐr   c                 ó,   — |j                  | dz   «      S )Nr0   )Úexpr,   s     r   ÚgaussianrF   {   s   € Ø�6‰6�1�a‘4�%‹=Ðr   )r.   r3   r6   r9   r=   rA   rC   rF   c           
      óx   —  ||j                   j                  | ddd…dd…f   | dd…ddd…f   z
  d¬«      |«      S )z+Evaluate RBFs, with centers at `x`, at `x`.Néÿÿÿÿ©Úaxis)r   Úvector_norm)ÚxÚkernel_funcr   s      r   Úkernel_matrixrN   ‹   sA   € áØ
�	‰	×Ñ˜a ¢aª 
™m¨a²°4º°
©mÑ;À"ÐÓEÀróð r   c                 óB   — |j                  | dd…ddd…f   |z  d¬«      S )z9Evaluate monomials, with exponents from `powers`, at `x`.NrH   rI   )Úprod)rL   r   r   s      r   r   r   ’   s$   € à�7‰7�1’Q˜ša�Z‘= FÑ*°ˆ7Ó4Ð4r   c           
      óž  — |j                   d   }|j                   d   }t        |   }	|j                  | d¬«      }
|j                  | d¬«      }||
z   dz  }||
z
  dz  }|j	                  |dk(  d|«      }| |z  }| |z
  |z  }t        ||	|«      }t        |||«      }|j                  |j                  ||fd¬«      |j                  |j                  |j                  ||f«      fd¬«      gd¬«      |j                  |j                  ||j                  |«      g«      «      z   }|j                  ||j                  ||f«      gd¬«      }||||fS )a=  Build the system used to solve for the RBF interpolant coefficients.

    Parameters
    ----------
    y : (P, N) float ndarray
        Data point coordinates.
    d : (P, S) float ndarray
        Data values at `y`.
    smoothing : (P,) float ndarray
        Smoothing parameter for each data point.
    kernel : str
        Name of the RBF.
    epsilon : float
        Shape parameter.
    powers : (R, N) int ndarray
        The exponents for each monomial in the polynomial.

    Returns
    -------
    lhs : (P + R, P + R) float ndarray
        Left-hand side matrix.
    rhs : (P + R, S) float ndarray
        Right-hand side matrix.
    shift : (N,) float ndarray
        Domain shift used to create the polynomial matrix.
    scale : (N,) float ndarray
        Domain scaling used to create the polynomial matrix.

    r   r   rI   r0   g        r@   )r   ÚNAME_TO_FUNCÚminÚmaxr1   rN   r   ÚconcatÚTÚzerosÚdiag)r   r   r   r   r   r   r   Úsr-   rM   ÚminsÚmaxsr!   r"   ÚyepsÚyhatÚout_kernelsÚout_polyr   r    s                       r   r   r   —   si  € ð< 	
�‰�‰
€AØ�‰�Q‰€AÜ˜vÑ&€Kð �6‰6�!˜!ˆ6Ó€DØ�6‰6�!˜!ˆ6Ó€DØ�D‰[˜!‰O€EØ�D‰[˜!‰O€Eð �H‰H�U˜c‘\ 3¨Ó.€EàˆW‰9€DØ�‰I�uÑ€Dä   {°BÓ7€KÜ   v¨rÓ2€Hà
�)‰)à	�‰�K Ð*°ˆÓ	3Ø	�‰�H—J‘J §¡¨!¨Q¨Ó 0Ð1¸ˆÓ	:ð	
ð ð ó ð
 —‘˜Ÿ	™	 9¨b¯h©h°q«kÐ":Ó;Ó<ñ=€Cð �)‰)�Q˜Ÿ™ ! Q Ó(Ð)°ˆ)Ó
2€Cà��U˜EÐ!Ð!r   c                 ó  — t         |   }||z  }	| |z  }
| |z
  |z  }|j                   ||j                  j                  |
dd…ddd…f   |	ddd…dd…f   z
  d¬«      |«      |j	                  |dd…ddd…f   |z  d¬«      gd¬«      }|S )a�  Construct the coefficients needed to evaluate
    the RBF.

    Parameters
    ----------
    x : (Q, N) float ndarray
        Evaluation point coordinates.
    y : (P, N) float ndarray
        Data point coordinates.
    kernel : str
        Name of the RBF.
    epsilon : float
        Shape parameter.
    powers : (R, N) int ndarray
        The exponents for each monomial in the polynomial.
    shift : (N,) float ndarray
        Shifts the polynomial domain for numerical stability.
    scale : (N,) float ndarray
        Scales the polynomial domain for numerical stability.

    Returns
    -------
    (Q, P + R) float ndarray

    NrH   rI   )rR   rU   r   rK   rP   )rL   r   r   r   r   r!   r"   r   rM   r\   ÚxepsÚxhatÚvecs                r   Ú_build_evaluation_coefficientsrd   Õ   s¸   € ô8 ˜vÑ&€KàˆW‰9€DØˆW‰9€DØ�‰I�uÑ€Dð �)‰)áØ—	‘	×%Ñ%Øš˜D¢!˜Ñ$ t¨D²!²Q¨JÑ'7Ñ7¸bð &ó àóð
 �G‰G�Dš˜D¢!˜Ñ$¨Ñ.°RˆGÓ8ð	
ð ð ó 	€Cð €Jr   c	           
      ó0   — t        | |||||||«      }	|	|z  S r*   )rd   )
rL   r   r   r   r   r!   r"   r#   r   rc   s
             r   Úcompute_interpolationrf     s)   € Ü
(Ø	ˆ1ˆf�g˜v u¨e°Ró€Cð �‰<Ðr   N)Ú__doc__Únumpy.linalgr   Ú_rbfinterp_commonr   r   r(   r.   r3   r6   r9   r=   rA   rC   rF   rR   rN   r   r   rd   rf   r+   r   r   Ú<module>rj      s�   ðñõ6 %Ý 4òò3 òlò1ò
òòò%òòð
 Ø)ØØØØ/Ø)Øñ	€òò5ò
;"ò|.óbr   