Four solaire

f = Function(0.125 * x^(2), -5, 5)
G = Point(yAxis)
H = (0, 2)
d = Circle(H, 0.5)
a_1 = OrthogonalLine(H, yAxis)
I = (0, 3)
J, K = Intersect(d, a_1)
L = Point(f)
L' = Mirror(L, yAxis)
M = Point(yAxis)
c_1 = Ellipse(L, L', M)
N = Point(a_1)
O = Point(a_1)
P = Point(yAxis)
e = Ellipse(N, O, P)
S = (-0.24, 0.5675)
i = Segment(S, P)
T = (1.38, 1.1475)
h = Segment(T, O)
R = (-1.22, 1.1075)
b_1 = true
Q = (-1.26, 1.0875)
j = Segment(Q, N)
g(x) = 0.125 * x^(2)