function [x] = linprogg(f,A,b) % LP solver which can be used instead of linprog % on home assignment number 4. % x=linprogg(f,A,b) solves the LP problem: % % minimize f'*x subject to: A*x <= b % % [m,n] = size(A); low = -100*ones(n,1); upp = 100*ones(n,1); sense = ones(m,1); maxit = 1000; prlvl = 0; [x] = alps(f,A,b,low,upp,sense,maxit,prlvl)