résolution géométrique de l'équation
                  $x^3+ax=b$
par Omar Khayyam

intersection d'une conique avec un cercle

a = 5 (slider from 0 to 20, step 1)
b = 18 (slider from 0 to 20, step 1)
c: y = x^(2) / sqrt(a)
x (x - b / a) - y² = 0: (x * (x - b / a)) + y^(2) = 0
A, B = Intersect(c, x (x - b / a) - y² = 0)
f = Line(A, yAxis)
g = Line(A, yAxis)
C = Intersect(g, xAxis)
h = Line(A, xAxis)
D = Intersect(h, yAxis)
q1, b_1, c_1, a_1, d = Polygon(B, C, A, D)
texte3: "x=" + (LaTeX[b_1]) + ""
E = Intersect(b = a, b = -4)
texte2: "exemple : $x^3+" + (LaTeX[a]) + " \times x=" + (LaTeX[b]) + "$"