blob: 72de4241477e283c24282b3a5f89f57401b19232 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
clc;
Vl=230; //Assigning values to parameters
f=50;
Rph=15;
L=0.03;
Xl=2*%pi*f*L;
Zph=15+%i*9.42;
[r,t]=polar(Zph)
Vph=Vl;
Iph=Vph/r;
Il=sqrt(3)*Iph;
P=sqrt(3)*Vl*Il*cos(t);
disp("Amperes",Iph,"Phase current");
disp("Amperes",Il,"Line current");
disp("Watts",polar(P),"Power absorbed");
|
