x_{12}

D_1=D_2

v_2

v_1

P^v_2

P^v_1

1_D

2_D

3_C

4_C

5_E

6_E

7_F

8_F

1

2

3

4

5

6

7

8

1

2

3

4

5

6

7

8

x_{12} = Line((0, 0), (1, 0))
O: (0, 0)
roh1 = (-12.616238605557264, 12.648788309068433)
roh2 = Point(Circle[roh1, 21])
roh4 = Point(Circle[roh1, 29.7])
roh3 = Point(Circle[roh4, 21])
ct1, ramH, ramP, ramD, ramL = Polygon(roh1, roh2, roh3, roh4)
A_1 = (-8, -1)
B_1: (-4, -7.5)
C_1: (-1, -2.5)
A'_1: (-1, -8)
AA'_1 = Vector(A_1, A'_1)
B'_1 = Translate(B_1, AA'_1)
C'_1 = Translate(C_1, AA'_1)
a_1 = Segment(A_1, B_1)
b_1 = Segment(B_1, C_1)
c_1 = Segment(C_1, A_1)
aa'_1 = Segment(A_1, A'_1)
bb'_1 = Segment(B_1, B'_1)
cc'_1 = Segment(C_1, C'_1)
a'_1 = Segment(A'_1, B'_1)
b'_1 = Segment(B'_1, C'_1)
c'_1 = Segment(C'_1, A'_1)
ordA = Ordinála(A_1, x_{12})
ordB = Ordinála(B_1, x_{12})
ordC = Ordinála(C_1, x_{12})
ordA' = Ordinála(A'_1, x_{12})
A_2 = Intersect(ordA, x_{12})
B_2 = Intersect(x_{12}, ordB)
C_2 = Intersect(x_{12}, ordC)
A'_2: (-1, 9)
AA'_2 = Vector(A_2, A'_2)
B'_2 = Translate(B_2, AA'_2)
C'_2 = Translate(C_2, AA'_2)
aa'_2 = Segment(A_2, A'_2)
bb'_2 = Segment(B_2, B'_2)
cc'_2 = Segment(C_2, C'_2)
ac'_2 = Segment(C'_2, A'_2)
E_1 = (-2, -5)
F_1 = (6, -6)
V_1 = (-5, -13)
D_1: (2, 0)
DD'_1 = Vector(D_1, V_1)
ordD = Ordinála(D_1, x_{12})
ordE = Ordinála(E_1, x_{12})
ordF = Ordinála(F_1, x_{12})
ordD' = Ordinála(V_1, x_{12})
E_2 = Intersect(ordE, x_{12})
F_2 = Intersect(ordF, x_{12})
D_2 = Intersect(ordD, x_{12})
V_2 = (-5, 9)
DD'_2 = Vector(D_2, V_2)
dd'_2 = Segment(D_2, V_2)
d_1 = Segment(D_1, E_1)
e_1 = Segment(E_1, F_1)
f_1 = Segment(F_1, D_1)
dd'_1 = Segment(D_1, V_1)
ff'_1 = Segment(F_1, V_1)
ee'_1 = Segment(E_1, V_1)
ee'_2 = Segment(E_2, V_2)
ff'_2 = Segment(F_2, V_2)
vv_2 = Line(V_2, aa'_2)
i = Intersect(x_{12}, vv_2)
ii = Point(vv_2)
v_2 = Segment(i, ii)
vv_1 = Line(V_1, aa'_1)
iii = Point(vv_1)
iv = Point(vv_1)
v_1 = Segment(iii, iv)
P_{v2} = Intersect(x_{12}, vv_2)
ordP_v = Ordinála(P_{v2}, x_{12})
P_{v1} = Intersect(ordP_v, vv_1)
pp_A = Ray(P_{v1}, A_1)
pp_D = Ray(P_{v1}, D_1)
pp_C = Ray(P_{v1}, C_1)
pp_E = Ray(P_{v1}, E_1)
pp_F = Ray(P_{v1}, F_1)
pp_B = Ray(P_{v1}, B_1)
vi = Point(pp_A)
vii = Point(pp_C)
viii = Point(pp_E)
viiii = Point(pp_F)
viiiii = Point(pp_B)
p_A = Segment(P_{v1}, vi)
p_D = Segment(P_{v1}, D_1)
p_C = Segment(P_{v1}, vii)
p_E = Segment(P_{v1}, viii)
p_F = Segment(P_{v1}, viiii)
p_B = Segment(P_{v1}, viiiii)
lichaA1 = Point(a_1)
lichaA2 = Point(c_1)
lichaB1 = Point(a_1)
lichaB2 = Point(b_1)
LichaA, LichaA3, LichaA2, LichaA1 = Polygon(lichaA1, A_1, lichaA2)
LichaB, LichaB3, LichaB2, LichaB1 = Polygon(lichaB1, B_1, lichaB2)
I_D = Intersect(a_1, pp_D)
II_D = Intersect(c_1, pp_D)
III_C = Intersect(d_1, pp_C)
IV_C = Intersect(f_1, pp_C)
V_E = Intersect(a_1, pp_E)
VI_E = Intersect(b_1, pp_E)
VII_F = Intersect(pp_F, a_1)
VIII_F = Intersect(b_1, pp_F)
I_D' = Translate(I_D, AA'_1)
II_D' = Translate(II_D, AA'_1)
jedna = Segment(I_D, I_D')
dva = Segment(II_D, II_D')
I_1 = Intersect(jedna, dd'_1)
II_1 = Intersect(dva, dd'_1)
f = Segment(III_C, V_1)
g = Segment(IV_C, V_1)
III_1 = Intersect(f, cc'_1)
IV_1 = Intersect(g, cc'_1)
V_E' = Translate(V_E, AA'_1)
VI_E' = Translate(VI_E, AA'_1)
VII_F' = Translate(VII_F, AA'_1)
VIII_F' = Translate(VIII_F, AA'_1)
pět = Segment(V_E, V_E')
šest = Segment(VI_E, VI_E')
VV_1 = Intersect(pět, ee'_1)
VI_1 = Intersect(ee'_1, šest)
sedm = Segment(VII_F, VII_F')
osm = Segment(VIII_F, VIII_F')
VII_1 = Intersect(sedm, ff'_1)
VIII_1 = Intersect(osm, ff'_1)
jednapět_1 = Segment(I_1, VV_1)
pětsedm_1 = Segment(VV_1, VII_1)
sedmjedna_1 = Segment(VII_1, I_1)
dvatři_1 = Segment(II_1, III_1)
třišest_1 = Segment(III_1, VI_1)
šestosm_1 = Segment(VI_1, VIII_1)
osmčtyři_1 = Segment(VIII_1, IV_1)
čtyřidva_1 = Segment(IV_1, II_1)
ord1 = Ordinála(I_1, x_{12})
I_2 = Intersect(dd'_2, ord1)
ord2 = Ordinála(II_1, x_{12})
II_2 = Intersect(ord2, dd'_2)
ord3 = Ordinála(III_1, x_{12})
III_2 = Intersect(ord3, cc'_2)
ord4 = Ordinála(IV_1, x_{12})
IV_2 = Intersect(ord4, cc'_2)
ord5 = Ordinála(VV_1, x_{12})
VV_2 = Intersect(ord5, ee'_2)
ord6 = Ordinála(VI_1, x_{12})
VI_2 = Intersect(ord6, ee'_2)
ord7 = Ordinála(VII_1, x_{12})
ord8 = Ordinála(VIII_1, x_{12})
VII_2 = Intersect(ord7, ff'_2)
VIII_2 = Intersect(ord8, ff'_2)
jednapět_2 = Segment(I_2, VV_2)
pětsedm_2 = Segment(VV_2, VII_2)
sedmjedna_2 = Segment(VII_2, I_2)
osmčtyři_2 = Segment(VIII_2, IV_2)
čtyřidva_2 = Segment(IV_2, II_2)
dvatři_2 = Segment(II_2, III_2)
třišest_2 = Segment(III_2, VI_2)
šestosm_2 = Segment(VI_2, VIII_2)
vidV5_1 = Segment(VV_1, V_1)
vidV1_1 = Segment(I_1, V_1)
vidV7_1 = Segment(VII_1, V_1)
vidD2_1 = Segment(II_1, D_1)
vidC'4_1 = Segment(IV_1, C'_1)
vidC3_1 = Segment(III_1, C_1)
vidCA_1 = Segment(C_1, A_1)
vidAB_1 = Segment(A_1, B_1)
vidV5BB'_1 = Intersect(bb'_1, ee'_1)
vidB'B_1 = Segment(B_1, vidV5BB'_1)
vidV7BB'_1 = Intersect(bb'_1, ff'_1)
vidBB'_1 = Segment(vidV7BB'_1, B'_1)
vidAA'_1 = Segment(A_1, A'_1)
vidA'B'_1 = Segment(A'_1, B'_1)
vidB'C'_1 = Segment(B'_1, C'_1)
vidC'A'_1 = Segment(C'_1, A'_1)
vidC3DE_1 = Intersect(d_1, cc'_1)
vidF8CC'_1 = Intersect(ff'_1, cc'_1)
vidDE_1 = Segment(D_1, vidC3DE_1)
vidFD_1 = Segment(D_1, F_1)
vidF8_1 = Segment(F_1, vidF8CC'_1)
vidV5AA'_2 = Intersect(aa'_2, ee'_2)
vidV7AA'_2 = Intersect(ff'_2, aa'_2)
vidF8CC'_2 = Intersect(cc'_2, ff'_2)
vidV5_2 = Segment(V_2, VV_2)
vidV7_2 = Segment(V_2, VII_2)
vidE6_2 = Segment(VI_2, E_2)
vidF8_2 = Segment(VIII_2, F_2)
vidA'A_2 = Segment(A'_2, vidV7AA'_2)
vidAA'_2 = Segment(vidV5AA'_2, A_2)
vidBB'_2 = Segment(B'_2, B_2)
vidCC'_2 = Segment(C'_2, vidF8CC'_2)
vidA'C'_2 = Segment(A'_2, C'_2)

Tool: Ordinála
Input: C_1, x_{12}
Output: cc

cc = OrthogonalLine(C_1, x_{12})