b

A = (-26, 0)
B = (-26, -14)
a = Line(A, B)
C = (-16, 2)
b_2 = Line(C, a)
c = Line(A, C)
d = Line(B, c)
D = Intersect(b_2, d)
E = Point(a)
e = OrthogonalLine(E, a)
F = Intersect(b_2, e)
poly1, b, b_1, d_1, c_1 = Polygon(A, B, D, C)
h = Segment(E, F)
α = Angle(E, B, D)
base_1 = Midpoint(b)
distanceFC = Distance(F, C)
TextFC: Name[F] + (Name[C]) + " = " + distanceFC
i = Segment(D, F)
u = Vector(C, D)
v = Vector(C, F)
dirCD = UnitVector(u)
dirCF = UnitVector(v)
f = Segment(E, B)
g = Segment(A, E)
h_1 = Segment(C, F)
w = Vector(F, E)
j = UnitVector(w)
β = Angle(F, E, B)
δ = Angle(B, E, F)
G = Translate(base_1, Vector[(2 * j)])