Elipsa - konstrukce libovolného bodu
Author: Radka Hamříková

E = (1.02, -1)
F = (7.02, -1)
o_1 = Line(E, F)
S = Midpoint(E, F)
o_2 = OrthogonalLine(S, o_1)
a_1 = 3.5 (slider from 3 to 7, step 0.1)
v = Circle(S, a_1)
A, B = Intersect(v, o_1)
M = Point(o_1)
b = Segment(A, M)
c = Segment(M, B)
i = Segment(A, M)
d = Circle(E, b)
j = Segment(M, B)
e = Circle(F, c)
I = Point(d)
u = Vector(E, I)
J = Point(e)
w = Vector(F, J)
C_1, T = Intersect(e, d)
r_1 = Vector(E, T)
r_2 = Vector(F, T)
l = Line(E, T)
m = Line(T, F)
f = Circle(E, c)
g = Circle(F, b)
G, H = Intersect(f, g)
h = Ellipse(E, F, B)
k = Circle(E, a_1)
K = Intersect(h, k, 2)
a = Vector(E, K)
D, C = Intersect(k, o_2)