blob: d21a8d60e1d6eacf42e7be36867da274243fc56f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
//Chapter 12,Example 7, page 410
//Determine the induced sheath voltage
clear
clc
D = 15 // cm
rsh = 5.5/2 // Sheath diameter converted to radius in cm
I = 250 // A
E = 2*10^-7*314*I*log(D/rsh)*10^3
printf("\n Induced sheath voltage per Km = %f V/km",E)
printf("\n If the sheaths are bonded at one end, the voltage between them at the other end = = %f V/km",E*sqrt(3))
// Answers may vary due to round off errors.
|
