summaryrefslogtreecommitdiff
path: root/2078/CH1/EX1.5/Example1_5.sce
blob: 7683d778e65f0c4de28af0977e95707b09bcb8bd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Exa 1.5
clc;
clear;
close;
format('v',6);
//Given data :
oldkVA_B=30000;//kVA
oldkV_B=11;//kV
oldZpu=0.2;//pu
newkVA_B=50000;//kVA
newkV_B=33;//kV
newZpu=oldZpu*newkVA_B/oldkVA_B*(oldkV_B/newkV_B)^2;//pu
disp(newZpu,"New Per unit impedence(pu) :");