ComplexevlakPool
Author: egs

argument Z_1

Modulus Z_1

Z_3=Z_1 \cdot Z_2

i = (0, 1)
O = (0, 0)
e_x = (1, 0)
r = 2 (slider from -5 to 5, step 0.1)
arg = 0.5585053606381855 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
z: r * (cos(arg) e_x + sin(arg) i)
Z_1: r * (cos(arg) e_x + sin(arg) i)
afstandOZ = Distance(O, Z_1)
TekstOZ: "|" + (Name[Z_1]) + "| \, = \, " + afstandOZ
Z' = Rotate(Z_1, -arg, O)
arg_1 = Angle(Z', O, Z_1)
Z_2 = (-0.5, 1)
z_2 = Vector(O, Z_2)
arg_2 = Angle(e_x, z_2)
Z_3: Length[z] Length[z_2] * (cos(arg_1 + arg_2) e_x + sin(arg_1 + arg_2) i)
z_3 = Vector(O, Z_3)
afstandZ2O = Distance(Z_2, O)
TekstZ2O: "|" + (Name[Z_2]) + "| \, = \, " + afstandZ2O
afstandZ3O = Distance(Z_3, O)
TekstZ3O: "|" + (Name[Z_3]) + "| \, = \, " + afstandOZ + "\cdot" + afstandZ2O + "\, = \," + afstandZ3O
arg_3 = Angle(e_x, z_3)