<content> <p>Utilities</p> </content>

35762231-1db5-476c-849c-3e084b2a256b 22 4 5 false false false 0 3 decimal

&[DATE] &[TIME] - &[FILENAME]

X dp showPolar v mat(: n 0 : 12 mat w X str2num n n 1 + : r w abs dp var2str : θ w Im w Re atan deg / dp var2str : v v r,∠, θ,°, concat : 41 line for S: X concat = S: v n num2str,4) concat 13 mat 31 line :

dp decimal_places ≡

α 0.5 - 3 sqrt 2 / i * + : 0.5 - 0.866 i * +

j i :

Z.1 0.1 j * :

Z.2 0.1 j * :

Z.0 1 j * :

I.1 1.0 Z.1 Z.2 + Z.0 + / : 0.833 i * -

I.2 I.1 :

I.0 I.1 :

V.1 1.0 I.1 Z.1 * - : 0.9167

V.2 I.2 Z.2 * - : 0.0833 -

V.0 I.0 Z.0 * - : 0.8333 -

A 1111 α 2^α 1 α α 2^33 mat :

V.abc A V.0 V.1 V.2 31 mat * : 0 1.25 - 0.866 i * - 1.25 - 0.866 i * + 31 mat

V.0 V.2 V.1 I.0 I.2 I.1 Z.2 Z.1 α showPolar V.abc A V.0 V.2 V.1 I.0 I.2 I.1 Z.2 Z.1 α showPolar V.0 V.2 V.1 I.0 I.2 I.1 Z.2 Z.1 α

round_complex(z, tol) := if(|Im(z)| < tol, Re(z), z)

x tol round_complex a rx a abs tol a UnitsOf * < 0 a if 11 line : x x eval : x Re rx i x Im rx * + vectorize 31 line :

x round_complex x 1012 -^round_complex 11 line :

V.012 A 1 -^V.abc * round_complex : 0.833 - 0.917 0.0833 - 31 mat