a = 2 (slider from 0 to 12)
q(x) = log(a, x)
f: y = log(10, x)
g: y = log(2, x)
h: y = log(5, x)
p: y = log(0.5, x)
r: y = log(0.1, x)
s: y = log(0.8, x)
P = Point(q)
text1: "log_{" + (LaTeX[a]) + "}" + (LaTeX[x(P)]) + "=" + (LaTeX[y(P)]) + ""
text2: "" + (LaTeX[a]) + "^{" + (LaTeX[y(P)]) + "}=" + (LaTeX[x(P)]) + ""