x_{12}

v_1

v_2

P^v_2

P^v_1

1_C

2_C

3_F

4_F

5_A

6_A

7_D

8_D

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 = (-9.927807679041221, 14.240622410295037)
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 = (-6, -6)
C_1 = (-2, -2)
D_1 = (-3, -4)
E_1 = (1, -1)
F_1: (3, -5.5)
ordA = Ordinála(A_1, x_{12})
ordB = Ordinála(B_1, x_{12})
ordC = Ordinála(C_1, x_{12})
ordE = Ordinála(D_1, x_{12})
ordD = Ordinála(E_1, x_{12})
ordF = Ordinála(F_1, x_{12})
A_2 = Intersect(ordA, x_{12})
B_2 = Intersect(ordB, x_{12})
C_2 = Intersect(ordC, x_{12})
E_2 = Intersect(ordD, x_{12})
D_2 = Intersect(ordE, x_{12})
F_2 = Intersect(ordF, x_{12})
a_1 = Segment(A_1, B_1)
b_1 = Segment(B_1, C_1)
c_1 = Segment(C_1, A_1)
d_1 = Segment(E_1, D_1)
f_1 = Segment(D_1, F_1)
e_1 = Segment(F_1, E_1)
U_1 = (2, -10)
V_1 = (-8, -11)
ordU = Ordinála(U_1, x_{12})
ordV = Ordinála(V_1, x_{12})
ua_1 = Segment(A_1, U_1)
ub_1 = Segment(B_1, U_1)
uc_1 = Segment(C_1, U_1)
ve_1 = Segment(E_1, V_1)
vd_1 = Segment(D_1, V_1)
vf_1 = Segment(F_1, V_1)
U_2: (2, 5.5)
ua_2 = Segment(A_2, U_2)
ub_2 = Segment(B_2, U_2)
uc_2 = Segment(C_2, U_2)
V_2: (-8, 12.5)
ve_2 = Segment(E_2, V_2)
vd_2 = Segment(D_2, V_2)
vf_2 = Segment(F_2, V_2)
vv_1 = Line(U_1, V_1)
i = Point(vv_1)
ii = Point(vv_1)
v_1 = Segment(i, ii)
vv_2 = Line(U_2, V_2)
iii = Intersect(x_{12}, vv_2)
iv = Point(vv_2)
v_2 = Segment(iv, iii)
P_{v2} = Intersect(vv_2, x_{12})
ordP_v = Ordinála(P_{v2}, x_{12})
P_{v1} = Intersect(ordP_v, vv_1)
ppbb_1 = Ray(P_{v1}, B_1)
ppdd_1 = Ray(P_{v1}, D_1)
ppaa_1 = Ray(P_{v1}, A_1)
ppff_1 = Ray(P_{v1}, F_1)
ppcc_1 = Ray(P_{v1}, C_1)
ppee_1 = Ray(P_{v1}, E_1)
v = Point(ppbb_1)
vi = Point(ppdd_1)
vii = Point(ppaa_1)
viii = Point(ppff_1)
viiii = Point(ppcc_1)
viiiii = Point(ppee_1)
pb_1 = Segment(P_{v1}, v)
pd_1 = Segment(P_{v1}, vi)
pa_1 = Segment(P_{v1}, vii)
pf_1 = Segment(P_{v1}, viii)
pc_1 = Segment(P_{v1}, viiii)
pe_1 = Segment(P_{v1}, viiiii)
xiii = Point(a_1)
xiv = Point(b_1)
xi = Point(d_1)
xii = Point(e_1)
LicheE, lichaE2, lichaE3, lichaE1 = Polygon(xi, E_1, xii)
LicheB, lichaB1, lichaB2, lichaB3 = Polygon(B_1, xiii, xiv)
I_C = Intersect(d_1, pc_1)
II_C = Intersect(e_1, pc_1)
III_F = Intersect(c_1, pf_1)
IV_F = Intersect(b_1, pf_1)
V_A = Intersect(d_1, pa_1)
VI_A = Intersect(f_1, pa_1)
VII_D = Intersect(a_1, pd_1)
VIII_D = Intersect(b_1, pd_1)
V1_1 = Segment(I_C, V_1)
V2_1 = Segment(II_C, V_1)
I_1 = Intersect(V1_1, uc_1)
II_1 = Intersect(V2_1, uc_1)
U3_1 = Segment(III_F, U_1)
U4_1 = Segment(IV_F, U_1)
III_1 = Intersect(U3_1, vf_1)
IV_1 = Intersect(U4_1, vf_1)
V5_1 = Segment(V_A, V_1)
V6_1 = Segment(VI_A, V_1)
VV_1 = Intersect(V5_1, ua_1)
VI_1 = Intersect(V6_1, ua_1)
U7_1 = Segment(VII_D, U_1)
U8_1 = Segment(VIII_D, U_1)
VII_1 = Intersect(U7_1, vd_1)
VIII_1 = Intersect(U8_1, vd_1)
ord1 = Ordinála(I_1, x_{12})
I_2 = Intersect(ord1, uc_2)
ord2 = Ordinála(II_1, x_{12})
II_2 = Intersect(ord2, uc_2)
ord3 = Ordinála(III_1, x_{12})
ord4 = Ordinála(IV_1, x_{12})
III_2 = Intersect(ord3, vf_2)
VI_3 = Intersect(ord4, vf_2)
ord5 = Ordinála(VV_1, x_{12})
ord6 = Ordinála(VI_1, x_{12})
VV_2 = Intersect(ord5, ua_2)
VI_2 = Intersect(ord6, ua_2)
ord7 = Ordinála(VII_1, x_{12})
ord8 = Ordinála(VIII_1, x_{12})
VII_2 = Intersect(vd_2, ord7)
VIII_2 = Intersect(ord8, vd_2)
dvatři_1 = Segment(II_1, III_1)
třišest_1 = Segment(III_1, VI_1)
šestsedm_1 = Segment(VI_1, VII_1)
sedmpět_1 = Segment(VII_1, VV_1)
pětjedna_1 = Segment(VV_1, I_1)
jednaosm_1 = Segment(I_1, VIII_1)
osmčtyři_1 = Segment(VIII_1, IV_1)
čtyřidva_1 = Segment(IV_1, II_1)
dvatři_2 = Segment(II_2, III_2)
třišest_2 = Segment(III_2, VI_2)
šestsedm_2 = Segment(VI_2, VII_2)
sedmpět_2 = Segment(VII_2, VV_2)
pětjedna_2 = Segment(VV_2, I_2)
jednaosm_2 = Segment(I_2, VIII_2)
osmčtyři_2 = Segment(VIII_2, VI_3)
čtřidva_2 = Segment(VI_3, II_2)
vidVE_1 = Segment(E_1, V_1)
vidV3_1 = Segment(V_1, III_1)
vidV7_1 = Segment(V_1, VII_1)
vidFVU2_1 = Intersect(vf_1, uc_1)
vidFV_1 = Segment(vidFVU2_1, F_1)
vidDEC1_1 = Intersect(uc_1, d_1)
vidDE_1 = Segment(vidDEC1_1, E_1)
vidEF_1 = Segment(E_1, F_1)
vidAB_1 = Segment(A_1, B_1)
vidCA_1 = Segment(A_1, C_1)
vidC1_1 = Segment(C_1, I_1)
vidU2_1 = Segment(II_1, U_1)
vidUBV7_1 = Intersect(ub_1, vd_1)
vidUBV3_1 = Intersect(ub_1, vf_1)
vidBU_1 = Segment(B_1, vidUBV7_1)
vidUB_1 = Segment(vidUBV3_1, U_1)
vidA5_1 = Segment(A_1, VV_1)
vidVFU6_1 = Intersect(ua_1, vf_1)
vidU6_1 = Segment(vidVFU6_1, U_1)
vidAUV7_2 = Intersect(vd_2, ua_2)
vidVFU6_2 = Intersect(vf_2, ua_2)
vidUCF4_2 = Intersect(uc_2, vf_2)
vidA5_2 = Segment(A_2, vidAUV7_2)
vidU6_2 = Segment(VI_2, U_2)
vidUB_2 = Segment(B_2, U_2)
vidU2_2 = Segment(vidUCF4_2, U_2)
vidF4_2 = Segment(F_2, VI_3)
vidV3_2 = Segment(vidVFU6_2, V_2)
vidD_2 = Segment(D_2, VIII_2)
vidV7_2 = Segment(VII_2, V_2)
nevidVE_2 = Segment(E_2, V_2)

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

cc = OrthogonalLine(C_1, x_{12})