% MATLAB M-file for Generic Descent Algorithm (with exact line search)
%
% Written by: Douglas B. Meade
% Created: 17 April 2006

function [x,r] = descent1( A, b, x, p )

% Define A, b, and initial guess (x0)

r = b - A*x;
q = A*p;
a = (p'*r)/(p'*q);
x = x+a*p;
r = r-a*q;