load(simplex)$

u1:x>=0;

u2:y>=0;

u3:70*x+412*y<=2060;

u4:216*x+152*y<=1544;

u5:214*x+36*y<=1284;

NB:[u1,u2,u3,u4,u5];

zf:3*x+4*y;

l:maximize_lp(zf,NB);

%,numer;