trig-004-complementarios
Author: Epsiclas - Alberto Rodríguez Santos

Punto de α

β

α+β=180°

β

radio: 3
C = (-8.367163645404938, 0.5687085433046275)
b = Line(C, xAxis)
B = (-0.4, -0.42)
c = Circle(C, radio)
E = Intersect(c, b, 1)
F = Intersect(c, b, 2)
e = Segment(E, F)
I = Intersect(c, e, 2)
P = Point(c)
α = Angle(I, C, P)
β: 180° - α
senbeta: sin(β)
cosbeta: cos(β)
r = Distance(C, B)
sena: sin(α)
a = Line(C, yAxis)
C_{1} = Intersect(c, a, 2)
D = Intersect(c, a, 1)
d = Segment(C_{1}, D)
f = Segment(C, P)
g = Line(P, d)
h = Line(P, e)
G = Intersect(g, e)
J = Intersect(h, d)
coseno = Segment(J, P)
seno = Segment(P, G)
cosa: cos(α)
k = Distance(C, B)
texto1: "$ \alpha=" + (LaTeX[α]) + " $"
beta: 90 - α
t: 180 - α / °
j = Distance(C, B)
C' = (-2.1064500659705754, 0.5687085433046298)
p = Circle(C', radio)
s = Line(C', d)
f_1 = Line(C', e)
A, L = Intersect(p, s)
M, N = Intersect(p, f_1)
g_1 = Segment(A, L)
h_1 = Segment(M, N)
N' = Rotate(N, β, C')
i = Line(N', g_1)
l = Line(N', h_1)
H = Intersect(g_1, l)
K = Intersect(h_1, i)
m = Segment(H, N')
n = Segment(N', K)
δ = Angle(N', C', N)
q = Segment(C', N')
texto3: "β =180°-\alpha=" + (LaTeX[t]) + "°"
ε = Angle(N, C', N')
texto4: "sen(\alpha)=sen(\beta)=" + (LaTeX[sena]) + ""
texto5: " cos(\alpha)=-cos(\beta)=" + (LaTeX[cosa]) + " "