d

=\frac{d}{2}

\varepsilon

\varepsilon

\varepsilon

\varepsilon

d = 2 (slider from 0 to 5, step 0.2)
A_0: (d, 0)
eps: d / 2
v: eps / 2
D_0: (d + v, v)
f(x, y) = (25 * (x - y) / (x + y)^(3))
k(x, y) = (2 / 5 * f(x, y))
D'': (d + v, 2 + v + k(d, eps))
A'': (d, 2 + k(d, 0))
Ep_1: (d, 0, 0)
Ep_3: (d + eps, eps, 0)
Ep_2: (d + eps, 0, 0)
Ep_4: (d, eps, 0)
FE: (d + eps, eps, f(d + eps, eps))
a, A, B, C, Fläche1, Fläche4, Fläche2, Fläche3, Fläche5, FlächeABCFE, Kante4, Kante1, Kante2, Kante5, Kante6, Kante7, Kante3, Kante8, KanteAFE, KanteAB, KanteBC, KanteCFE = Prism(Ep_3, Ep_2, Ep_1, Ep_4, FE)
D = Intersect(xAxis, yAxis)
g = Line(D, Ep_4)
A': (d, 2)
B': (d + eps, 2)
D': (d + v, 2 + v)
C': (d + eps + v, 2 + v)
v1, e, f_1, g_1, h = Polygon(A', B', C', D')
C'': (d + eps + v, 2 + v + k(d + eps, eps))
v2, l, m, n, p = Polygon(A', D', D'', A'')
B'': (d + eps, 2 + k(d + eps, 0))
v3, i, c', c'', j = Polygon(D', C', C'', D'')
B_0: (d + eps, 0)
C_0: (d + eps + v, v)
v4, q, d'', a'', b'' = Polygon(C'', D'', A'', B'')
v5, b', r, s, t = Polygon(B', B'', C'', C')
E = (1.939405727181735, -2.147156556997745)
F = (3.1918185732466515, -2.147156556997745)
Text2: "Prisma=" + a + ""