Clear[X1,X2]

"Minimal Weight Design Subjected to Stress Constraints using New Variables (see: page 24-25)"


Minimize[{3*X1+X2, {(2*X1+X2)-2*X1(X1+X2)<=0, X1>0, X2>0}}, {X1,X2}]