Question: Maple solving a tan^2 transcendental equation.

Hello, 

I am trying to solve a simple equation 

x(0.0178){tan([2.10^-5](x)^0.5)}^2=+2.32.10^12-x, which I want to be solved over the range 1.10^10......2.10^12.

I have tried the following program (which I have got help on):

restart; 

eq := x(0.0178)*tan²(Sqrt(x)*2E-5) = 2.32e12-x;

 neweq := subs(x = 10^y, eq); Digits := 15;

 newans := Student:-Calculus1:-Roots(neweq, y = log[10](10^10) .. log[10](2*10^12));

 newans2 := Student:-Calculus1:-Roots(simplify((rhs-lhs)(neweq)), y = log[10](10^10) .. log[10](2*10^12));

 all := [op(evalf[14]({op(newans), op(newans2)}))];

Digits:=100:
allmod:=map(t->10^t,all):
Digits:=15:
newestmod:=evalf(allmod);

            
Digits:=100:
check:=map(t->eval((rhs-lhs)(eq),x=t),allmod):
Digits:=15:
evalf(check);