summaryrefslogtreecommitdiff
path: root/2276/CH5/EX5.11/chapter5_ex11.sce
blob: 30d9f77670fced2a6c595b05a1bec23256862dce (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
clc
clear

//input
c=4*(10^-6);//capacitance of a capacitor by which a resistive-inductive load is shunted in farad
v=2;//supply voltage in volts
f=5000;//supply frequency in hertz
q=10;//Q factor of the circuit 

//calculations
vwc=2*2*%pi*f*c;//capacitor current in amperes
it=vwc/q;//total current in amperes
i1=((vwc^2)+(it^2))^0.5;//load current in amperes
z1=v/i1;//load impedance in ohms
r1=z1*(it/i1);//resistance of load in ohms
x1=q*r1;//reactance of load in ohms
l=(x1*(10^6))/(2*%pi*f);//load inductance in microhenry

//output
mprintf('the load has a resistance of %3.3f ohms and an inductance of %3.0f microhenry',r1,l)