Ë
    âQ(hq  ã            	       óH  — d Z ddlZddlZddlmZ ddlmZ ddlm	Z	m
Z
mZmZmZ ddlmZmZ dd	lmZ dd
lmZ d„ Zej.                  d„ «       Zd„ Zd„ Zdd„Zddddej8                   ej8                  fddddf	d„Zd„ Zd„ Zd„ Z ej8                   ej8                  fddfd„Z!y)z'Routines for numerical differentiation.é    N)Únorm)ÚLinearOperatoré   )ÚissparseÚ
csc_matrixÚ
csr_matrixÚ
coo_matrixÚfindé   )Úgroup_denseÚgroup_sparse)Úarray_namespace)Úarray_api_extrac                 óø  — |dk(  rt        j                  |t        ¬«      }nA|dk(  r1t        j                  |«      }t        j                  |t        ¬«      }nt        d«      ‚t        j                  |t         j                   k(  |t         j                  k(  z  «      r||fS ||z  }|j                  «       }| |z
  }	|| z
  }
|dk(  ry| |z   }||k  ||kD  z  }t        j                  |«      t        j                  |	|
«      k  }|||z  xx   dz  cc<   |
|	k\  | z  }|
|   |z  ||<   |
|	k  | z  }|	|    |z  ||<   ||fS |dk(  r´|	|k\  |
|k\  z  }|
|	k\  | z  }t        j                  ||   d|
|   z  |z  «      ||<   d||<   |
|	k  | z  }t        j                  ||   d|	|   z  |z  «       ||<   d||<   t        j                  |
|	«      |z  }| t        j                  |«      |k  z  }||   ||<   d||<   ||fS )	a¨  Adjust final difference scheme to the presence of bounds.

    Parameters
    ----------
    x0 : ndarray, shape (n,)
        Point at which we wish to estimate derivative.
    h : ndarray, shape (n,)
        Desired absolute finite difference steps.
    num_steps : int
        Number of `h` steps in one direction required to implement finite
        difference scheme. For example, 2 means that we need to evaluate
        f(x0 + 2 * h) or f(x0 - 2 * h)
    scheme : {'1-sided', '2-sided'}
        Whether steps in one or both directions are required. In other
        words '1-sided' applies to forward and backward schemes, '2-sided'
        applies to center schemes.
    lb : ndarray, shape (n,)
        Lower bounds on independent variables.
    ub : ndarray, shape (n,)
        Upper bounds on independent variables.

    Returns
    -------
    h_adjusted : ndarray, shape (n,)
        Adjusted absolute step sizes. Step size decreases only if a sign flip
        or switching to one-sided scheme doesn't allow to take a full step.
    use_one_sided : ndarray of bool, shape (n,)
        Whether to switch to one-sided scheme. Informative only for
        ``scheme='2-sided'``.
    ú1-sided©Údtypeú2-sidedz(`scheme` must be '1-sided' or '2-sided'.éÿÿÿÿç      à?TF)ÚnpÚ	ones_likeÚboolÚabsÚ
zeros_likeÚ
ValueErrorÚallÚinfÚcopyÚmaximumÚminimum)Úx0ÚhÚ	num_stepsÚschemeÚlbÚubÚuse_one_sidedÚh_totalÚ
h_adjustedÚ
lower_distÚ
upper_distÚxÚviolatedÚfittingÚforwardÚbackwardÚcentralÚmin_distÚadjusted_centrals                      úU/var/www/skyplay_api_hub/venv/lib/python3.12/site-packages/scipy/optimize/_numdiff.pyÚ_adjust_scheme_to_boundsr6      sX  € ð> �ÒÜŸ™ Q¬dÔ3‰Ø	�9Ò	Ü�F‰F�1‹IˆÜŸ™ a¬tÔ4‰äÐCÓDÐDä	‡v�vˆr”b—f‘f�W‰} ¤r§v¡v¡Ñ.Ô/Ø�-ÐÐà�)‰m€GØ—‘“€Jà�b‘€JØ�b‘€Jà�ÒØ�‰LˆØ˜‘F˜q 2™vÑ&ˆÜ—&‘&˜“/¤R§Z¡Z°
¸JÓ%GÑGˆØ�8˜gÑ%Ó&¨"Ñ,Ó&à Ñ+°¨xÑ7ˆØ(¨Ñ1°IÑ=ˆ
�7ÑØ Ñ+°¨xÑ7ˆØ *¨8Ñ 4Ð4°yÑ@ˆ
�8Ñð& �}Ð$Ð$ð% 
�9Ò	Ø Ñ(¨Z¸7Ñ-BÑCˆà Ñ+°¨xÑ7ˆÜ Ÿj™jØˆg‰J˜˜j¨Ñ1Ñ1°IÑ=ó?ˆ
�7Ñà!%ˆ�gÑà Ñ+°¨xÑ7ˆÜ "§
¡
Øˆh‰K˜˜z¨(Ñ3Ñ3°iÑ?ó!Að  Aˆ
�8Ñà"&ˆ�hÑä—:‘:˜j¨*Ó5¸	ÑAˆØ$˜H¬¯©¨zÓ(:¸hÑ(FÑGÐØ'/Ð0@Ñ'Aˆ
Ð#Ñ$Ø*/ˆÐ&Ñ'à�}Ð$Ð$ó    c                 ó4  — t        j                  t         j                  «      j                  }d}t        j                  | t         j
                  «      r@t        j                  | «      j                  }t        j                  | «      j                  }d}t        j                  |t         j
                  «      rEt        j                  |«      j                  }|r$|k  rt        j                  |«      j                  }|dv r|dz  S |dv r|dz  S t        d«      ‚)a¨  
    Calculates relative EPS step to use for a given data type
    and numdiff step method.

    Progressively smaller steps are used for larger floating point types.

    Parameters
    ----------
    f0_dtype: np.dtype
        dtype of function evaluation

    x0_dtype: np.dtype
        dtype of parameter vector

    method: {'2-point', '3-point', 'cs'}

    Returns
    -------
    EPS: float
        relative step size. May be np.float16, np.float32, np.float64

    Notes
    -----
    The default relative step will be np.float64. However, if x0 or f0 are
    smaller floating point types (np.float16, np.float32), then the smallest
    floating point type is chosen.
    FT)ú2-pointÚcsr   )ú3-pointgUUUUUUÕ?zBUnknown step method, should be one of {'2-point', '3-point', 'cs'})	r   ÚfinfoÚfloat64ÚepsÚ
issubdtypeÚinexactr   ÚitemsizeÚRuntimeError)Úx0_dtypeÚf0_dtypeÚmethodÚEPSÚx0_is_fpÚx0_itemsizeÚf0_itemsizes          r5   Ú_eps_for_methodrJ   \   sÚ   € ô< �(‰(”2—:‘:Ó
×
"Ñ
"€Cà€HÜ	‡}�}�XœrŸz™zÔ*ä�h‰h�xÓ ×$Ñ$ˆÜ—h‘h˜xÓ(×1Ñ1ˆØˆä	‡}�}�XœrŸz™zÔ*Ü—h‘h˜xÓ(×1Ñ1ˆá˜ kÒ1Ü—(‘(˜8Ó$×(Ñ(ˆCàÐ"Ñ"Ø�C‰xˆØ	�;Ñ	Ø�S‰zÐäð :ó ;ð 	;r7   c           
      ó¾  — |dk\  j                  t        «      dz  dz
  }t        |j                  |j                  |«      }| €1||z  t	        j
                  dt	        j                  |«      «      z  }|S | |z  t	        j                  |«      z  }||z   |z
  }t	        j                  |dk(  ||z  t	        j
                  dt	        j                  |«      «      z  |«      }|S )az  
    Computes an absolute step from a relative step for finite difference
    calculation.

    Parameters
    ----------
    rel_step: None or array-like
        Relative step for the finite difference calculation
    x0 : np.ndarray
        Parameter vector
    f0 : np.ndarray or scalar
    method : {'2-point', '3-point', 'cs'}

    Returns
    -------
    h : float
        The absolute step size

    Notes
    -----
    `h` will always be np.float64. However, if `x0` or `f0` are
    smaller floating point dtypes (e.g. np.float32), then the absolute
    step size will be calculated from the smallest floating point size.
    r   r   r   ç      ð?)ÚastypeÚfloatrJ   r   r   r    r   Úwhere)Úrel_stepr"   Úf0rE   Úsign_x0ÚrstepÚabs_stepÚdxs           r5   Ú_compute_absolute_steprV   ’   sÌ   € ð6 �Q‰w×ÑœuÓ%¨Ñ)¨AÑ-€Gä˜BŸH™H b§h¡h°Ó7€EàÐØ˜7‘?¤R§Z¡Z°´R·V±V¸B³ZÓ%@Ñ@ˆð €Oð ˜gÑ%¬¯©¨r«
Ñ2ˆð �H‰} Ñ"ˆÜ—8‘8˜B !™GØ! G™O¬b¯j©j¸¼b¿f¹fÀR»jÓ.IÑIØ$ó&ˆð €Or7   c                 óÞ   — d„ | D «       \  }}|j                   dk(  r t        j                  ||j                  «      }|j                   dk(  r t        j                  ||j                  «      }||fS )aa  
    Prepares new-style bounds from a two-tuple specifying the lower and upper
    limits for values in x0. If a value is not bound then the lower/upper bound
    will be expected to be -np.inf/np.inf.

    Examples
    --------
    >>> _prepare_bounds([(0, 1, 2), (1, 2, np.inf)], [0.5, 1.5, 2.5])
    (array([0., 1., 2.]), array([ 1.,  2., inf]))
    c              3   óR   K  — | ]  }t        j                  |t        ¬ «      –— Œ! y­w)r   N)r   ÚasarrayrN   )Ú.0Úbs     r5   ú	<genexpr>z"_prepare_bounds.<locals>.<genexpr>Î   s   è ø€ Ò9¨QŒb�j‰j˜¤%×(Ð(Ñ9ùs   ‚%'r   )Úndimr   ÚresizeÚshape)Úboundsr"   r&   r'   s       r5   Ú_prepare_boundsra   Ã   sY   € ñ :°&Ô9�F€BˆØ	‡w�w�!‚|Ü�Y‰Y�r˜2Ÿ8™8Ó$ˆà	‡w�w�!‚|Ü�Y‰Y�r˜2Ÿ8™8Ó$ˆàˆrˆ6€Mr7   c                 ó’  — t        | «      rt        | «      } n7t        j                  | «      } | dk7  j	                  t        j
                  «      } | j                  dk7  rt        d«      ‚| j                  \  }}|�t        j                  |«      r1t        j                  j                  |«      }|j                  |«      }n0t        j                  |«      }|j                  |fk7  rt        d«      ‚| dd…|f   } t        | «      r#t        ||| j                  | j                   «      }nt#        ||| «      }|j%                  «       ||<   |S )aÊ  Group columns of a 2-D matrix for sparse finite differencing [1]_.

    Two columns are in the same group if in each row at least one of them
    has zero. A greedy sequential algorithm is used to construct groups.

    Parameters
    ----------
    A : array_like or sparse matrix, shape (m, n)
        Matrix of which to group columns.
    order : int, iterable of int with shape (n,) or None
        Permutation array which defines the order of columns enumeration.
        If int or None, a random permutation is used with `order` used as
        a random seed. Default is 0, that is use a random permutation but
        guarantee repeatability.

    Returns
    -------
    groups : ndarray of int, shape (n,)
        Contains values from 0 to n_groups-1, where n_groups is the number
        of found groups. Each value ``groups[i]`` is an index of a group to
        which ith column assigned. The procedure was helpful only if
        n_groups is significantly less than n.

    References
    ----------
    .. [1] A. Curtis, M. J. D. Powell, and J. Reid, "On the estimation of
           sparse Jacobian matrices", Journal of the Institute of Mathematics
           and its Applications, 13 (1974), pp. 117-120.
    r   r   z`A` must be 2-dimensional.Nz`order` has incorrect shape.)r   r   r   Ú
atleast_2drM   Úint32r]   r   r_   ÚisscalarÚrandomÚRandomStateÚpermutationrY   r   ÚindicesÚindptrr   r   )ÚAÚorderÚmÚnÚrngÚgroupss         r5   Úgroup_columnsrq   Ø   s  € ô< �„{Ü�q‹M‰ä�M‰M˜!ÓˆØ�!‰V�O‰OœBŸH™HÓ%ˆà‡v�v�‚{ÜÐ5Ó6Ð6à�7‰7�D€A€qà€}œŸ™ EÔ*Ü�i‰i×#Ñ# EÓ*ˆØ—‘ Ó"‰ä—
‘
˜5Ó!ˆØ�;‰;˜1˜$ÒÜÐ;Ó<Ð<à	Š!ˆUˆ(‰€Aä�„{Ü˜a  A§I¡I¨q¯x©xÓ8‰ä˜Q  1Ó%ˆà—K‘K“M€Fˆ5�Mà€Mr7   r;   F© c           
      óÂ  ‡ ‡‡	‡
‡— |dvrt        d|› d�«      ‚t        ‰«      Št        j                  ‰j	                  ‰«      d‰¬«      }‰j
                  }‰j                  |j                  d«      r|j                  }‰j                  ||«      Š‰j                  dkD  rt        d«      ‚t        |‰«      \  }}|j                  ‰j                  k7  s|j                  ‰j                  k7  rt        d«      ‚|r[t        j                  t        j                  |«      «      r(t        j                  t        j                  |«      «      st        d	«      ‚‰
€i Š
ˆ	ˆ ˆ
ˆˆfd
„}|€	 |‰«      }n/t        j                  |«      }|j                  dkD  rt        d«      ‚t        j                   ‰|k  ‰|kD  z  «      rt        d«      ‚|r2|€!t#        ‰j                  |j                  |«      }t%        |‰|||«      S |€t'        |‰||«      }nŽ‰dk\  j                  t(        «      dz  dz
  }|}‰|z   ‰z
  }t        j*                  |dk(  t#        ‰j                  |j                  |«      |z  t        j,                  dt        j.                  ‰«      «      z  |«      }|dk(  rt1        ‰|dd||«      \  }}n |dk(  rt1        ‰|dd||«      \  }}n|dk(  rd}|€t3        |‰|||«      S t5        |«      st7        |«      dk(  r|\  }}n|}t9        |«      }t5        |«      rt;        |«      }nt        j<                  |«      }t        j                  |«      }t?        |‰|||||«      S )aJ  Compute finite difference approximation of the derivatives of a
    vector-valued function.

    If a function maps from R^n to R^m, its derivatives form m-by-n matrix
    called the Jacobian, where an element (i, j) is a partial derivative of
    f[i] with respect to x[j].

    Parameters
    ----------
    fun : callable
        Function of which to estimate the derivatives. The argument x
        passed to this function is ndarray of shape (n,) (never a scalar
        even if n=1). It must return 1-D array_like of shape (m,) or a scalar.
    x0 : array_like of shape (n,) or float
        Point at which to estimate the derivatives. Float will be converted
        to a 1-D array.
    method : {'3-point', '2-point', 'cs'}, optional
        Finite difference method to use:
            - '2-point' - use the first order accuracy forward or backward
                          difference.
            - '3-point' - use central difference in interior points and the
                          second order accuracy forward or backward difference
                          near the boundary.
            - 'cs' - use a complex-step finite difference scheme. This assumes
                     that the user function is real-valued and can be
                     analytically continued to the complex plane. Otherwise,
                     produces bogus results.
    rel_step : None or array_like, optional
        Relative step size to use. If None (default) the absolute step size is
        computed as ``h = rel_step * sign(x0) * max(1, abs(x0))``, with
        `rel_step` being selected automatically, see Notes. Otherwise
        ``h = rel_step * sign(x0) * abs(x0)``. For ``method='3-point'`` the
        sign of `h` is ignored. The calculated step size is possibly adjusted
        to fit into the bounds.
    abs_step : array_like, optional
        Absolute step size to use, possibly adjusted to fit into the bounds.
        For ``method='3-point'`` the sign of `abs_step` is ignored. By default
        relative steps are used, only if ``abs_step is not None`` are absolute
        steps used.
    f0 : None or array_like, optional
        If not None it is assumed to be equal to ``fun(x0)``, in this case
        the ``fun(x0)`` is not called. Default is None.
    bounds : tuple of array_like, optional
        Lower and upper bounds on independent variables. Defaults to no bounds.
        Each bound must match the size of `x0` or be a scalar, in the latter
        case the bound will be the same for all variables. Use it to limit the
        range of function evaluation. Bounds checking is not implemented
        when `as_linear_operator` is True.
    sparsity : {None, array_like, sparse matrix, 2-tuple}, optional
        Defines a sparsity structure of the Jacobian matrix. If the Jacobian
        matrix is known to have only few non-zero elements in each row, then
        it's possible to estimate its several columns by a single function
        evaluation [3]_. To perform such economic computations two ingredients
        are required:

        * structure : array_like or sparse matrix of shape (m, n). A zero
          element means that a corresponding element of the Jacobian
          identically equals to zero.
        * groups : array_like of shape (n,). A column grouping for a given
          sparsity structure, use `group_columns` to obtain it.

        A single array or a sparse matrix is interpreted as a sparsity
        structure, and groups are computed inside the function. A tuple is
        interpreted as (structure, groups). If None (default), a standard
        dense differencing will be used.

        Note, that sparse differencing makes sense only for large Jacobian
        matrices where each row contains few non-zero elements.
    as_linear_operator : bool, optional
        When True the function returns an `scipy.sparse.linalg.LinearOperator`.
        Otherwise it returns a dense array or a sparse matrix depending on
        `sparsity`. The linear operator provides an efficient way of computing
        ``J.dot(p)`` for any vector ``p`` of shape (n,), but does not allow
        direct access to individual elements of the matrix. By default
        `as_linear_operator` is False.
    args, kwargs : tuple and dict, optional
        Additional arguments passed to `fun`. Both empty by default.
        The calling signature is ``fun(x, *args, **kwargs)``.

    Returns
    -------
    J : {ndarray, sparse matrix, LinearOperator}
        Finite difference approximation of the Jacobian matrix.
        If `as_linear_operator` is True returns a LinearOperator
        with shape (m, n). Otherwise it returns a dense array or sparse
        matrix depending on how `sparsity` is defined. If `sparsity`
        is None then a ndarray with shape (m, n) is returned. If
        `sparsity` is not None returns a csr_matrix with shape (m, n).
        For sparse matrices and linear operators it is always returned as
        a 2-D structure, for ndarrays, if m=1 it is returned
        as a 1-D gradient array with shape (n,).

    See Also
    --------
    check_derivative : Check correctness of a function computing derivatives.

    Notes
    -----
    If `rel_step` is not provided, it assigned as ``EPS**(1/s)``, where EPS is
    determined from the smallest floating point dtype of `x0` or `fun(x0)`,
    ``np.finfo(x0.dtype).eps``, s=2 for '2-point' method and
    s=3 for '3-point' method. Such relative step approximately minimizes a sum
    of truncation and round-off errors, see [1]_. Relative steps are used by
    default. However, absolute steps are used when ``abs_step is not None``.
    If any of the absolute or relative steps produces an indistinguishable
    difference from the original `x0`, ``(x0 + dx) - x0 == 0``, then a
    automatic step size is substituted for that particular entry.

    A finite difference scheme for '3-point' method is selected automatically.
    The well-known central difference scheme is used for points sufficiently
    far from the boundary, and 3-point forward or backward scheme is used for
    points near the boundary. Both schemes have the second-order accuracy in
    terms of Taylor expansion. Refer to [2]_ for the formulas of 3-point
    forward and backward difference schemes.

    For dense differencing when m=1 Jacobian is returned with a shape (n,),
    on the other hand when n=1 Jacobian is returned with a shape (m, 1).
    Our motivation is the following: a) It handles a case of gradient
    computation (m=1) in a conventional way. b) It clearly separates these two
    different cases. b) In all cases np.atleast_2d can be called to get 2-D
    Jacobian with correct dimensions.

    References
    ----------
    .. [1] W. H. Press et. al. "Numerical Recipes. The Art of Scientific
           Computing. 3rd edition", sec. 5.7.

    .. [2] A. Curtis, M. J. D. Powell, and J. Reid, "On the estimation of
           sparse Jacobian matrices", Journal of the Institute of Mathematics
           and its Applications, 13 (1974), pp. 117-120.

    .. [3] B. Fornberg, "Generation of Finite Difference Formulas on
           Arbitrarily Spaced Grids", Mathematics of Computation 51, 1988.

    Examples
    --------
    >>> import numpy as np
    >>> from scipy.optimize._numdiff import approx_derivative
    >>>
    >>> def f(x, c1, c2):
    ...     return np.array([x[0] * np.sin(c1 * x[1]),
    ...                      x[0] * np.cos(c2 * x[1])])
    ...
    >>> x0 = np.array([1.0, 0.5 * np.pi])
    >>> approx_derivative(f, x0, args=(1, 2))
    array([[ 1.,  0.],
           [-1.,  0.]])

    Bounds can be used to limit the region of function evaluation.
    In the example below we compute left and right derivative at point 1.0.

    >>> def g(x):
    ...     return x**2 if x >= 1 else x
    ...
    >>> x0 = 1.0
    >>> approx_derivative(g, x0, bounds=(-np.inf, 1.0))
    array([ 1.])
    >>> approx_derivative(g, x0, bounds=(1.0, np.inf))
    array([ 2.])
    )r9   r;   r:   zUnknown method 'z'. r   )r]   Úxpúreal floatingz#`x0` must have at most 1 dimension.z,Inconsistent shapes between bounds and `x0`.z7Bounds not supported when `as_linear_operator` is True.c                 óê   •— ‰j                  | j                  d«      r‰j                  | ‰j                  «      } t        j                   ‰| g‰¢­i ‰¤Ž«      }|j
                  dkD  rt        d«      ‚|S )Nru   r   z-`fun` return value has more than 1 dimension.)Úisdtyper   rM   r   Ú
atleast_1dr]   rB   )r-   ÚfÚargsÚfunÚkwargsr"   rt   s     €€€€€r5   Úfun_wrappedz&approx_derivative.<locals>.fun_wrappedÔ  sj   ø€ ð �:‰:�a—g‘g˜Ô/Ø—	‘	˜!˜RŸX™XÓ&ˆAä�M‰M™#˜aÐ1 $Ò1¨&Ñ1Ó2ˆØ�6‰6�AŠ:Üð  8ó 9ð 9àˆr7   z&`f0` passed has more than 1 dimension.z `x0` violates bound constraints.r   r   rL   r9   r   r;   r   r:   F) r   r   ÚxpxÚ
atleast_ndrY   r=   rw   r   rM   r]   ra   r_   r   r   Úisinfrx   ÚanyrJ   Ú_linear_operator_differencerV   rN   rO   r    r   r6   Ú_dense_differencer   Úlenrq   r   rc   Ú_sparse_difference)r{   r"   rE   rP   rT   rQ   r`   ÚsparsityÚas_linear_operatorrz   r|   Ú_xÚ_dtyper&   r'   r}   r#   rR   rU   r(   Ú	structurerp   rt   s   ``       ``           @r5   Úapprox_derivativer‹     s@  ü€ ðF Ð1Ñ1ÜÐ+¨F¨8°3Ð7Ó8Ð8ä	˜Ó	€BÜ	�‰˜Ÿ
™
 2›¨Q°2Ô	6€BØ�Z‰Z€FØ	‡z�z�"—(‘(˜OÔ,Ø—‘ˆð 
�‰�2�vÓ	€Bà	‡w�w�‚{ÜÐ>Ó?Ð?ä˜V RÓ(�F€Bˆà	‡x�x�2—8‘8Ò˜rŸx™x¨2¯8©8Ò3ÜÐGÓHÐHá¤2§6¡6¬"¯(©(°2«,Ô#7Ü')§v¡v¬b¯h©h°r«lÔ';Üð 9ó :ð 	:ð €~Øˆ÷
ð 
ð 
€zÙ˜‹_‰ä�]‰]˜2ÓˆØ�7‰7�QŠ;ÜÐEÓFÐFä	‡v�vˆr�B‰w˜2 ™7Ñ#Ô$ÜÐ;Ó<Ð<áØÐÜ& r§x¡x°·±¸6ÓBˆHä*¨;¸Ø+-¨x¸óAð 	Að ÐÜ& x°°R¸Ó@‰Að ˜Q‘w×&Ñ&¤uÓ-°Ñ1°AÑ5ˆGØˆAð ˜‘6˜R‘-ˆBÜ—‘˜˜q™Ü(¨¯©°2·8±8¸VÓDØ ñ!Ü#%§:¡:¨c´2·6±6¸"³:Ó#>ñ?àóˆAð
 �YÒÜ7Ø�A�q˜) R¨ó -ÑˆA‰}à�yÒ Ü7Ø�A�q˜) R¨ó -ÑˆA‰}à�tŠ^Ø!ˆMàÐÜ$ [°"°b¸!Ø%2°Fó<ð <ô ˜HÔ%¬#¨h«-¸1Ò*<Ø$,Ñ!�	™6à$�	Ü& xÓ0�ä˜	Ô"Ü& yÓ1‘	äŸM™M¨)Ó4�	ä—]‘] 6Ó*ˆFÜ% k°2°r¸1Ø&3°YØ&,¨fó6ð 6r7   c                 óÄ   ‡ ‡‡‡‡— ‰j                   Š‰j                   }|dk(  r
ˆˆ ˆˆˆfd„}n'|dk(  r	ˆ ˆˆˆfd„}n|dk(  r	ˆ ˆˆˆfd„}nt        d«      ‚t        ‰|f|«      S )Nr9   c                 óÌ   •— t        j                  | t        j                  | «      «      rt        j                  ‰«      S ‰t	        | «      z  }‰|| z  z   } ‰|«      ‰z
  }||z  S )N©r   Úarray_equalr   Úzerosr   )	ÚprU   r-   ÚdfrQ   r{   r#   rm   r"   s	       €€€€€r5   Úmatvecz+_linear_operator_difference.<locals>.matvec$  sX   ø€ Ü�~‰~˜a¤§¡¨qÓ!1Ô2Ü—x‘x “{Ð"Ø”T˜!“W‘ˆBØ�R˜‘T‘	ˆAÙ�Q“˜"‘ˆBØ˜‘7ˆNr7   r;   c                 ó  •— t        j                  | t        j                  | «      «      rt        j                  ‰	«      S d‰z  t	        | «      z  }‰
|dz  | z  z
  }‰
|dz  | z  z   } ‰|«      } ‰|«      }||z
  }||z  S )Nr   rŽ   )r‘   rU   Úx1Úx2Úf1Úf2r’   r{   r#   rm   r"   s          €€€€r5   r“   z+_linear_operator_difference.<locals>.matvec-  s   ø€ Ü�~‰~˜a¤§¡¨qÓ!1Ô2Ü—x‘x “{Ð"Ø�1‘”t˜A“w‘ˆBØ�r˜!‘t˜Q‘h‘ˆBØ�r˜!‘t˜Q‘h‘ˆBÙ�R“ˆBÙ�R“ˆBØ�b‘ˆBØ˜‘7ˆNr7   r:   c                 óä   •— t        j                  | t        j                  | «      «      rt        j                  ‰«      S ‰t	        | «      z  }‰|| z  dz  z   } ‰|«      }|j
                  }||z  S )Nù              ð?)r   r�   r   r�   r   Úimag)	r‘   rU   r-   r—   r’   r{   r#   rm   r"   s	        €€€€r5   r“   z+_linear_operator_difference.<locals>.matvec9  sa   ø€ Ü�~‰~˜a¤§¡¨qÓ!1Ô2Ü—x‘x “{Ð"Ø”T˜!“W‘ˆBØ�R˜‘T˜#‘X‘ˆAÙ�Q“ˆBØ—‘ˆBØ˜‘7ˆNr7   úNever be here.)ÚsizerB   r   )r{   r"   rQ   r#   rE   rn   r“   rm   s   ````   @r5   r‚   r‚     sm   ü€ Ø
�‰€AØ
�‰€Aà�Ò÷	ñ 	ð 
�9Ò	÷		ð 		ð 
�4Š÷	ð 	ô Ð+Ó,Ð,ä˜1˜a˜& &Ó)Ð)r7   c                 óœ  — |j                   }|j                   }t        j                  ||f«      }|j                  «       }	|j                  «       }
|j	                  t
        d¬«      }t        |j                   «      D �](  }|dk(  r'|	|xx   ||   z  cc<   |	|   ||   z
  } | |	«      |z
  }nß|dk(  rR||   rM|	|xx   ||   z  cc<   |
|xx   d||   z  z  cc<   |
|   ||   z
  } | |	«      } | |
«      }d|z  d|z  z   |z
  }nˆ|dk(  rF||   sA|	|xx   ||   z  cc<   |
|xx   ||   z  cc<   |
|   |	|   z
  } | |	«      } | |
«      }||z
  }n=|dk(  r-||xx   ||   d	z  z  cc<    | |«      }|j                  }||   }nt        d
«      ‚||z  ||<   ||   x|	|<   x|
|<   ||<   �Œ+ |dk(  rt        j                  |«      }|j                  S )NT)r   r9   r;   r   g      Àé   r:   rš   rœ   r   )r�   r   Úemptyr   rM   ÚcomplexÚranger›   rB   ÚravelÚT)r{   r"   rQ   r#   r(   rE   rm   rn   ÚJ_transposedr•   r–   ÚxcÚirU   r’   r—   r˜   s                    r5   rƒ   rƒ   H  sú  € Ø
�‰€AØ
�‰€AÜ—8‘8˜Q ˜FÓ#€LØ	�‰‹€BØ	�‰‹€BØ	�‰”7 ˆÓ	&€Bä�1—6‘6‹]ó &ˆØ�YÒØˆq‹E�Q�q‘T‰M‹EØ�A‘˜˜A™‘ˆBÙ�R“˜2‘‰BØ�yÒ  ]°1Ò%5Øˆq‹E�Q�q‘T‰M‹EØˆq‹E�Q˜˜1™‘XÑ‹EØ�A‘˜˜A™‘ˆBÙ�R“ˆBÙ�R“ˆBØ˜‘˜Q ™VÑ# bÑ(‰BØ�yÒ ¨°qÒ)9Øˆq‹E�Q�q‘T‰M‹EØˆq‹E�Q�q‘T‰M‹EØ�A‘˜˜A™‘ˆBÙ�R“ˆBÙ�R“ˆBØ�b‘‰BØ�tŠ^Øˆq‹E�Q�q‘T˜C‘ZÑ‹EÙ�R“ˆBØ—‘ˆBØ�1‘‰BäÐ/Ó0Ð0à˜r™'ˆ�Q‰Ø " 1¡Ð%ˆˆ1‰Ð%��1‘˜˜1›ð9&ð< 	ˆA‚vÜ—x‘x Ó-ˆà�>‰>Ðr7   c                 ó¾  — |j                   }|j                   }	g }
g }g }t        j                  |«      dz   }t        |«      D �]<  }t        j                  ||«      }||z  }|dk(  rI||z   }||z
  } | |«      |z
  }t        j
                  |«      \  }t        |d d …|f   «      \  }}}||   }�n”|dk(  �r/|j                  «       }|j                  «       }||z  }||xx   ||   z  cc<   ||xx   d||   z  z  cc<   | |z  }||xx   ||   z  cc<   ||xx   ||   z  cc<   t        j                  |	«      }||   ||   z
  ||<   ||   ||   z
  ||<    | |«      } | |«      }t        j
                  |«      \  }t        |d d …|f   «      \  }}}||   }||   }t        j                  |«      }||   }d||   z  d||   z  z   ||   z
  ||<   ||    }||   ||   z
  ||<   n_|dk(  rO | ||dz  z   «      }|j                  }|}t        j
                  |«      \  }t        |d d …|f   «      \  }}}||   }nt        d	«      ‚|
j                  |«       |j                  |«       |j                  ||   ||   z  «       �Œ? t        j                  |
«      }
t        j                  |«      }t        j                  |«      }t        ||
|ff||	f¬
«      } t        | «      S )Nr   r9   r;   r   éýÿÿÿrŸ   r:   rš   rœ   )r_   )r�   r   Úmaxr¢   ÚequalÚnonzeror
   r   r�   r    r›   r   ÚappendÚhstackr	   r   )!r{   r"   rQ   r#   r(   rŠ   rp   rE   rm   rn   Úrow_indicesÚcol_indicesÚ	fractionsÚn_groupsÚgroupÚeÚh_vecr-   rU   r’   Úcolsr§   ÚjÚ_r•   r–   Úmask_1Úmask_2r—   r˜   ÚmaskÚrowsÚJs!                                    r5   r…   r…   t  s  € à
�‰€AØ
�‰€AØ€KØ€KØ€Iä�v‰v�f‹~ Ñ!€HÜ�x“ó >(ˆä�H‰H�U˜FÓ#ˆØ�A‘ˆØ�YÒØ�U‘
ˆAØ�R‘ˆBÙ�Q“˜"‘ˆBô —J‘J˜q“M‰EˆDä˜9¢Q¨ WÑ-Ó.‰GˆAˆq�!à�Q‘ŠAØ�yÓ ð —‘“ˆBØ—‘“ˆBà" QÑ&ˆFØˆv‹J˜% ™-Ñ'‹JØˆv‹J˜!˜e F™mÑ+Ñ+‹Jà#�^ aÑ'ˆFØˆv‹J˜% ™-Ñ'‹JØˆv‹J˜% ™-Ñ'‹Jä—‘˜!“ˆBØ˜F™ b¨¡jÑ0ˆBˆv‰JØ˜F™ b¨¡jÑ0ˆBˆv‰Já�R“ˆBÙ�R“ˆBä—J‘J˜q“M‰EˆDÜ˜9¢Q¨ WÑ-Ó.‰GˆAˆq�!Ø�Q‘ˆAà  Ñ#ˆDÜ—‘˜!“ˆBà�T‘7ˆDØ˜B˜t™H‘} q¨2¨d©8¡|Ñ3°b¸±hÑ>ˆBˆt‰Hà�d�U‘8ˆDØ˜$‘x " T¡(Ñ*ˆBˆtŠHØ�tŠ^Ù�R˜% ™)‘^Ó$ˆBØ—‘ˆBØˆBÜ—J‘J˜q“M‰EˆDÜ˜9¢Q¨ WÑ-Ó.‰GˆAˆq�!Ø�Q‘‰AäÐ-Ó.Ð.ð 	×Ñ˜1ÔØ×Ñ˜1ÔØ×Ñ˜˜A™  A¡™Ö'ð}>(ô@ —)‘)˜KÓ(€KÜ—)‘)˜KÓ(€KÜ—	‘	˜)Ó$€IÜ�I ¨[Ð9Ð:À1ÀaÀ&ÔI€AÜ�a‹=Ðr7   c           	      óZ  — |€i } ||g|¢­i |¤Ž}t        |«      rªt        | |||||¬«      }t        |«      }||z
  }t        |«      \  }	}
}t	        j
                  ||	|
f   «      j                  «       }t	        j                  t	        j                  |«      t	        j                  dt	        j                  |«      «      z  «      S t        | ||||¬«      }t	        j                  ||z
  «      }t	        j                  |t	        j                  dt	        j                  |«      «      z  «      S )aT	  Check correctness of a function computing derivatives (Jacobian or
    gradient) by comparison with a finite difference approximation.

    Parameters
    ----------
    fun : callable
        Function of which to estimate the derivatives. The argument x
        passed to this function is ndarray of shape (n,) (never a scalar
        even if n=1). It must return 1-D array_like of shape (m,) or a scalar.
    jac : callable
        Function which computes Jacobian matrix of `fun`. It must work with
        argument x the same way as `fun`. The return value must be array_like
        or sparse matrix with an appropriate shape.
    x0 : array_like of shape (n,) or float
        Point at which to estimate the derivatives. Float will be converted
        to 1-D array.
    bounds : 2-tuple of array_like, optional
        Lower and upper bounds on independent variables. Defaults to no bounds.
        Each bound must match the size of `x0` or be a scalar, in the latter
        case the bound will be the same for all variables. Use it to limit the
        range of function evaluation.
    args, kwargs : tuple and dict, optional
        Additional arguments passed to `fun` and `jac`. Both empty by default.
        The calling signature is ``fun(x, *args, **kwargs)`` and the same
        for `jac`.

    Returns
    -------
    accuracy : float
        The maximum among all relative errors for elements with absolute values
        higher than 1 and absolute errors for elements with absolute values
        less or equal than 1. If `accuracy` is on the order of 1e-6 or lower,
        then it is likely that your `jac` implementation is correct.

    See Also
    --------
    approx_derivative : Compute finite difference approximation of derivative.

    Examples
    --------
    >>> import numpy as np
    >>> from scipy.optimize._numdiff import check_derivative
    >>>
    >>>
    >>> def f(x, c1, c2):
    ...     return np.array([x[0] * np.sin(c1 * x[1]),
    ...                      x[0] * np.cos(c2 * x[1])])
    ...
    >>> def jac(x, c1, c2):
    ...     return np.array([
    ...         [np.sin(c1 * x[1]),  c1 * x[0] * np.cos(c1 * x[1])],
    ...         [np.cos(c2 * x[1]), -c2 * x[0] * np.sin(c2 * x[1])]
    ...     ])
    ...
    >>>
    >>> x0 = np.array([1.0, 0.5 * np.pi])
    >>> check_derivative(f, jac, x0, args=(1, 2))
    2.4492935982947064e-16
    )r`   r†   rz   r|   r   )r`   rz   r|   )
r   r‹   r   r
   r   rY   r£   rª   r   r    )r{   Újacr"   r`   rz   r|   Ú	J_to_testÚJ_diffÚabs_errr§   r·   Úabs_err_dataÚJ_diff_datas                r5   Úcheck_derivativerÅ   Ä  s  € ðz €~ØˆÙ�BÐ(˜Ò( Ñ(€IÜ�	ÔÜ" 3¨°6ÀIØ(,°Vô=ˆä˜yÓ)ˆ	Ø˜fÑ$ˆÜ! '›]Ñˆˆ1ˆlÜ—j‘j ¨¨1¨¡Ó.×4Ñ4Ó6ˆÜ�v‰v”b—f‘f˜\Ó*Ü—j‘j ¤B§F¡F¨;Ó$7Ó8ñ9ó :ð 	:ô # 3¨°6Ø(,°Vô=ˆä—&‘&˜ VÑ+Ó,ˆÜ�v‰v�g¤§
¡
¨1¬b¯f©f°V«nÓ =Ñ=Ó>Ð>r7   )r   )"Ú__doc__Ú	functoolsÚnumpyr   Únumpy.linalgr   Úscipy.sparse.linalgr   Úsparser   r   r   r	   r
   Ú_group_columnsr   r   Úscipy._lib._array_apir   Ú
scipy._libr   r~   r6   Ú	lru_cacherJ   rV   ra   rq   r   r‹   r‚   rƒ   r…   rÅ   rr   r7   r5   ú<module>rÐ      sµ   ðÙ -Û Û Ý å .ß GÕ Gß 5Ý 1Ý -òL%ð^ ×Ññ2;ó ð2;òj.òbó*:ðz '0¸$ÈØ¨¯© w°·±Ð&7À$Ø).°RÀóG6òT&*òR)òXMð` -/¯F©F¨7°B·F±FÐ*;À"Ø ôM?r7   