blob: d1f56ac0632aea8b4ba988a79ebc24e7968059ce (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
// To determine the phase shifting network to be used.
clear
clc;
Z=1000*(cosd(60) + %i*sind(60));//impedence
X=tand(50)*1000*cosd(60);
Xl=1000*sind(60);
Xc=Xl-X;
C=1000000/(314*Xc);
//Answers don't match due to difference in rounding off of digits
disp(X,"X=");
disp(Xc,"Xc=");
disp(C,"C(micro farads)=");
|
