summaryrefslogtreecommitdiff
path: root/2231/CH1/EX1.40/Ex_1_40.sce
blob: 762399a982cf8ccbc109937713d1f957db3e724f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Example 1_40
clc;
clear;close;

//Given data: 
V=230;//V
R1=2;//ohm
R2=5;//ohm
R3=1;//ohm
R4=6;//ohm
R5=5;//ohm
Isqr_t=30;//A^2-s
R=R1+R2*R3/(R2+R3);//ohm(X grounded)
Ifault=sqrt(2)*V/R;//A
tc=Isqr_t/Ifault^2;//s
disp(tc,"Fault clearing time in seconds");