% –Ú“IŠÖ�”
c = [ 0;
      0;
      0;
     -1;
     -1 ];
% �üŒ`�ðŒ�
Aeq = [ 1, 0, -1, -1,  0;
        0, 1,  1,  0, -1 ];
beq = [ 0;
        0 ];
% ‰ºŒÀ‚Æ�ãŒÀ
lb = zeros(5,1);
ub = [ 8;
       4;
       3;
       4;
       6 ];

% �üŒ`Œv‰æ–@
x = linprog(c, [],[], Aeq,beq, lb,ub);
x
flow = -c'*x;
flow
