B
    &]\P                 @   sH   d dl mZmZmZ ddlmZ d dlmZmZm	Z	 dgZ
dddZdS )	    )divisionprint_functionabsolute_import   )_nnls)asarray_chkfinitezerosdoublennlsNc          
   C   s   t t| |f\} }t| jdkr(tdt|jdkr>td| j\}}||jd kr^td|dkrjdnt|}t|ftd	}t|ftd	}t|ftd	}t	| |||||||\}}	}
|
dkrt
d
||	fS )a2  
    Solve ``argmin_x || Ax - b ||_2`` for ``x>=0``. This is a wrapper
    for a FORTRAN non-negative least squares solver.

    Parameters
    ----------
    A : ndarray
        Matrix ``A`` as shown above.
    b : ndarray
        Right-hand side vector.
    maxiter: int, optional
        Maximum number of iterations, optional.
        Default is ``3 * A.shape[1]``.

    Returns
    -------
    x : ndarray
        Solution vector.
    rnorm : float
        The residual, ``|| Ax-b ||_2``.

    Notes
    -----
    The FORTRAN code was published in the book below. The algorithm
    is an active set method. It solves the KKT (Karush-Kuhn-Tucker)
    conditions for the non-negative least squares problem.

    References
    ----------
    Lawson C., Hanson R.J., (1987) Solving Least Squares Problems, SIAM

       zexpected matrixr   zexpected vectorr   zincompatible dimensionsN)Zdtypeztoo many iterations)mapr   lenshape
ValueErrorintr   r	   r   r
   RuntimeError)AbmaxitermnwZzzindexxZrnormmode r   2lib/python3.7/site-packages/scipy/optimize/nnls.pyr
   	   s     "
)N)Z
__future__r   r   r    r   Znumpyr   r   r	   __all__r
   r   r   r   r   <module>   s   