o
    Th                     @   s   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
 G dd deZ			dddZdddZdddZdd Zdd ZdS )z,
Spectral Algorithm for Nonlinear Equations
    N)OptimizeResult)_check_unknown_options   )_nonmonotone_line_search_cruz_nonmonotone_line_search_chengc                   @   s   e Zd ZdS )_NoConvergenceN)__name__
__module____qualname__ r   r   X/home/air/segue/gpt/backup/venv/lib/python3.10/site-packages/scipy/optimize/_spectral.pyr      s    r   r   :0yE>Yn  F
   绽|=      ?cruzc           *   	      s2  t | |dvrtd|dd|
du r fdd}
|du r'fdd	}fd
d}dg}t| |||||\}}}}}d} |}||}tg|	}d} }d}d}	 ||}|rhtd|||f  |durq||| ||| | k r~d}d}nt|d| krd| t| }nt||k r|}| | }|
|||} z)|dkrt	||||| d\}!}"}#}$n|dkrt
|||||| d\}!}"}#}$}}W n	 ty   Y n)w |"| }%|$| }&t|%|%t|%|& }|"}|$}|#|dkr||# |d7 }qYt|||d}'t||}(t|'|||(|d |dd})|)S )a  
    Solve nonlinear equation with the DF-SANE method

    Options
    -------
    ftol : float, optional
        Relative norm tolerance.
    fatol : float, optional
        Absolute norm tolerance.
        Algorithm terminates when ``||func(x)|| < fatol + ftol ||func(x_0)||``.
    fnorm : callable, optional
        Norm to use in the convergence check. If None, 2-norm is used.
    maxfev : int, optional
        Maximum number of function evaluations.
    disp : bool, optional
        Whether to print convergence process to stdout.
    eta_strategy : callable, optional
        Choice of the ``eta_k`` parameter, which gives slack for growth
        of ``||F||**2``.  Called as ``eta_k = eta_strategy(k, x, F)`` with
        `k` the iteration number, `x` the current iterate and `F` the current
        residual. Should satisfy ``eta_k > 0`` and ``sum(eta, k=0..inf) < inf``.
        Default: ``||F||**2 / (1 + k)**2``.
    sigma_eps : float, optional
        The spectral coefficient is constrained to ``sigma_eps < sigma < 1/sigma_eps``.
        Default: 1e-10
    sigma_0 : float, optional
        Initial spectral coefficient.
        Default: 1.0
    M : int, optional
        Number of iterates to include in the nonmonotonic line search.
        Default: 10
    line_search : {'cruz', 'cheng'}
        Type of line search to employ. 'cruz' is the original one defined in
        [Martinez & Raydan. Math. Comp. 75, 1429 (2006)], 'cheng' is
        a modified search defined in [Cheng & Li. IMA J. Numer. Anal. 29, 814 (2009)].
        Default: 'cruz'

    References
    ----------
    .. [1] "Spectral residual method without gradient information for solving
           large-scale nonlinear systems of equations." W. La Cruz,
           J.M. Martinez, M. Raydan. Math. Comp. **75**, 1429 (2006).
    .. [2] W. La Cruz, Opt. Meth. Software, 29, 24 (2014).
    .. [3] W. Cheng, D.-H. Li. IMA J. Numer. Anal. **29**, 814 (2009).

    )chengr   zInvalid value z for 'line_search'   Nc                    s    d|  d  S )Nr   r   r   )kxF)f_0r   r   eta_strategyJ   s   z#_root_df_sane.<locals>.eta_strategyc                    s    d  S )Nr   r   r   )f_knexpr   r   fnormO   s   z_root_df_sane.<locals>.fnormc                    s   t j|   S N)nplinalgnormr   )r   r   r   fmeritS   s   z_root_df_sane.<locals>.fmeritr   r   Fz&too many function evaluations requiredTziter %d: ||F|| = %g, sigma = %gzsuccessful convergencer   r   )etar   )shapezdf-sane)r   successmessagefunnfevnitmethod)r   
ValueError
_wrap_funccollectionsdequeprintabsr    signr   r   r   vdotappend_wrap_resultr   )*funcx0argsftolfatolmaxfevr   callbackdispMr   	sigma_epssigma_0line_searchunknown_optionsr#   r)   fx_kx_shapeF_k
is_complexr   sigma_kF_0_normprev_fsQC	convergedr'   F_k_normdr$   alphaxpfpFps_ky_kr   r   resultr   )r   r   r   r   _root_df_sane   s   1




4
rW   c           	         s   t |}|jt |g R   }t |pt |}| }dd< |r= fdd}t|}t|}n fdd}|||||fS )a  
    Wrap a function and an initial value so that (i) complex values
    are wrapped to reals, and (ii) value for a merit function
    fmerit(x, f) is computed at the same time, (iii) iteration count
    is maintained and an exception is raised if it is exceeded.

    Parameters
    ----------
    func : callable
        Function to wrap
    x0 : ndarray
        Initial value
    fmerit : callable
        Merit function fmerit(f) for computing merit value from residual.
    nfev_list : list
        List to store number of evaluations in. Should be [0] in the beginning.
    maxfev : int
        Maximum number of evaluations before _NoConvergence is raised.
    args : tuple
        Extra arguments to func

    Returns
    -------
    wrap_func : callable
        Wrapped function, to be called as
        ``F, fp = wrap_func(x0)``
    x0_wrap : ndarray of float
        Wrapped initial value; raveled to 1-D and complex
        values mapped to reals.
    x0_shape : tuple
        Shape of the initial value array
    f : float
        Merit function at F
    F : ndarray of float
        Residual at x0_wrap
    is_complex : bool
        Whether complex values were mapped to reals

    r   r   c                    sb   d kr	t  d  d7  < t| }t|g R   }t|}|}||fS Nr   r   )r   _real2complexreshaper    asarrayravel_complex2real)r   zvr   rC   r8   r#   r6   r;   	nfev_listx0_shaper   r   	wrap_func   s   z_wrap_func.<locals>.wrap_funcc                    sV   d kr	t  d  d7  < | } t| g R   }|}||fS rX   )r   rZ   r    r[   r\   )r   r   rC   r`   r   r   rc      s   
)r    r[   r%   r\   iscomplexobjr]   )	r6   r7   r#   ra   r;   r8   r   rG   rc   r   r`   r   r-      s   
(

	r-   c                 C   s(   |rt | }n| }|dur||}|S )zA
    Convert from real to complex and reshape result arrays.
    N)rY   rZ   )rV   rG   r%   r^   r   r   r   r5      s   

r5   c                 C      t j| tdt jS N)dtype)r    ascontiguousarrayfloatview
complex128)r   r   r   r   rY         rY   c                 C   re   rf   )r    rh   complexrj   float64)r^   r   r   r   r]     rl   r]   )r   r   r   r   NNFr   Nr   r   r   )r   r   )__doc__r.   numpyr    scipy.optimizer   scipy.optimize._optimizer   _linesearchr   r   	Exceptionr   rW   r-   r5   rY   r]   r   r   r   r   <module>   s     
 

J