t = 21 (slider from 0 to 100, step 1)
A = (-3, 5)
B = (3, 5)
C = (3, -5)
D = (-3, -5)
Vieleck1, a, b, c, d = Polygon(A, B, C, D)
E = (-0.09221986226079126, 2.6952669461555034)
F = (1.3588244997201304, 2.5058775013993486)
G = Point(yAxis)
H = Intersect(xAxis, yAxis)
I = Point(yAxis)
J = (1.5, 3)
K = Point(xAxis)
L = (1.5, -3)
g = Circle(G, J)
h = Circle(H, K)
k = Circle(I, L)
M = Point(g)
N = Point(h)
q = Circle(H, N)
O = Point(k)
r = Circle(I, O)
A1 = Mod(t, 4)
m = If(A1 ≟ 0, true, If[A1 ≟ 1, true, false])
n = If(A1 ≟ 1, true, If[A1 ≟ 3, true, false])
p = If(A1 ≟ 2, true, false)
P = Point(g)
e = Circle(G, P)