Stückweise definierte Geschwindigkeit

Aufgabe:

Code:

v(t):=if t<15 then 0.08*t^2 \
else if t<50 then 18 \
else if t<61.34 then -0.14*(t-50)^2+18$
plot2d([v(t)],[t,0,61.34],[y,0,20])$

wxMaxima:

Geschwindigkeit der Wiener U-Bahn zwischen 2 Stationen der U2

Vroomlab:

Geogebra:

Vorzeichenfunktion in wxMaxima:

Betragsfunktion in wxMaxima: