summaryrefslogtreecommitdiff
path: root/1076/CH10/EX10.20/10_20.sce
blob: e8bda27c22376a4b977537cc5f68f11ba809d4cb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
clear
clc

V=33
S=75
Z=V*V/S

sg=15
xg=.15
Xg=xg *S/sg
xt=.08
x=Xg/3

CB=750
XF=S/CB
xi=((x*xt)-(XF*(x+xt)))/(XF-x)
xi=round(xi*10000)/10000
X=xi*Z
mprintf("reactance of reactor X= %.3f ohm",X)