. Write a VBA program that implements the false position method to find the roots of the following equation. Make the program stop looking for a more precise answer when the function evaluates to less than 0.0001. Find and report all roots of the function using the program.

y=x^(1.5sin(x)) e^((-x)/7) + e^(x/10) - 4