Redresser le vase

f = Function(((-0.00417) * x^(2)) + (0.5 * x), 0, 120)
O = (0, 0)
A = (120, 0)
B = (60, 30)
a = Tangent(O, f)
g = Function((0.0125 * x^(2)) - (3.5 * x) + 240, 120, 160)
b = Tangent(A, f)
C = (140, -10)
D = (160, 0)
e = Tangent(D, g)
c = Segment(O, B)
d = Segment(B, C)
h = Segment(C, D)
f_1 = Mirror(f, i)
g_1 = Mirror(g, i)
O' = Mirror(O, i)
A' = Mirror(A, i)
D' = Mirror(D, i)
k = Segment(O, O')
l = Segment(D, D')
f_2 = Mirror(f, j)
C' = Mirror(C, j)
g_2 = Mirror(g, j)
D'_1 = Mirror(D, j)
D'' = Mirror(D', j)
l' = Segment(D'_1, D'')
m = Mirror(g_1, j)
n = Mirror(f_1, j)
O'_1 = Mirror(O, j)
O'' = Mirror(O', j)
k' = Segment(O'_1, O'')
o = false
p(y) = y > 180