summaryrefslogtreecommitdiff
path: root/2078/CH9/EX9.6/Example9_6.sce
blob: c3388b96997cfda149649aa0b9a9109c6e9bebfa (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Exa 9.6
clc;
clear;
close;
//Given data :
Vs=12;//kV
n=4;//no. of uniits
K=0.1;//shunt to mutual capacitance ratio
V4=Vs;//kV
V1=V4/(1+6*K+5*K^2+K^3);//kV
V2=V1*(1+K);//kV
V3=V1*(1+3*K+K^2);//kV
V=V1+V2+V3+V4;//kV
disp(V,"Maximum safe working voltage(kV)");
Strinf_eff=V/n/V4;
disp(Strinf_eff*100,"Percentage String Efficiency(%)");