A = (-2, 2)
z = (3, -1)
z1: conjugate(z)
w: z + A
s: z * A
O = Intersect(xAxis, yAxis)
z_v = Vector(O, z)
A_v = Vector(O, A)
a = Vector(A, w)
c = 4 (slider from -5 to 5, step 0.1)
u, v = ComplexRoot(x^(2) + c)
text2: "" + (Name[w]) + "=" + (Name[z]) + "+" + (Name[A]) + "=\left(  " + (LaTeX[z]) + " \right) +\left(  " + (LaTeX[A]) + " \right) =" + (LaTeX[w]) + ""
text1: "" + (Name[s]) + "=\," + (Name[z]) + "·" + (Name[A]) + "=\;\left(   " + (LaTeX[z]) + "\right)·\;\left(  " + (LaTeX[A]) + " \right) =  " + (LaTeX[s]) + ""