p = 10.6 (slider from -10 to 15)
A: (-3, 2)
B: (7, 2)
C: (12, p)
k1, c, a, b = Polygon(A, B, C)
piirto1: PolyLine[(7.8213E0,3.1886E0), (7.7263E0,3.2203E0), (7.5521E0,3.2678E0), (6.9661E0,3.2836E0), (6.6968E0,3.2678E0), (6.5068E0,3.1886E0), (6.3167E0,3.0936E0), (6.1425E0,2.9510E0), (6.0000E0,2.7926E0), (5.8574E0,2.6026E0), (5.7624E0,2.4125E0), (5.6832E0,2.2225E0), (5.6040E0,2.0799E0), (�,�), (9.6269E0,3.8221E0), (9.5952E0,3.6954E0), (9.5952E0,3.5687E0), (9.5952E0,3.4420E0), (9.5477E0,3.1727E0), (9.5319E0,2.9352E0), (9.4685E0,2.7768E0), (9.4685E0,2.6184E0), (9.4368E0,2.4917E0), (9.4051E0,2.3650E0), (9.3893E0,2.1591E0), (9.3418E0,2.0166E0), (9.3418E0,2.2383E0), (9.3418E0,2.4284E0), (9.3735E0,2.6184E0), (9.4843E0,2.7610E0), (9.6269E0,2.5709E0), (9.6902E0,2.3650E0), (9.7694E0,2.1908E0), (9.8645E0,2.0324E0), (9.9912E0,2.1908E0), (1.0102E1,2.3333E0), (�,�), (1.0292E1,2.7768E0), (1.0292E1,2.6501E0), (1.0292E1,2.4600E0), (1.0308E1,2.2858E0), (1.0403E1,2.1274E0), (1.0577E1,2.2383E0), (1.0736E1,2.3808E0), (1.0878E1,2.5709E0), (1.0957E1,2.7134E0), (1.0989E1,2.5867E0), (1.1021E1,2.4600E0), (1.1036E1,2.2541E0), (1.1179E1,2.2383E0), (�,�), (1.1654E1,2.6184E0), (1.1654E1,2.4917E0), (1.1654E1,2.2066E0), (1.1654E1,2.2700E0), (�,�), (1.1781E1,3.0302E0), (1.1781E1,3.0302E0), (�,�), (1.2098E1,2.8401E0), (1.2098E1,2.7134E0), (1.2098E1,2.0799E0), (1.2113E1,1.7156E0), (1.2161E1,1.5731E0), (1.2161E1,1.7315E0), (1.2208E1,1.9374E0), (1.2256E1,2.0799E0), (1.2256E1,2.2066E0), (1.2288E1,2.4284E0), (1.2319E1,2.5867E0), (1.2383E1,2.7451E0), (1.2430E1,2.9193E0), (1.2438E1,2.7372E0), (1.2224E1,2.6818E0), (�,�), (1.2953E1,2.7451E0), (1.2953E1,2.6184E0), (1.2921E1,2.5234E0), (1.2858E1,2.2700E0), (1.2826E1,2.0166E0), (1.2826E1,1.7948E0), (1.2826E1,1.8899E0), (1.2921E1,2.0799E0), (�,�), (1.3143E1,2.9668E0), (1.3317E1,2.9035E0), (1.3476E1,2.7610E0), (1.3460E1,2.5392E0), (1.3254E1,2.5075E0), (1.3111E1,2.5551E0), (�,�), (1.3745E1,2.7768E0), (1.3713E1,2.6818E0), (1.3761E1,2.5234E0), (1.3982E1,2.6501E0), (1.4125E1,2.7451E0), (1.4125E1,2.5551E0), (1.4125E1,2.3650E0), (1.4267E1,2.4759E0), (1.4378E1,2.6184E0), (�,�), (1.5012E1,3.7271E0), (1.5012E1,3.6004E0), (1.4996E1,3.4262E0), (1.4948E1,3.2836E0), (1.4933E1,3.1094E0), (1.4885E1,2.8718E0), (1.4853E1,2.7451E0), (1.4853E1,2.4917E0), (1.4853E1,2.2700E0), (1.5075E1,2.3650E0), (1.5234E1,2.4600E0), (1.5408E1,2.5392E0), (1.5249E1,2.4917E0), (1.5075E1,2.3096E0), (1.5234E1,2.2700E0), (1.5424E1,2.3333E0), (1.5614E1,2.3650E0), (�,�), (1.6025E1,2.3650E0), (1.6025E1,2.3650E0), (�,�), (9.8803E0,9.5555E0), (9.9120E0,9.3813E0), (1.0134E1,9.1120E0), (1.0308E1,8.9061E0), (1.0482E1,8.7953E0), (1.0641E1,8.7002E0), (1.0799E1,8.6685E0), (1.1036E1,8.5894E0), (1.1290E1,8.5577E0), (1.1432E1,8.5102E0), (�,�), true]