blob: 977ca8a1e7cfd0f7ec49e2aca85bfbdf69883701 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
clc
clear
//input
r=32;//resistance in branch 1 in ohms
l=0.08;//inductance in branch 2 in henry
c=200*(10^-6);//capacitance in branch 3 in farad
//braches 1,2 and 3 are in parallel
v=240;//supply voltage in volts
f=50;//supply frequency in hertz
//calculations
g1=1/r;//conductance of branch 1 in siemens
b2=-1/(2*%pi*f*l);//susceptance of branch 2 in siemens
b3=2*%pi*f*c;//susceptance of branch 3 in siemens
bt=b2+b3;//total susceptance in siemens
yt=((g1^2)+(bt^2))^0.5;//total admittance in mho
it=v*yt;//total current in amperes
phi=(180/%pi)*acos(g1/yt);//phase angle in degrees
//output
mprintf('the total current will be %3.2f A leading on the voltage by %3.1f degrees',it,phi)
|
