summaryrefslogtreecommitdiff
path: root/1067/CH20/EX20.18.b/20_18b.sce
blob: 18f1a908e0f34c71c1d90f2558e7dae92a22803a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clear;
clc;
z=4000;
zb=9;
x1=zb/z*100;
x2=5;
x3=30;
x4=30;
x=inv(inv(x1+x2)+inv(x3)+inv(x4));
x=round(x*100)/100;
fault=zb*1e3/x*100;
fault=fix(fault/1e3)*1e3;
mprintf("the new fault level of generator bus=%dMVA",fault/1e3);