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

Drag the generator point G.

Double click to open independently

A = (1.4000000000000001, 1.48)
B = (0.18, -1.32)
c = Circle(A, B)
C = Point(c)
a_1 = Ray(A, C)
G = Point(c)
b = Segment(A, G)
F = Intersect(c, a_1, 1.0)
E = Midpoint(A, G)
d = Circle(E, G)
f = OrthogonalLine(G, a_1)
G_1, H = Intersect(d, f)
e = Segment(E, H)
H'_1 = Rotate(H, 119.99999999999999°, E)
H'' = Rotate(H'_1, 119.99999999999999°, E)
g = Segment(E, H'_1)
h = Segment(E, H'')
loc1 = Locus(H, G)
a = 2.6 (slider from -5 to 5, step 0.05)
H' = Dilate(H, a, E)
loc2 = Locus(H', G)
i = Segment(E, H')