summaryrefslogtreecommitdiff
path: root/98/CH13/EX13.3/example13_3.sce
blob: 876dec2b4c67968b7bb830e3861ae252fea6a979 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
//Chapter 13
//Example 13_3
//Page 315

clear;clc;

l1=2;
l2=6-2;
i1=40;
i2=20;
v=600;
rw=0.25;
rt=0.03;

r=rw+rt;
i_sa=i1+i2;
i_ab=i2;
v_sa=i_sa*r*l1;
v_ab=i_ab*r*l2;
va=v-v_sa;
vb=va-v_ab;

printf("Reisistance of trolley wire and track/km = %.2f ohm \n\n", r);
printf("Current in section SA = %d A \n\n", i_sa);
printf("Current in section AB = %d A \n\n", i_ab);
printf("Voltage drop in section SA = %.2f V \n\n", v_sa);
printf("Voltage drop in section AB = %.2f V \n\n", v_ab);
printf("Voltage across tram A = %.2f V \n\n", va);
printf("Voltage across tram B = %.2f V \n\n", vb);