X_P

x≤a

x≥a

a

f(a)

f(x) =

x

X

f(x)

por izquierda

x

f(x)

X

por derecha

f(x) = (1 / 2 * x^(2)) + 1
x_A = 3 (slider from -5 to 5)
izq = 1.45 (slider from x_A - 5 to x_A, step 0.01)
der = 3.319906214059464 (slider from x_A to x_A + 2, step 0.01)
A: (x_A, f(x_A))
A_1: (x_A, 0)
A_2: (0, f(x_A))
CasillaDeEntrada1 = Textfield(f)
B_1: (izq, 0)
B: (izq, f(izq))
B_2: (0, f(izq))
g = Segment(B_1, B)
h = Segment(B_2, B)
i = Segment(A_1, A)
j = Segment(A_2, A)
k = Line(A, B)
b = true
C_1: (der, 0)
C_2: (0, f(der))
C: (der, f(der))
l = Segment(C_1, C)
m = Segment(C_2, C)
n = Line(C, A)
a = false