Steigungspunkt erzeugen

Kontrolle

Initialisieren

Höhenprofil

Steigungsprofil

h2(x) = (4295 / 4148928 * x^(6)) - (11467 / 345744 * x^(5)) + (163375 / 691488 * x^(4)) + (2932205 / 1037232 * x^(3)) - (23552785 / 460992 * x^(2)) + (5090025 / 19208 * x) - 4276211 / 9604
h1(x) = (-197 / 5625 * x^(6)) + (43751 / 67500 * x^(5)) - (105487 / 22500 * x^(4)) + (7923 / 500 * x^(3)) - (57547 / 2700 * x^(2)) + 20
f0(x) = If[-0.1 ≤ x ≤ 5, (0.25 * h1(x)), If[5 ≤ x ≤ 12, (0.25 * h2(x))]]
PGraph = Sequence((i, f0(i)), i, 0, 12)
P = Point(PGraph)
P1: (x(P), f0'(x(P)))
T = (6.621409921671013, 3.377284595300264)
t = Line(P, T)
APunkte = Sequence((i, f0'(i)), i, 0, 12)
PListe: {}
f1(x) = f0'(x)
b: h2''(5)
c: h1''(5)
a = false
m = 1 (slider from -5 to 5)
Eingabefeld1 = Textfield(m)
d = Slope(t)