2

3

4

5

A = (-5.896, 4.31)
p = Circle(A, 6)
B = (-2.354, 0.988)
C = (-1.826, 2.286)
c2: Vector[B, C] / Distance[B, C]^(3)
c1: UnitVector[Vector[C, A]] / Distance[C, p]^(2)
D = (-9.238533167088267, 3.8525157965571966)
c3: Vector[D, C] / Distance[D, C]^(3)
E = (-6.961525024583248, 0.7986924412165971)
c4: Vector[E, C] / Distance[E, C]^(3)
F = (-7.865946445665663, 7.402617627888404)
c5: Vector[F, C] / Distance[F, C]^(3)
b5: Vector[F, B] / Distance[F, B]^(3)
b3: Vector[D, B] / Distance[D, B]^(3)
b2: Vector[C, B] / Distance[C, B]^(3)
b4: Vector[E, B] / Distance[E, B]^(3)
b1: UnitVector[Vector[B, A]] / Distance[B, p]^(2)
n = 2 (slider from 2 to 10)
anima = 0.937 (slider from 0 to 1)
d1: UnitVector[Vector[D, A]] / Distance[D, p]^(2)
d2: Vector[C, D] / Distance[C, D]^(3)
d3: Vector[B, D] / Distance[B, D]^(3)
e1: UnitVector[Vector[E, A]] / Distance[E, p]^(2)
e2: Vector[C, E] / Distance[C, E]^(3)
e3: Vector[B, E] / Distance[B, E]^(3)
e4: Vector[D, E] / Distance[D, E]^(3)
d4: Vector[E, D] / Distance[E, D]^(3)
g = Segment(B, C)
h = Segment(C, D)
i = Segment(E, D)
j = Segment(B, D)
k = Segment(C, E)
f1: UnitVector[Vector[F, A]] / Distance[F, p]^(2)
f2: Vector[C, F] / Distance[C, F]^(3)
f3: Vector[B, F] / Distance[B, F]^(3)
f4: Vector[D, F] / Distance[D, F]^(3)
f5: Vector[E, F] / Distance[E, F]^(3)
e5: Vector[F, E] / Distance[F, E]^(3)
d5: Vector[F, D] / Distance[F, D]^(3)
f: f1 + f2 + f3 + f4 + f5
l = Segment(F, C)
m = Segment(F, D)
q = Segment(F, B)
r = Segment(E, B)
s = Segment(F, E)
d: d1 + d2 + d3 + d4 + d5
e: e1 + e2 + e3 + e4 + e5
c: c1 + c2
texto2: "" + c + ""
texto3: "" + d + ""
texto4: "" + e + ""
texto5: "" + f + ""
b: b1 + b2
texto1: "" + b + ""