$xPx$

x

f(x)=

xMin

xMax

dx

f(

f(

) =

f:

\rightarrow

f(x) = 1 + (0.2 * x)
xAktuell = 1 (slider from -5 to 5)
yAktuell: f(xAktuell)
dx = 1 (slider from -5 to 5)
xmin = 0 (slider from -5 to 5)
xmax = 10 (slider from -5 to 10)
W = Sequence(f(i), i, xmin, xmax, dx)
W0 = Remove(W, {Infinity})
W2 = RemoveUndefined(W0)
a = 4
WT = Sequence({i, f(i)}, i, xmin, xmax, dx)
ymin0 = Min(W)
ymax0 = Max(W2)
Px: (xAktuell, 0)
P: (xAktuell, yAktuell)
Py: (0, yAktuell)
g = Segment(Px, P)
u = Vector(P, Py)
pos = If(a < 0, ((xmax - xmin) / 15, 0), Vector[(-((xmin - xmax) / 100, 0))])
WText = Insert({{"x", "f(x)"}}, WT, 1)
Text2 = TableText(WText, "v|_ll")
b = 4 (slider from xmin to xmax, step dx)
ma = 1 (slider from -5 to 5)
ymax = If(ymax0 < 1, 1, ymax0)
ymin = If(ymin0 > -1, -1, ymin0)
Eingabefeld1 = Textfield(f)
Eingabefeld2 = Textfield(xmin)
Eingabefeld3 = Textfield(xmax)
Eingabefeld4 = Textfield(dx)
W1 = RemoveUndefined(W0)
Eingabefeld5 = Textfield(xAktuell)
Text4: "" + yAktuell + ""
Text6: "" + xAktuell + ""
Text8: "" + yAktuell + ""