Mongeovka, řezy hranatých těles

$C_1$

$D_1$

$E_1$

$F_1$

$A_1$

$B_1$

$O_{1,2}$

$x_{1,2}$

Ok

$V_1$

$V_2$

$F_2$

$A_2$

$E_2$

$B_2$

$D_2$

$C_2$

$\bar{A_2}$

$\bar{A_1}$

$\bar{B_1}$

$\bar{C_1}$

$\bar{D_1}$

$\bar{E_1}$

$\bar{F_1}$

$\bar{B_2}$

$\bar{F_2}$

$\bar{C_2}$

$\bar{E_2}$

$\bar{D_2}$

$n_2^\rho$

$p_1^\rho$

C1 = (-4.569280883365511, -5.1928731896864795)
D1 = (-3.562391766199255, -2.6908229562947974)
E1 = (-5.225786271278107, -0.567806285338893)
F1 = (-7.896069893523214, -0.9468398477746685)
A1 = (-8.902959010689472, -3.4488900811663523)
B1 = (-7.23956450561062, -5.571906752122256)
n = 6 (slider from 3 to 6, step 1)
Nep1 = Point(xAxis)
O12 = Point(xAxis)
x12 = Line(Nep1, O12)
y1 = OrthogonalLine(O12, x12)
AB1 = Segment(A1, B1)
vycet = First("A, B, C, D, E, F", (3 * n) - 2)
AF1 = Segment(A1, F1)
EF1 = Segment(F1, E1)
DE1 = Segment(E1, D1)
CD1 = Segment(D1, C1)
BC1 = Segment(C1, B1)
mnohoúhelník1, f, g, h, i, j, k, C1p, D1p, E1p, F1p = Polygon(A1, B1, n)
viditelne = First({A1, B1, C1, D1, E1, F1}, n)
AE1 = Segment(A1, E1)
AD1 = Segment(A1, D1)
AC1 = Segment(A1, C1)
V1 = (-1.2425895794052872, -10.146241641089102)
l = OrthogonalLine(V1, x12)
m = OrthogonalLine(D1, x12)
p = OrthogonalLine(C1, x12)
q = OrthogonalLine(E1, x12)
r = OrthogonalLine(F1, x12)
s = OrthogonalLine(A1, x12)
t = OrthogonalLine(B1, x12)
V2 = Point(l)
F2 = Intersect(x12, r)
A2 = Intersect(x12, s)
E2 = Intersect(x12, q)
B2 = Intersect(x12, t)
D2 = Intersect(x12, m)
C2 = Intersect(x12, p)
CV2 = Segment(V2, C2)
DV2 = Segment(D2, V2)
BV2 = Segment(V2, B2)
EV2 = Segment(E2, V2)
AV2 = Segment(V2, A2)
FV2 = Segment(F2, V2)
CV1 = Segment(V1, C1)
DV1 = Segment(D1, V1)
BV1 = Segment(V1, B1)
AV1 = Segment(A1, V1)
EV1 = Segment(E1, V1)
FV1 = Segment(V1, F1)
I = Point(y1)
J = Point(y1)
K = Point(x12)
p1p = Line(K, J)
n2p = Line(I, K)
q_1 = Line(F1, A1)
r_1 = Line(E1, A1)
s_1 = Line(D1, A1)
t_1 = Line(C1, A1)
a_1 = Line(B1, A1)
L = Intersect(p1p, s_1)
M = Intersect(p1p, r_1)
N = Intersect(p1p, q_1)
O = Intersect(p1p, a_1)
P = Intersect(p1p, t_1)
k_1 = Line(V1, A1)
Q = Intersect(p1p, k_1)
R = Intersect(x12, k_1)
b_1 = OrthogonalLine(Q, x12)
c_1 = OrthogonalLine(R, x12)
S = Intersect(n2p, c_1)
T = Intersect(x12, b_1)
d_1 = Line(S, T)
e_1 = Line(A2, V2)
AA2 = Intersect(d_1, e_1)
f_2 = OrthogonalLine(AA2, x12)
AA1 = Intersect(f_2, AV1)
g_2 = Line(P, AA1)
h_2 = Line(O, AA1)
i_2 = Line(N, AA1)
j_2 = Line(M, AA1)
k_2 = Line(L, AA1)
BB1 = Intersect(h_2, BV1)
CC1 = Intersect(g_2, CV1)
DD1 = Intersect(k_2, DV1)
EE1 = Intersect(j_2, EV1)
FF1 = Intersect(i_2, FV1)
l_2 = OrthogonalLine(BB1, x12)
m_2 = OrthogonalLine(FF1, x12)
n_2 = OrthogonalLine(CC1, x12)
p_2 = OrthogonalLine(EE1, x12)
q_2 = OrthogonalLine(DD1, x12)
BB2 = Intersect(l_2, BV2)
FF2 = Intersect(m_2, FV2)
CC2 = Intersect(n_2, CV2)
EE2 = Intersect(p_2, EV2)
DD2 = Intersect(q_2, DV2)
text1: "Přichytit body " + vycet + " k pravidelnému"
text2: " " + n + "-úhelníku zadanému body A, B."
BBCC1 = Segment(BB1, CC1)
CCDD1 = Segment(CC1, DD1)
DDEE1 = Segment(DD1, EE1)
EEFF1 = Segment(EE1, FF1)
AAFF1 = Segment(FF1, AA1)
AABB1 = Segment(AA1, BB1)
AABB2 = Segment(AA2, BB2)
BBCC2 = Segment(BB2, CC2)
CCDD2 = Segment(CC2, DD2)
DDEE2 = Segment(DD2, EE2)
EEFF2 = Segment(EE2, FF2)
AAFF2 = Segment(FF2, AA2)
AADD1 = Segment(AA1, DD1)
AAEE1 = Segment(EE1, AA1)
AACC1 = Segment(AA1, CC1)
AACC2 = Segment(AA2, CC2)
AADD2 = Segment(DD2, AA2)
AAEE2 = Segment(AA2, EE2)
n2 = Ray(K, I)
p1 = Ray(K, J)