function [T,BV] = first_simplex_tableau(c,A,b)
## Function [T, BV] = first_simplex_tableau (c, A, b) builds the first 
## simplex tableau for the function simplex_lp_solver.  T is the tableau,
## BV are the indexes of the basic variables (the slacks in this case).

## n is the number of decision variables, m is the number of constraints.
[m,n] = size(A);

## The simplex tableau without the BV information.
T = [          1  -c'  zeros(1,m)  0; 
      zeros(m,1)    A      eye(m)  b];

## The indexes of the BV's (the slacks in this case).
BV = ( (n+1):(n+m) )';
endfunction