I use Mathematica in my work for a medical device manufacturer. Main uses are optimisation, magnetic field calculations, and interfacing to CAD systems.