Hola, 
me llamo Marco...

O = (2.069297040715767, 1.4906545933155555)
P = (3.997375007901793, 1.4709803283442695)
Q = (3.072684554251352, 1.923488422683847)
p = Ellipse(O, P, Q)
S = Point(p)
T = Point(p)
R = (3.46196, 0.20146)
i = Segment(R, S)
j = Segment(R, T)
A = (2.06, -0.88)
a = OrthogonalLine(A, yAxis)
c = OrthogonalLine(A, a)
B = Point(c)
C = Point(a)
b = OrthogonalLine(B, c)
d = OrthogonalLine(C, a)
D = Intersect(d, b)
e = Segment(B, A)
f = Segment(A, C)
g = Segment(C, D)
h = Segment(D, B)