hauteur du four =

convexité

directiontgte = 30 (slider from 10 to 30, step 0.1)
hauteurbezier = 35 (slider from 15 to 45, step 1)
p = 0.34 (slider from 0 to 1, step 0.01)
rayonfour = 30 (slider from 10 to 45, step 1)
A: (-(rayonfour), 0.0)
D = Mirror(A, yAxis)
B: (-(directiontgte), hauteurbezier)
C = Mirror(B, yAxis)
dome = CurveCartesian(((1.0 - v)^(3.0) * (1.0 - p) * x(A) + 3.0 * (1.0 - v)^(2.0) * v * p * x(B) + 3.0 * (1.0 - v) * v^(2.0) * p * x(C) + v^(3.0) * (1.0 - p) * x(D)) / ((1.0 - v)^(3.0) * (1.0 - p) + 3.0 * (1.0 - v)^(2.0) * v * p + 3.0 * (1.0 - v) * v^(2.0) * p + v^(3.0) * (1.0 - p)), ((1.0 - v)^(3.0) * (1.0 - p) * y(A) + 3.0 * (1.0 - v)^(2.0) * v * p * y(B) + 3.0 * (1.0 - v) * v^(2.0) * p * y(C) + v^(3.0) * (1.0 - p) * y(D)) / ((1.0 - v)^(3.0) * (1.0 - p) + 3.0 * (1.0 - v)^(2.0) * v * p + 3.0 * (1.0 - v) * v^(2.0) * p + v^(3.0) * (1.0 - p)), v, 0.0, 1.0)
hauteurfour: y(dome(0.5))
texte2: hauteurfour + ""
f: sqrt(x(A)^(2.0) - hauteurfour^(2.0))
F: (-(f), 0.0)
F' = Mirror(F, yAxis)
S: (0.0, hauteurfour)
formeellipse = Ellipse(F, F', S)
u = Vector(A, B)