Elipsa
Author: Radka Hamříková

elipsa dle definice, ohniskové vlastnosti, tečna v bodě, vrcholová a řídicí kružnice

E = (4, 5)
F = (10, 5)
o_1 = Line(E, F)
o_2 = LineBisector(E, F)
S = Intersect(o_2, o_1)
T = (9.067160000000001, 8.85086)
c = Ellipse(E, F, T)
A, B = Intersect(c, o_1)
C, D = Intersect(c, o_2)
t = Tangent(T, c)
p_1 = Line(E, T)
p_2 = Line(F, T)
k_2 = OrthogonalLine(F, t)
k_1 = OrthogonalLine(E, t)
Q = Intersect(k_1, p_2)
Q' = Intersect(k_2, p_1)
P' = Intersect(t, k_2)
P = Intersect(t, k_1)
v = Circle(S, P)
q' = Circle(E, Q')
q = Circle(F, Q)
a_1 = Segment(F, T)
b_1 = Segment(T, Q')
d = Segment(E, T)
e_1 = Segment(T, Q)
f = Segment(S, P')
g = Segment(S, P)
a_2 = Segment(A, S)
a = Segment(E, D)
e = Segment(S, E)
b = Segment(S, D)