T459

A = (-2, -1)
p = 4.16 (slider from 0 to 8, step 0.01)
c = Circle(A, p)
eq1: (x + 3)^(2) + (y - 2)^(2) = 1
B = Center(eq1)
piirto1: PolyLine[(-2.0401E0,-9.9698E-1), (-2.0401E0,-9.5336E-1), (-2.0401E0,-9.0975E-1), (-2.0619E0,-8.5522E-1), (-2.0728E0,-8.0070E-1), (-2.0946E0,-7.4618E-1), (-2.1110E0,-6.8620E-1), (-2.1491E0,-6.3713E-1), (-2.1818E0,-5.4989E-1), (-2.1927E0,-4.9537E-1), (-2.2255E0,-4.1904E-1), (-2.2582E0,-3.0999E-1), (-2.2909E0,-2.3911E-1), (-2.3236E0,-1.7368E-1), (-2.3454E0,-1.1371E-1), (-2.3890E0,-3.7375E-2), (-2.4217E0,2.8053E-2), (-2.4654E0,1.1529E-1), (-2.4981E0,1.8072E-1), (-2.5199E0,2.3524E-1), (-2.5417E0,2.9522E-1), (-2.5853E0,3.9881E-1), (-2.6017E0,4.6969E-1), (-2.6289E0,5.1876E-1), (-2.6344E0,5.7874E-1), (-2.6507E0,6.4962E-1), (-2.6507E0,6.9324E-1), (-2.6616E0,7.3685E-1), (-2.6671E0,7.9683E-1), (-2.6835E0,8.5681E-1), (-2.6835E0,9.0042E-1), (-2.6944E0,9.4404E-1), (-2.7053E0,9.8766E-1), (-2.7107E0,1.0476E0), (-2.7380E0,1.1512E0), (-2.7489E0,1.2276E0), (-2.7543E0,1.2875E0), (-2.7652E0,1.3639E0), (-2.7761E0,1.4402E0), (-2.7925E0,1.4893E0), (-2.7925E0,1.5329E0), (-2.8143E0,1.5874E0), (-2.8579E0,1.7183E0), (-2.8797E0,1.7892E0), (-2.9125E0,1.8600E0), (-2.9397E0,1.9146E0), (-2.9779E0,1.9582E0), (�,�), true]
piirto2: PolyLine[(-3.0106E0,2.0127E0), (-3.0160E0,2.0727E0), (-3.0433E0,2.1217E0), (-3.0706E0,2.1981E0), (-3.0978E0,2.2526E0), (-3.1196E0,2.3071E0), (-3.1414E0,2.3725E0), (-3.1524E0,2.4162E0), (-3.1633E0,2.4761E0), (-3.1905E0,2.5416E0), (-3.2232E0,2.6070E0), (-3.2505E0,2.6724E0), (-3.2832E0,2.7433E0), (-3.2941E0,2.7869E0), (-3.3268E0,2.8414E0), (-3.3377E0,2.8851E0), (�,�), (-3.0542E0,2.6343E0), (-3.0433E0,2.5797E0), (-3.0379E0,2.4980E0), (-3.0324E0,2.4271E0), (-3.0324E0,2.4816E0), (-3.0160E0,2.5688E0), (-2.9561E0,2.5906E0), (-2.9125E0,2.5906E0), (�,�), (-2.9452E0,2.4598E0), (-2.9015E0,2.4598E0), (-2.8797E0,2.4271E0), (-2.8797E0,2.3616E0), (-2.8797E0,2.2962E0), (�,�), (-2.9888E0,2.0127E0), (-2.9452E0,2.0127E0), (-2.8797E0,1.9909E0), (-2.8198E0,1.9582E0), (-2.7707E0,1.9037E0), (-2.7380E0,1.8600E0), (-2.6889E0,1.7892E0), (-2.6507E0,1.7292E0), (-2.6289E0,1.6856E0), (-2.6126E0,1.6256E0), (-2.6071E0,1.5656E0), (-2.6071E0,1.5111E0), (-2.5962E0,1.3148E0), (-2.5962E0,1.2167E0), (-2.5853E0,1.1621E0), (-2.5744E0,1.1185E0), (-2.5635E0,1.0585E0), (-2.5362E0,9.9311E-1), (-2.4981E0,9.2769E-1), (-2.4272E0,8.6226E-1), (-2.3509E0,8.1864E-1), (-2.2909E0,8.0228E-1), (-2.2473E0,8.0228E-1), (-2.2036E0,8.0228E-1), (-2.2473E0,8.1319E-1), (-2.3209E0,7.8865E-1), (-2.3345E0,7.1504E-1), (-2.3345E0,6.7143E-1), (-2.3127E0,6.1145E-1), (-2.2909E0,5.5148E-1), (-2.2691E0,5.0786E-1), (-2.2364E0,4.5333E-1), (-2.2146E0,3.9336E-1), (-2.1927E0,3.4429E-1), (-2.1600E0,3.0067E-1), (-2.1382E0,2.3524E-1), (-2.1055E0,1.4800E-1), (-2.0510E0,6.2435E-3), (-2.0074E0,-8.0994E-2), (-1.9856E0,-1.3552E-1), (-1.9637E0,-1.9004E-1), (-1.9528E0,-2.5547E-1), (-1.9310E0,-3.4270E-1), (-1.9092E0,-4.2994E-1), (-1.9092E0,-4.7356E-1), (-1.8983E0,-5.1718E-1), (-1.8983E0,-5.6080E-1), (-1.8983E0,-6.0442E-1), (-1.9092E0,-6.4803E-1), (-1.9201E0,-6.9165E-1), (-1.9201E0,-7.3527E-1), (-1.9256E0,-7.9525E-1), (-1.9528E0,-8.4432E-1), (-1.9637E0,-7.7889E-1), (-1.9201E0,-6.9165E-1), (�,�), (-1.8547E0,8.0228E-1), (-1.8874E0,8.1319E-1), (-1.9310E0,8.1319E-1), (-1.9910E0,8.0228E-1), (-2.0401E0,7.4231E-1), (-2.0619E0,6.9324E-1), (-2.0619E0,6.4962E-1), (-2.0510E0,5.8964E-1), (-1.9910E0,5.3512E-1), (-1.9201E0,5.4602E-1), (-1.8820E0,6.1145E-1), (-1.8656E0,6.9324E-1), (-1.8492E0,7.6412E-1), (-1.8438E0,9.2223E-1), (-1.8438E0,1.0204E0), (-1.8547E0,1.0749E0), (-1.8765E0,1.1185E0), (-1.9038E0,1.1785E0), (-1.9092E0,1.0749E0), (-1.9092E0,9.7676E-1), (-1.8983E0,9.1133E-1), (-1.8874E0,8.4590E-1), (-1.8874E0,8.0228E-1), (-1.8765E0,7.4776E-1), (-1.8656E0,6.7143E-1), (-1.8383E0,6.1145E-1), (-1.8656E0,6.0600E-1), (�,�), true]