x

O: (0, 0)
f(x) = If[x ≥ 0, x^(2)]
t = 3 (slider from 0 to 3, step 0.2)
P: (t, t^(2))
g = Tangent(P, f)
m = Slope(g)
h(x) = If[0 ≤ x ≤ t, (2 * x)]
T: (t, h(t))
i = Line(T, xAxis)
A = Intersect(i, yAxis)
j = Segment(A, T)
a: y(A)
testo1: "" + a + ""