Minimize[{x²-xy+y²-x, x²+y²<=1},{x,y}]