I have created a Mathematica notebook file that can help find the zeros to very complicated functions. Instructions are included in the file itself, and there is also an html export of the notebook for you to look over before you download it.

Download the file

View the file as HTML