T112d

A = (2.7196333081347333, -1.360811920591073)
B = (8.44912082811386, -0.48029394351478916)
G = Rotate(B, 29°, A)
α = Angle(B, A, G)
k1, b', a, b = Polygon(A, B, G)
D = Point(k1)
f = Line(D, b')
E = Point(f)
β = Angle(E, D, A)
γ = Angle(G, B, A)
A' = Rotate(A, -73°, B)
δ = Angle(A', B, A)
g = Ray(B, A')
C = Intersect(g, b)
k2, f_1, a_1, b_1 = Polygon(A, B, C)
piirto1: PolyLine[(4.9741E0,4.0320E-1), (5.0234E0,3.9872E-1), (5.0638E0,3.7630E-1), (5.1131E0,3.4492E-1), (5.1579E0,3.0009E-1), (5.1669E0,2.3733E-1), (5.1893E0,1.9698E-1), (�,�), (5.2610E0,4.6596E-1), (5.2924E0,5.0182E-1), (5.3462E0,5.2872E-1), (5.3955E0,5.3769E-1), (5.4403E0,5.2424E-1), (5.4403E0,4.5251E-1), (5.4269E0,4.0320E-1), (5.4896E0,3.8975E-1), (5.5479E0,3.8527E-1), (5.5838E0,3.8527E-1), (5.6107E0,3.9423E-1), (�,�), (5.7541E0,5.0182E-1), (5.7183E0,5.0182E-1), (5.6734E0,5.1079E-1), (5.6376E0,5.1976E-1), (5.5927E0,5.3321E-1), (5.6062E0,5.8252E-1), (5.6600E0,6.0493E-1), (5.7183E0,5.9597E-1), (5.7272E0,5.0182E-1), (5.7272E0,4.3010E-1), (5.7183E0,3.9423E-1), (�,�), (5.8707E0,6.9011E-1), (5.8438E0,6.8114E-1), (5.8259E0,6.5425E-1), (5.8528E0,6.3631E-1), (5.8617E0,6.6321E-1), (�,�), true]
piirto2: PolyLine[(7.7984E0,8.1563E-1), (7.7446E0,8.1115E-1), (7.6818E0,7.7977E-1), (7.6235E0,7.4839E-1), (7.5742E0,6.9459E-1), (7.5563E0,6.4528E-1), (7.5563E0,6.0942E-1), (�,�), (7.1976E0,9.1426E-1), (7.2828E0,9.4564E-1), (7.3501E0,9.6805E-1), (7.3680E0,9.3219E-1), (7.3635E0,8.7391E-1), (7.3590E0,8.1563E-1), (7.3501E0,7.7977E-1), (7.3411E0,7.4390E-1), (7.3411E0,7.0804E-1), (7.3142E0,7.1701E-1), (�,�), (7.3142E0,8.4253E-1), (7.3590E0,8.6046E-1), (7.3859E0,8.6943E-1), (7.4308E0,8.6943E-1), (7.4666E0,8.8736E-1), (�,�), (7.4846E0,1.0039E0), (7.5204E0,1.0039E0), (7.5787E0,9.9943E-1), (7.5428E0,9.5909E-1), (7.5025E0,9.4116E-1), (7.5025E0,8.9184E-1), (7.5339E0,8.3805E-1), (7.5428E0,7.8425E-1), (7.4577E0,7.7080E-1), (7.3949E0,7.7080E-1), (�,�), (7.6639E0,1.1115E0), (7.6370E0,1.0846E0), (7.6280E0,1.0577E0), (7.6459E0,1.0218E0), (7.6728E0,1.0129E0), (7.7087E0,1.0129E0), (7.7266E0,1.0398E0), (7.6997E0,1.0667E0), (7.6728E0,1.0846E0), (�,�), true]
piirto3: PolyLine[(3.2347E0,-9.6859E-1), (3.2795E0,-9.6859E-1), (3.3378E0,-9.8204E-1), (3.3871E0,-1.0134E0), (3.4364E0,-1.0538E0), (3.4723E0,-1.1076E0), (3.4947E0,-1.1479E0), (3.5037E0,-1.1927E0), (3.5216E0,-1.2376E0), (�,�), (3.5664E0,-8.6100E-1), (3.6202E0,-8.6100E-1), (3.6920E0,-8.6100E-1), (3.7682E0,-8.6996E-1), (3.7771E0,-9.2824E-1), (3.7458E0,-9.8204E-1), (3.7502E0,-1.0358E0), (3.8085E0,-1.0403E0), (3.8758E0,-1.0358E0), (3.9251E0,-1.0314E0), (3.9520E0,-1.0224E0), (�,�), (4.1672E0,-7.8030E-1), (4.1403E0,-7.9824E-1), (4.1044E0,-7.9824E-1), (4.0685E0,-7.9824E-1), (4.0327E0,-7.8927E-1), (3.9834E0,-7.6686E-1), (3.9475E0,-7.2203E-1), (4.0058E0,-7.0858E-1), (4.0596E0,-7.3547E-1), (4.0865E0,-7.7134E-1), (4.1134E0,-8.0720E-1), (4.1313E0,-8.4307E-1), (4.1403E0,-8.7893E-1), (4.1403E0,-9.6859E-1), (4.1403E0,-1.0314E0), (4.1492E0,-9.7756E-1), (4.1672E0,-9.2376E-1), (�,�), (4.2837E0,-5.6512E-1), (4.2658E0,-5.9202E-1), (4.2792E0,-6.4133E-1), (4.3420E0,-6.5030E-1), (4.3734E0,-6.1892E-1), (4.3510E0,-5.6960E-1), (4.3106E0,-5.5616E-1), (4.2747E0,-5.5616E-1), (�,�), true]
piirto4: PolyLine[(9.3046E0,9.5012E-1), (9.3405E0,9.6805E-1), (9.3853E0,1.0039E0), (9.4750E0,1.0756E0), (9.5288E0,1.1205E0), (9.5647E0,1.1563E0), (9.6184E0,1.2146E0), (9.6498E0,1.2863E0), (9.6678E0,1.3670E0), (9.6722E0,1.4522E0), (9.6633E0,1.4970E0), (9.6184E0,1.4746E0), (9.5915E0,1.4074E0), (9.5826E0,1.3715E0), (9.5647E0,1.3357E0), (9.5557E0,1.2908E0), (9.5557E0,1.1563E0), (9.5557E0,1.0756E0), (9.5826E0,1.0398E0), (9.6005E0,1.0039E0), (9.6364E0,9.5909E-1), (9.6722E0,9.0529E-1), (�,�), (9.4750E0,1.2908E0), (9.5198E0,1.2908E0), (9.6812E0,1.2908E0), (9.7798E0,1.2908E0), (�,�), (6.1217E0,-1.7217E0), (6.1486E0,-1.7038E0), (6.2024E0,-1.6679E0), (6.2473E0,-1.6231E0), (6.3324E0,-1.5648E0), (6.3817E0,-1.5334E0), (6.4086E0,-1.4976E0), (6.4535E0,-1.4707E0), (6.4983E0,-1.4527E0), (6.5431E0,-1.4079E0), (6.5969E0,-1.3631E0), (6.6418E0,-1.3272E0), (6.7023E0,-1.2869E0), (6.7225E0,-1.3541E0), (6.7583E0,-1.5514E0), (6.7807E0,-1.6634E0), (6.7942E0,-1.7128E0), (6.8031E0,-1.7710E0), (6.8390E0,-1.8114E0), (6.8569E0,-1.8383E0), (�,�), (6.4893E0,-1.5334E0), (6.5252E0,-1.5334E0), (6.5611E0,-1.5334E0), (6.6328E0,-1.5334E0), (6.7673E0,-1.5424E0), (6.8480E0,-1.5424E0), (�,�), (7.0094E0,-1.3452E0), (7.0094E0,-1.3990E0), (7.0094E0,-1.7128E0), (7.0094E0,-1.7935E0), (7.0183E0,-1.8293E0), (7.0363E0,-1.8741E0), (7.0632E0,-1.8383E0), (7.0721E0,-1.8114E0), (�,�), (7.0094E0,-1.3541E0), (7.0407E0,-1.3227E0), (7.0990E0,-1.3183E0), (7.1483E0,-1.3227E0), (7.2156E0,-1.3362E0), (7.2783E0,-1.3452E0), (7.3545E0,-1.3698E0), (7.3187E0,-1.4169E0), (7.2649E0,-1.4483E0), (7.2918E0,-1.5200E0), (7.3501E0,-1.5693E0), (7.4128E0,-1.6410E0), (7.4487E0,-1.6948E0), (7.4487E0,-1.7307E0), (7.4039E0,-1.7755E0), (7.3411E0,-1.7979E0), (7.2873E0,-1.8024E0), (7.2156E0,-1.7979E0), (7.1707E0,-1.7755E0), (7.1349E0,-1.7755E0), (�,�), (7.7356E0,-1.0851E0), (7.7356E0,-1.1210E0), (7.7356E0,-1.1569E0), (7.7356E0,-1.2107E0), (7.6997E0,-1.4438E0), (7.6818E0,-1.5783E0), (7.6818E0,-1.6679E0), (7.6728E0,-1.9638E0), (7.6728E0,-2.0535E0), (7.6908E0,-2.0176E0), (7.6997E0,-1.9548E0), (7.7087E0,-1.9190E0), (�,�), (7.9239E0,-1.1748E0), (7.9239E0,-1.2196E0), (7.9239E0,-1.6231E0), (7.9239E0,-1.7486E0), (7.9329E0,-1.8204E0), (7.9418E0,-1.8921E0), (7.9642E0,-1.9773E0), (7.9687E0,-2.0266E0), (7.9777E0,-2.0535E0), (�,�), (8.1749E0,-1.6590E0), (8.2287E0,-1.6366E0), (8.2780E0,-1.5962E0), (8.3229E0,-1.5379E0), (8.3543E0,-1.4707E0), (8.3632E0,-1.4348E0), (8.3655E0,-1.3788E0), (8.3274E0,-1.4169E0), (8.2870E0,-1.4841E0), (8.2646E0,-1.5424E0), (8.2556E0,-1.5783E0), (8.2556E0,-1.6679E0), (8.2556E0,-1.7307E0), (8.2646E0,-1.7666E0), (8.2825E0,-1.8114E0), (8.3229E0,-1.8607E0), (8.3453E0,-1.8204E0), (8.3543E0,-1.7935E0), (�,�), (8.2287E0,-1.4617E0), (8.2556E0,-1.4707E0), (8.2825E0,-1.4796E0), (8.3274E0,-1.4886E0), (8.3632E0,-1.5065E0), (8.4080E0,-1.5065E0), (8.4439E0,-1.5065E0), (�,�), true]
piirto5: PolyLine[(6.7493E0,1.7302E0), (6.7897E0,1.7077E0), (6.8435E0,1.6719E0), (6.8928E0,1.6405E0), (6.9287E0,1.6315E0), (6.9869E0,1.6091E0), (7.0363E0,1.6046E0), (7.0721E0,1.5957E0), (7.1887E0,1.5957E0), (7.2604E0,1.5957E0), (7.3052E0,1.6136E0), (7.3590E0,1.6360E0), (7.3949E0,1.6584E0), (7.4128E0,1.6853E0), (�,�), (6.9825E0,1.4163E0), (6.9600E0,1.3760E0), (6.8838E0,1.3222E0), (6.8166E0,1.2774E0), (6.7538E0,1.2774E0), (6.7090E0,1.3222E0), (6.6956E0,1.3626E0), (6.7090E0,1.4074E0), (6.7673E0,1.4163E0), (6.8121E0,1.3984E0), (6.8794E0,1.3626E0), (6.9197E0,1.3357E0), (6.9645E0,1.2908E0), (7.0094E0,1.2639E0), (7.0363E0,1.2460E0), (�,�), true]
piirto6: PolyLine[(4.1761E0,1.7929E0), (4.1851E0,1.7660E0), (4.1851E0,1.7302E0), (4.1761E0,1.6943E0), (4.1537E0,1.6450E0), (4.1313E0,1.6046E0), (4.0954E0,1.5598E0), (4.0372E0,1.5150E0), (3.9968E0,1.5150E0), (3.9520E0,1.5598E0), (3.9116E0,1.6181E0), (3.9071E0,1.6943E0), (3.9340E0,1.7302E0), (3.9968E0,1.7033E0), (4.0596E0,1.6764E0), (4.1044E0,1.6405E0), (4.1492E0,1.5957E0), (4.1851E0,1.5688E0), (4.2299E0,1.5419E0), (�,�), (4.3554E0,1.8019E0), (4.3823E0,1.8109E0), (4.4182E0,1.8109E0), (4.4541E0,1.8109E0), (4.4810E0,1.8198E0), (�,�), (4.4003E0,1.7302E0), (4.4361E0,1.7302E0), (4.5706E0,1.7302E0), (4.6424E0,1.7302E0), (�,�), true]
piirto7: PolyLine[(4.7589E0,2.0529E0), (4.8172E0,2.0664E0), (4.8755E0,2.0798E0), (4.9248E0,2.0843E0), (4.9741E0,2.0888E0), (4.9741E0,2.0529E0), (4.9562E0,1.9991E0), (4.9517E0,1.9140E0), (4.9293E0,1.8557E0), (4.9203E0,1.8019E0), (4.9203E0,1.7571E0), (4.9113E0,1.7302E0), (�,�), (4.8844E0,1.9184E0), (4.9203E0,1.9274E0), (4.9741E0,1.9364E0), (5.0100E0,1.9364E0), (5.0458E0,1.9453E0), (5.0817E0,1.9543E0), (�,�), (5.2072E0,1.9364E0), (5.2341E0,1.9543E0), (5.2700E0,1.9902E0), (5.3103E0,2.0395E0), (5.3417E0,2.0888E0), (5.3686E0,2.1336E0), (5.3955E0,2.1919E0), (5.4000E0,2.2636E0), (5.3507E0,2.2771E0), (5.3058E0,2.2771E0), (5.2565E0,2.2547E0), (5.2162E0,2.2322E0), (5.1713E0,2.1919E0), (5.1310E0,2.1381E0), (5.1265E0,2.0798E0), (5.1624E0,2.0350E0), (5.2072E0,1.9812E0), (5.2565E0,1.9409E0), (5.2924E0,1.8871E0), (5.3148E0,1.8467E0), (5.3013E0,1.8019E0), (5.2296E0,1.7884E0), (5.1848E0,1.8064E0), (5.1803E0,1.8557E0), (5.1803E0,1.8915E0), (5.1893E0,1.9184E0), (�,�), (5.5479E0,2.3040E0), (5.5031E0,2.2905E0), (5.4403E0,2.2547E0), (5.4089E0,2.2009E0), (5.4269E0,2.1560E0), (5.4807E0,2.1695E0), (5.5345E0,2.2098E0), (5.5569E0,2.2502E0), (5.5479E0,2.2771E0), (�,�), true]