ziehe 
A oder B

Ha 2016

Scherung

f(x) = (1 / 2 * x^(2))
B = Point(f)
A = Point(f)
g = Segment(A, B)
M = Midpoint(g)
h = OrthogonalLine(M, xAxis)
T = Intersect(f, h)
i = Line(T, g)
j = OrthogonalLine(T, xAxis)
a_1 = OrthogonalLine(T, j)
G = Intersect(j, g)
k = OrthogonalLine(G, j)
l = OrthogonalLine(A, k)
m = OrthogonalLine(B, k)
A' = Intersect(l, k)
B' = Intersect(m, k)
α = Angle(B', G, B)
β = Angle(A', G, A)
J_1 = (8, 0)
n = OrthogonalLine(J_1, xAxis)
K = (9.8, 3.54)
r = OrthogonalLine(K, n)
K_s = Intersect(n, r)
s = OrthogonalLine(K, r)
K'_1 = Rotate(K, α, K_s)
t = Line(K_s, K'_1)
K' = Intersect(s, t)
a = Segment(K_s, K)
b = Segment(K, K')
d = Segment(A', B')
C = Point(a_1)
e = OrthogonalLine(K', n)
K'_s = Intersect(n, e)
f_1 = Segment(K, K'_s)
g_1 = Segment(K'_s, K')
p = Segment(B, B')
h_1 = Segment(A', A)
D = Point(n)
i_1 = OrthogonalLine(D, n)
J = Point(i_1)
H = Point(i_1)
F' = Rotate(J, α, D)
j_1 = Line(D, F')
k_1 = Line(J, n)
l_1 = Line(H, n)
H' = Intersect(j_1, l_1)
J' = Intersect(k_1, j_1)
m_1 = Segment(H', D)
n_1 = Segment(D, J')
p_1 = Segment(H, D)
q_1 = Segment(D, J)
r_1 = Segment(K_s, K')
δ = Angle(K, K_s, K')
ε = Angle(K, K'_s, K')
ζ = Angle(J, D, F')
η = Angle(H, D, H')
s_1 = Ray(J', J)
u = Vector(K, K')
v = Vector(J, J')
w = Vector(H, H')
t_1 = OrthogonalLine(A, xAxis)
L = Intersect(t_1, i)
N = Intersect(p, i)
γ = Angle(C, T, N)
q = Polynomial({A', T, B'})
c = OrthogonalLine(B, a_1)
o = IntegralBetween(f, ((-(x(i) / y(i))) * x) - z(i) / y(i), x(A), x(B))
b_1 = IntegralBetween(q, ((-(x(a_1) / y(a_1))) * x) - z(a_1) / y(a_1), x(A), x(B))
N': (x(N), y(T))
L': (x(L), y(T))