I am trying to minimise a function (surface area of an irregular box) subject to a certain constraint (fixed volume of box):
{Minimize[
{Sqrt[107.8] π s Sin[θ] + 4 s Sqrt[107.8] + 107.8, -623.6 + 107.8 s Cos[θ] +
20.7654 s^2 Cos[θ] Sin[θ] + (π s^3 Cos[θ] Sin[θ]^2)/3 == 0},
{s, θ}]}
Mathematica returns this:
{{-5562.72, {s -> -128.739, θ -> -3.21881}}}
However, I require positive values for surface area, s (slant length) and θ. Is there any way to do this?