summaryrefslogtreecommitdiff
path: root/3793/CH10/EX10.1/exp_10_1.sce
blob: a2cc2b3f7f02b952033fecb7f7feb72d0323d1fc (plain)
1
2
3
4
5
6
7
8
clear;
clc;
v=[complex(100,0);complex(-75,129.90);complex(-105,-181.865)];
a=complex(-.5,.866);
A=[1 1 1;1 a^2 a;1 a a^2];
vs=inv(A)*v;
mprintf("symmetrical components of phase voltages are \n");
disp(vs);