最优化 一维不精确搜索wolfe matlab

function alf=wolfe（fxx0p）
u=0.1; q=0.5; a=0; b=inf; alf=1; j=0;  
g=grad（fxx0）; 
while j<=100
    xk=x0+alf*p;
    h=-u.*alf.*g‘*p;
    while double（subs（f{x}{x0}））-double（subs（f{x}{xk}））< h;% 条件（1.6）%
        b=alf;
        alf=（alf