//
// Autor: Timo Ehmke (ehmke@uni-flensburg.de)
//
// Systemvariablen
// ===============
WORLD_X_MAX = +8.0
WORLD_X_MIN = -8.0
WORLD_Y_MAX = +6.0
WORLD_Y_MIN = -6.0
MEASURE_EXACTNESS = 1
FONTSIZE = 16
// Figurenbeschreibung
// ===================
e[1] = O; point; fixed; 0.0,0.0; "hidden"
e[2] = coord; point; coordSystem; O,300,300,200,200; 0;red;black;0
e[3] = curve; line; curve; "t","t^5/300-11*t^3/60+1.5*t",-8.0,8.0,300;
e[4] = A; point; curveslider; 0.5,0.5,curve; "hideLabel"
e[5] = m0; measure; coordinateX; A,-2.5,5.5,"x = ","";
e[6] = m1; measure; calculate; "coordinateX(A)^5/300-11*coordinateX(A)^3/60+1.5*coordinateX(A)",-2.5,4.5,"f(x) = ","";
e[7] = m2; measure; calculate; "coordinateX(A)^4/60-33*coordinateX(A)^2/60+1.5",-2.5,3.5,"f'(x) = ","";
e[8] = m3; measure; calculate; "coordinateX(A)^3/15-33*coordinateX(A)/30",-2.5,2.5,"f''(x) = ",""; "hidden"
e[9] = A'; point; functionDepend; "coordinateX(A)+1.0","coordinateY(A)+calculate(m2)"; "hideLabel"
e[10] = t; line; straightLine; A,A'; 0;0;black;0
e[11] = A''; point; functionDepend; "coordinateX(A)+1.0","coordinateY(A)"; "hidden"
e[12] = f'(x); line; connect; A',A''; black;0;gray;0
e[13] = l; line; connect; A'',A; black;0;gray;0
e[14] = x; point; functionDepend; "coordinateX(A)","0";
e[15] = l2; line; connect; x,A; 0;0;lightGray;0
// Animation
// =========
animation = "A,1,100,400,0"
// Ein- und Ausblenden von Objekten
// ================================
hidden[1] = "if (abs(calculate(m3)) > 0.01) hide (Textbox_1)"
hidden[2] = "if (abs(calculate(m2)) > 0.015) hide (Textbox_2)"
// Textfenster
// ===========
TextBox = 340;20;100;40
Wendepunkt
TextBox = 340;20;100;40
Extrempunkt