eq1: x^(2) + y^(2) = 1
A = Point(eq1)
B = Intersect(xAxis, yAxis)
C = Intersect(eq1, xAxis, 2)
α = Angle(C, B, A)
f = Ray(B, A)
A': (x(A), (-y(A)))
g = Ray(B, A')
β = Angle(A', B, C)
piirto1: PolyLine[(1.4699E0,8.5381E-1), (1.4530E0,8.5381E-1), (1.4023E0,8.5381E-1), (1.3685E0,8.5381E-1), (1.3304E0,8.4959E-1), (1.2966E0,8.3691E-1), (1.2618E0,8.1578E-1), (1.2438E0,7.7353E-1), (1.2417E0,7.1649E-1), (1.2512E0,6.7107E-1), (1.2723E0,6.2353E-1), (1.3008E0,5.7917E-1), (1.3178E0,5.5804E-1), (1.3431E0,5.3691E-1), (1.3727E0,5.2001E-1), (1.4022E0,4.9888E-1), (1.4276E0,4.9466E-1), (1.4508E0,4.8410E-1), (1.4952E0,4.7776E-1), (1.5501E0,4.6931E-1), (1.6304E0,4.6931E-1), (1.6727E0,4.6931E-1), (1.6980E0,4.7353E-1), (1.7213E0,4.7565E-1), (1.7572E0,4.9043E-1), (1.7889E0,5.0734E-1), (1.8142E0,5.2635E-1), (1.8396E0,5.6121E-1), (1.8459E0,6.1296E-1), (1.8333E0,6.5734E-1), (1.8036E0,6.9642E-1), (1.7635E0,7.2916E-1), (1.7424E0,7.4607E-1), (1.7065E0,7.5662E-1), (1.6727E0,7.6930E-1), (1.6389E0,7.8198E-1), (1.6008E0,7.9466E-1), (1.5629E0,7.9888E-1), (1.5248E0,8.0733E-1), (1.4952E0,8.1156E-1), (1.4615E0,8.1790E-1), (1.4361E0,8.2001E-1), (1.4234E0,8.2423E-1), (�,�), (1.7149E0,-4.3914E-1), (1.6980E0,-4.3914E-1), (1.6642E0,-4.3914E-1), (1.6199E0,-4.4125E-1), (1.6008E0,-4.4759E-1), (1.5755E0,-4.4759E-1), (1.5459E0,-4.5181E-1), (1.5079E0,-4.6449E-1), (1.4868E0,-4.7294E-1), (1.4635E0,-4.8773E-1), (1.4403E0,-5.1308E-1), (1.4097E0,-5.5428E-1), (1.3917E0,-6.0286E-1), (1.3927E0,-6.4512E-1), (1.4107E0,-6.8843E-1), (1.4297E0,-7.1801E-1), (1.4508E0,-7.4336E-1), (1.4783E0,-7.6449E-1), (1.5037E0,-7.7294E-1), (1.5248E0,-7.8139E-1), (1.5480E0,-7.9195E-1), (1.5713E0,-7.9406E-1), (1.5966E0,-7.9829E-1), (1.6262E0,-8.1096E-1), (1.6601E0,-8.2364E-1), (1.6938E0,-8.2786E-1), (1.7319E0,-8.2364E-1), (1.7635E0,-8.1308E-1), (1.7931E0,-7.9406E-1), (1.8142E0,-7.7082E-1), (1.8375E0,-7.3491E-1), (1.8639E0,-7.0216E-1), (1.8861E0,-6.4935E-1), (1.8966E0,-6.0604E-1), (1.8914E0,-5.5428E-1), (1.8649E0,-5.1942E-1), (1.8459E0,-4.9829E-1), (1.8227E0,-4.8561E-1), (1.8037E0,-4.6871E-1), (1.7825E0,-4.6026E-1), (1.7593E0,-4.5181E-1), (1.7318E0,-4.3914E-1), (1.7149E0,-4.3491E-1), (�,�), true]
A'': ((-x(A)), y(A))
h = Ray(B, A'')
γ = Angle(C, B, A'')
piirto2: PolyLine[(1.2499E0,8.6373E-1), (1.2411E0,8.6668E-1), (1.2205E0,8.7258E-1), (1.1969E0,8.7552E-1), (1.1261E0,8.7552E-1), (1.0952E0,8.7405E-1), (1.0790E0,8.6963E-1), (1.0672E0,8.6373E-1), (1.0510E0,8.6226E-1), (1.0333E0,8.5489E-1), (1.0156E0,8.4162E-1), (1.0053E0,8.2394E-1), (1.0023E0,8.0772E-1), (9.9643E-1,7.9004E-1), (9.9348E-1,7.6940E-1), (9.9348E-1,7.5466E-1), (9.9348E-1,7.3697E-1), (9.9938E-1,7.2223E-1), (1.0097E0,7.0602E-1), (1.0406E0,6.8096E-1), (1.0642E0,6.6328E-1), (1.0790E0,6.6328E-1), (1.0937E0,6.5443E-1), (1.1114E0,6.5149E-1), (1.1261E0,6.5149E-1), (1.1409E0,6.4854E-1), (1.1527E0,6.4559E-1), (1.2146E0,6.4559E-1), (1.2470E0,6.4559E-1), (1.2676E0,6.4854E-1), (1.2824E0,6.5149E-1), (1.2942E0,6.5738E-1), (1.3060E0,6.6328E-1), (1.3177E0,6.7212E-1), (1.3325E0,6.8686E-1), (1.3443E0,7.0602E-1), (1.3472E0,7.2223E-1), (1.3575E0,7.4140E-1), (1.3590E0,7.8119E-1), (1.3590E0,8.0183E-1), (1.3502E0,8.1804E-1), (1.3340E0,8.3720E-1), (1.3207E0,8.4605E-1), (1.3030E0,8.5489E-1), (1.2883E0,8.6078E-1), (1.2721E0,8.6668E-1), (1.2558E0,8.6963E-1), (1.2367E0,8.7405E-1), (1.2175E0,8.7552E-1), (1.2057E0,8.7552E-1), (�,�), (-1.8272E-1,9.2269E-1), (-1.9451E-1,9.2269E-1), (-2.5052E-1,9.2269E-1), (-2.7853E-1,9.2122E-1), (-2.9474E-1,9.1385E-1), (-3.0653E-1,9.0795E-1), (-3.1980E-1,8.9174E-1), (-3.2864E-1,8.7405E-1), (-3.3307E-1,8.5489E-1), (-3.3601E-1,8.4015E-1), (-3.3601E-1,8.2246E-1), (-3.3601E-1,8.0772E-1), (-3.3307E-1,7.8709E-1), (-3.2422E-1,7.7235E-1), (-3.1096E-1,7.5319E-1), (-3.0064E-1,7.3992E-1), (-2.9179E-1,7.2813E-1), (-2.7263E-1,7.1486E-1), (-2.5347E-1,7.0455E-1), (-2.2105E-1,6.9276E-1), (-1.9746E-1,6.8391E-1), (-1.8567E-1,6.8096E-1), (-1.6504E-1,6.7802E-1), (-1.4440E-1,6.7507E-1), (-6.1860E-2,6.7507E-1), (-2.9434E-2,6.7507E-1), (-1.4694E-2,6.7802E-1), (-2.9028E-3,6.7802E-1), (2.0680E-2,6.8391E-1), (3.8367E-2,6.9718E-1), (5.3107E-2,7.0749E-1), (6.1950E-2,7.2371E-1), (7.2268E-2,7.4140E-1), (7.6690E-2,7.5761E-1), (7.6690E-2,7.7824E-1), (7.6690E-2,7.9888E-1), (6.7846E-2,8.1509E-1), (6.1950E-2,8.2836E-1), (4.7211E-2,8.4310E-1), (3.0998E-2,8.5636E-1), (1.0363E-2,8.7110E-1), (-7.3247E-3,8.7995E-1), (-2.5012E-2,8.8732E-1), (-4.1225E-2,8.9321E-1), (-5.3017E-2,8.9911E-1), (-6.7756E-2,9.0500E-1), (-8.8391E-2,9.1090E-1), (-1.0903E-1,9.1385E-1), (-1.2082E-1,9.1974E-1), (-1.3556E-1,9.2564E-1), (-1.5324E-1,9.2859E-1), (-1.6504E-1,9.2859E-1), (-1.7388E-1,9.3153E-1), (�,�), true]
piirto3: PolyLine[(7.3701E-1,7.4877E-1), (7.5175E-1,7.4877E-1), (7.6355E-1,7.4877E-1), (7.7828E-1,7.5171E-1), (7.9302E-1,7.5171E-1), (8.0482E-1,7.5466E-1), (8.2398E-1,7.5613E-1), (8.4019E-1,7.6056E-1), (8.5935E-1,7.6203E-1), (8.7262E-1,7.6645E-1), (8.8736E-1,7.6940E-1), (9.2568E-1,7.6940E-1), (9.4926E-1,7.6940E-1), (9.6548E-1,7.6498E-1), (9.7874E-1,7.5761E-1), (9.8758E-1,7.5171E-1), (�,�), (-6.1017E-1,7.9298E-1), (-5.9543E-1,7.9298E-1), (-5.8069E-1,7.9298E-1), (-5.7184E-1,7.9593E-1), (-4.2740E-1,7.9593E-1), (-3.5960E-1,7.9593E-1), (-3.3601E-1,7.9593E-1), (�,�), true]
piirto4: PolyLine[(-5.8658E-1,1.0347E0), (-5.8658E-1,1.0229E0), (-5.8658E-1,1.0023E0), (-5.8658E-1,9.8165E-1), (-5.8363E-1,9.6691E-1), (-5.8069E-1,9.5512E-1), (-5.8069E-1,9.4333E-1), (-5.8069E-1,9.3153E-1), (-5.7774E-1,9.1679E-1), (-5.7184E-1,8.9911E-1), (-5.7184E-1,8.8142E-1), (-5.7184E-1,8.6373E-1), (-5.8363E-1,8.7552E-1), (-5.9543E-1,8.8142E-1), (-6.1164E-1,8.9469E-1), (-6.0132E-1,8.9026E-1), (-5.8658E-1,8.8142E-1), (-5.6742E-1,8.6815E-1), (-5.5416E-1,8.6078E-1), (-5.4531E-1,8.7258E-1), (-5.2173E-1,8.9616E-1), (-5.0404E-1,9.1385E-1), (-4.9078E-1,9.2859E-1), (-4.8341E-1,9.4038E-1), (-4.9520E-1,9.3153E-1), (-5.0994E-1,9.2269E-1), (-5.2615E-1,9.0942E-1), (-5.3942E-1,8.9911E-1), (-5.4826E-1,8.9321E-1), (�,�), true]