summaryrefslogtreecommitdiff
path: root/2078/CH11/EX11.16/Example11_16.sce
blob: 181c12f79ce9f1d9bcaf0bf001882a0b84370622 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Exa 11.16
clc;
clear;
close;
//Given data :
Vs=11;//kV
f=50;//Hz
l=2.5*1000;//m
C_all3=1.8;//micro F
Cdash=1.5;//micro F(2*Cc+Cs)
Cs=C_all3/3;//micro F
Cc=(Cdash-Cs)/2;//micro F
C_N=3*Cc+Cs;//micro F
disp(C_N,"Capacitance of core to neutral(micro F)");
C_2=C_N/2;//micro F
disp(C_2,"Capacitance between any two core(micro F)");
Vp=Vs*1000/sqrt(3);//Volt
Ic=2*%pi*f*Vp*C_N*10^-6;//A
disp(Ic,"Charging current per phase(A)");