blob: 743e39d397fc8267e585a7013a1e546050dea209 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
//Chapter 10
//Example 10_4
//Page 236
clear;clc;
load_kw=15000;
pf=0.8;
r=1;
vr=132;
loss=0.05;
i=load_kw*1000/sqrt(3)/vr/1000/pf;
l_loss=loss*load_kw;
r=l_loss*1000/3/i^2;
l=r;
printf("Line current = %.0f A \n\n", i);
printf("Line losses = %.0f kW \n\n", l_loss);
printf("R = %.2f ohm \n\n", r);
printf("Length of the line = %.2f km \n\n", l);
|