z_1∙z_2

Polardarstellung

z_1 = (1.5564898444010735, -0.7832457396570479)
z_2 = (-0.404288507920093, 1.9260006116155486)
u = Vector(z_1)
v = Vector(z_2)
z_3: (z_1 * z_2)
w = Vector(z_3)
ang_1 = If(Mod[Angle[z_1], 15°] ≟ 0, If[Angle[z_1] ≟ 180°, "", FractionText[Angle[z_1] / (180°)]], "" + (Angle[z_1] / (180°)))
ang_2 = If(Mod[Angle[z_2], 15°] ≟ 0, If[Angle[z_2] ≟ 180°, "", FractionText[Angle[z_2] / (180°)]], "" + (Angle[z_2] / (180°)))
ang_3 = If(Mod[Angle[z_3], 15°] ≟ 0, If[Angle[z_3] ≟ 180°, "", FractionText[Angle[z_3] / (180°)]], "" + (Angle[z_3] / (180°)))
abs_1: abs(z_1)
abs_2: abs(z_2)
abs_3: abs(z_3)
polar_{1,2}: "\textcolor{#0000ff}{ z_1 = " + (LaTeX[abs_1]) + " \;e^{ " + (LaTeX[ang_1]) + "πj} } \\
\textcolor{#ff0000}{ z_2 = " + (LaTeX[abs_2]) + " \;e^{ " + (LaTeX[ang_2]) + "πj} }"
polar_3: "z_1 \cdot z_2 = " + (LaTeX[abs_3]) + " \;e^{" + (LaTeX[ang_3]) + "πj}"
im_1 = If(imaginary(z_1) ≠ 0, If[abs(imaginary(z_1)) ≠ 1, (abs(imaginary(z_1)) * "j"), "j"], "")
im_2 = If(imaginary(z_2) ≠ 0, If[abs(imaginary(z_2)) ≠ 1, (abs(imaginary(z_2)) * "j"), "j"], "")
im_3 = If(imaginary(z_3) ≠ 0, If[abs(imaginary(z_3)) ≠ 1, (abs(imaginary(z_3)) * "j"), "j"], "")
re_1 = If(real(z_1) ≟ 0, "", ("" * real(z_1)))
re_2 = If(real(z_2) ≟ 0, "", ("" * real(z_2)))
re_3 = If(real(z_3) ≟ 0, "", ("" * real(z_3)))
plus_1 = If(imaginary(z_1) < 0, "-", If[imaginary(z_1) ≟ 0, "", If[real(z_1) ≟ 0, "", "+"]])
plus_2 = If(imaginary(z_2) < 0, "-", If[imaginary(z_2) ≟ 0, "", If[real(z_2) ≟ 0, "", "+"]])
plus_3 = If(imaginary(z_3) < 0, "-", If[imaginary(z_3) ≟ 0, "", If[real(z_3) ≟ 0, "", "+"]])
zero_1 = If(real(z_1) ≟ 0 ∧ imaginary(z_1) ≟ 0, "0", "")
zero_2 = If(real(z_2) ≟ 0 ∧ imaginary(z_2) ≟ 0, "0", "")
zero_3 = If(real(z_3) ≟ 0 ∧ imaginary(z_3) ≟ 0, "0", "")
cart_{1,2}: "\textcolor{#0000ff}{ z_1 = " + (LaTeX[zero_1]) + "" + (LaTeX[re_1]) + "" + (LaTeX[plus_1]) + "" + (LaTeX[im_1]) + " } \\
\textcolor{#ff0000}{ z_2 = " + (LaTeX[zero_2]) + "" + (LaTeX[re_2]) + "" + (LaTeX[plus_2]) + "" + (LaTeX[im_2]) + " }
\hline"
cart_3: "z_1 \cdot z_2 = " + (LaTeX[zero_3]) + "" + (LaTeX[re_3]) + "" + (LaTeX[plus_3]) + "" + (LaTeX[im_3]) + ""
L_1 = Sequence(Circle[(0, 0), i], i, 1, 10)
a = false
P: (10, 0)
N: (0, 0)
beta2 = Angle(z_2, N, P)
beta1 = Angle(P, N, z_2)
alpha1 = Angle(P, N, z_1)
alpha2 = Angle(z_1, N, P)
gamma1 = Angle(P, N, z_3)