summaryrefslogtreecommitdiff
path: root/2360/CH6/EX6.1/ex6_1.sce
blob: 9cb60aa46a8cb3c679c80972d301fa9159c24b65 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
// Exa 6.1
format('v',7);clc;clear;close;
// Given data
Z1 = 50;// in ohm
Z2 = 250;// in ohm
Z3 = 200;// in ohm
theta1 = 80;// in degree
theta2 = 0;// in degree
theta3 = 30;// in degree
//bridge balance equation, Z1*Z4 = Z2*Z3;
Z4 = (Z2*Z3)/Z1;// in ohm
//phase angle condition, theta1+theta4 = theta2+theta3;
theta4 = theta2+theta3-theta1;// in degree
Z4=Z4*expm(%i*theta4*%pi/180);
disp("The resistance part of Z4 is "+string(real(Z4))+" Ω while ")
disp(" it is in series with capacitive reactance of "+string(abs(imag(Z4)))+" Ω")