Author: JNT

Figura 2: Elementos secundários. Alturas e ortocentro.

A

C

B

Ortocentro

A = (1.56, 3.3)
B = (0.68, -0.64)
C = (7.5, 0.24)
polígono1, c, a, b = Polygon(A, B, C)
α = Angle(B, A, C)
β = Angle(A, C, B)
γ = Angle(C, B, A)
d = OrthogonalLine(A, a)
f = OrthogonalLine(B, b)
g = OrthogonalLine(C, c)
e = Line(B, C)
h = Line(A, C)
i = Line(B, A)
j = OrthogonalLine(B, h)
D = Intersect(h, j)
k = Segment(B, D)
l = OrthogonalLine(C, i)
E = Intersect(i, l)
m = Segment(E, C)
n = OrthogonalLine(A, e)
F = Intersect(e, n)
p = Segment(A, F)
G = Intersect(f, n)