a = 2.0E-4 (slider from 0 to 0.0004, step 0.00001)
f(x) = ((a * x^(2)) * (10 - x)^(2))
gL: -0.5
amax: 6
Text1: "f_{" + (LaTeX[a]) + "}"
gU: -0.1
gO: 0.5
gR: 10.5
f0(x) = If[0 ≤ x ≤ 10, f(x)]
f0k(x) = If[¬(0 ≤ x ≤ 10), f(x)]
Text2: "f_{\color{red}{" + (LaTeX[a]) + "}}(x) = {\color{red}{ " + (LaTeX[a]) + "}} \cdot  x^2 \cdot ( 10 - x)^2 "