Ellipse Construction 10
Author: M. Dabbs, R. Walcott

Drag the generator point G.

Double click picture to open independently

(a, b)

A = (1.02, 0.64)
B = (3.48, 8.44)
a = Line(A, B)
C = (5.28, 5.74)
D = (6.088, 6.428)
c = Circle(C, D)
G = Point(c)
α = 0.5585053606381855 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
d = Line(G, b)
d' = Rotate(d, α, G)
F = Intersect(a, d')
e = Circle(F, G)
f = Circle(G, F)
G_1, H = Intersect(e, f)
loc1 = Locus(G_1, G)
loc2 = Locus(H, G)
h = Line(F, g)
E = (-1.98, 6.5200000000000005)
I = (0.04, 6.5200000000000005)
i = Segment(E, I)
k = Circle(F, i)
J, K = Intersect(k, h)
j = Segment(F, K)
p = Circle(G, j)
l = Line(G, j)
L, M = Intersect(p, l)
N, O = Intersect(p, d')
q = Circle(G, M)
P = Intersect(q, d', 2)
m = Segment(G, M)
γ = Angle(M, G, P)
Q = Point(Circle[G, 3])
n = Segment(G, Q)
β = Angle(n, d')