Glasscheibe

Fläche

A = Point(xAxis)
B = Point(xAxis)
a_2 = OrthogonalLine(A, xAxis)
C = Point(a_2)
P_1, a, a_1, b = Polygon(A, B, C)
P = Point(a)
d = OrthogonalLine(P, a_1)
L = Intersect(a_1, d)
i = OrthogonalLine(P, d)
J = Intersect(i, b)
j = OrthogonalLine(J, a_1)
K = Intersect(a_1, j)
c = OrthogonalLine(P, b)
D = Intersect(b, c)
l = Segment(J, P)
h = Segment(P, L)
Fläche: l h
F: (l, Fläche)
G: (l, 0)
f = Segment(G, F)
g = Segment((0, 0), G)
H = Midpoint(F, G)
T1: "F = " + Fläche
T3: "l = " + l
Q, e, k, m, n = Polygon(J, P, L, K)