Mühle mit optimalem zylindrischen Wasserbehälter
Author: Prof. Dr. Dörte Haftendorn

r

O = Intersect(xAxis, yAxis)
A = Point(xAxis)
M = Midpoint(A, O)
radius = Segment(M, O)
ga = OrthogonalLine(M, xAxis)
D = Point(ga)
P, d, a, b = Polygon(A, O, D)
Q = Point(radius)
c = OrthogonalLine(Q, xAxis)
F = Intersect(c, a)
e = OrthogonalLine(F, c)
G = Intersect(b, e)
H = Mirror(Q, M)
ZylQ, k, g, h, e_1 = Polygon(H, G, F, Q)
r = Segment(M, Q)
X: (r, 0.0)
V: 3.141592653589793 * r^(2.0) * h
Vol: (r, V / 10.0)
i = Segment(Vol, X)
I = (-12, 10)
hoehe = Segment(D, M)
x_2 = Segment(O, X)