b

a

A=\dfrac{b·a}{2}

K = (2.4723593028834987, -7.8479487977944595)
L = (10.827595773310415, -7.8479487977944125)
M = (4.788309710464519, -5.531998390213381)
polígono4, m, k_1, l_1 = Polygon(K, L, M)
n = Line(M, m)
p = OrthogonalLine(L, n)
q = OrthogonalLine(K, n)
N = Intersect(n, q)
O = Intersect(n, p)
r = OrthogonalLine(M, m)
P = Intersect(r, m)
polígono5, l_2, m_1, p_1 = Polygon(M, P, L)
β = 0 rad (slider from 0 to 180*°, step 0.017453292519943295)
Q = Midpoint(M, L)
R = Midpoint(M, K)
polígono6, p_2, m_2, k_2 = Polygon(M, K, P)
M' = Rotate(M, β, R)
K' = Rotate(K, β, R)
P' = Rotate(P, β, R)
polígono6', p', m', k' = Polygon(M', K', P')
M'_1 = Rotate(M, -β, Q)
P'_1 = Rotate(P, -β, Q)
L' = Rotate(L, -β, Q)
polígono5', l', m'_1, p'_1 = Polygon(M'_1, P'_1, L')