summaryrefslogtreecommitdiff
path: root/3835/CH6/EX6.12/Ex6_12.sce
blob: 84e49996d14d3f5697b9e5431d6f3cfacacb0508 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
clear
//
//case 1
//2300 winding used as secondary
//given and derived
st=150
v1=13800
v2=2300
a=(v1-v2)/v2
b=a+1
sat=(6*150)/5
printf("\n sat= %0.1f  Kva",sat)
//case 2
v1=13.8
v2=11.5
a=(v1-v2)/v2
sat=((1+a)/a)*150
printf("\n sat= %0.1f  kva",sat)