Zylinderhuf_Halbzylinder_proWasseroberfläche

h_z

r

a, c, d, b = Cylinder((0, 0, 0), (0, 0, 1), 1)
e = Surface(cos(u), sin(u), abs((h * cos(u))), u, (-(pi / 2)), pi / 2, h, 0, 1)
g(x, y) = If[sqrt(x^(2) + y^(2)) ≤ 1 ∧ x ≥ 0, x]
x_{S}: 4 / ((3 * pi))
h = Surface(cos(u), sin(u), abs((h * cos(u))), u, pi / 2, ((3 * pi)) / 2, h, 0, x_{S})
S_0: (x_{S}, 0, 0)
k = Line(S_0, yAxis)
S_{z}: (x_{S}, 0, x_{S})
m = Segment(S_0, S_{z})
n = Surface(0, u, h, u, -1, 1, h, 0, x_{S})
o = CurveCartesian(cos(t), sin(t), x_{S}, t, (-(pi / 2)), pi / 2)
B: (x_{S}, sqrt(1 - x_{S}^(2)), x_{S})
C: (x_{S}, (-sqrt(1 - x_{S}^(2))), x_{S})
p = Segment(B, C)
v1, f, i, j, l = Polygon((0, 1, 0), (0, -1, 0), (0, -1, x_{S}), (0, 1, x_{S}))
q(x, y) = If[sqrt(x^(2) + y^(2)) ≤ 1 ∧ x ≥ 0, 0]
r = CurveCartesian(cos(t), sin(t), 0, t, (-(pi / 2)), pi / 2)