blob: 8d9f887b3eeb08b5d81fe60fc5d2330f734ab72e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
// Example 6.11
// Application of an AC Norton Network
// from figure 6.25(a)
V_m=10; // Voltage phasor Magnitude
omega=5000; // Radian Frequency (rad/s)
V=complex(10,0); // Voltage Phasor in rectangular form
Z_R=280; // Ohms
Z_C=-%i*20;
Z_L=%i*40;
Z_t=(Z_L*Z_R)/(Z_L+Z_R)+Z_C; // thevenin resistance
V_oc= (Z_R*V)/(Z_R+Z_L);
I_sc= V_oc/Z_t; // Relation Between thevenin's parameter
Y_t=1/Z_t; // Admittance
// Let Y= G + i*B
// Y_eq= Y_t+Y= (0.014+G)+i(B-0.048)
// for |Y_eq| to be minimum
G=0;
B=0.048;
Y=G+%i*B;
Z=1/Y;
Y_eq= Y_t+Y;
V=I_sc/Y_eq;
disp(V,"Resultant terminal Voltage in rectangular form(Volts)=")
|
