L

L

l

l

l

l

Ver

P \; = \;  {\fgcolor{00ff00} {L}} \; + \;  {\fgcolor{ff0000} {l}}  \; +\;   \;  {\fgcolor{00ff00} {L}}
 \; \; + \;  {\fgcolor{ff0000} {l}}

P \; = \;  {\fgcolor{00ff00} {2 \; L}} \; + \;  {\fgcolor{ff0000} {2 \; l}}  

P \; = \; 2 \;  ( {\fgcolor{00ff00} { L}} \; + \;  {\fgcolor{ff0000} { l}} \;  ) 

Longitud = 3.3 (slider from 2 to 5, step 0.1)
A = (-0.9893904761904777, 1.0280380952380954)
c = Circle(A, Longitud)
B = Point(c)
C = Mirror(B, A)
b = Segment(B, C)
d = OrthogonalLine(B, b)
e = OrthogonalLine(C, b)
Anchura = 3.6 (slider from 0.5 to 5, step 0.1)
g = Circle(B, Anchura)
D, E = Intersect(g, d)
h = Line(D, b)
F = Intersect(h, e)
poly1, b_1, d_1, f_1, c_1 = Polygon(B, D, F, C)
t = 0 (slider from 0 to 1.57, step 0.0010)
B' = Rotate(B, -(t), F)
D' = Rotate(D, -(t), F)
F' = Rotate(F, -(t), F)
C' = Rotate(C, -(t), F)
poly1', b', d', f', c' = Polygon(B', D', F', C')
B'' = Rotate(B', -(t), C')
D'' = Rotate(D', -(t), C')
F'' = Rotate(F', -(t), C')
C'' = Rotate(C', -(t), C')
poly1'', b'', d'', f'', c'' = Polygon(B'', D'', F'', C'')
B''' = Rotate(B'', -(t), B'')
D''' = Rotate(D'', -(t), B'')
F''' = Rotate(F'', -(t), B'')
C''' = Rotate(C'', -(t), B'')
poly1''', b''', d''', f''', c''' = Polygon(B''', D''', F''', C''')
G = Midpoint(d_1)
H = Midpoint(f')
I = Midpoint(c'')
J = Midpoint(b''')
K = Midpoint(B, D)
L = Midpoint(C, F)