diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1820/CH13 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '1820/CH13')
| -rwxr-xr-x | 1820/CH13/EX13.1/Example13_1.sce | 39 | ||||
| -rwxr-xr-x | 1820/CH13/EX13.2/Example13_2.sce | 47 |
2 files changed, 86 insertions, 0 deletions
diff --git a/1820/CH13/EX13.1/Example13_1.sce b/1820/CH13/EX13.1/Example13_1.sce new file mode 100755 index 000000000..d5d0d97eb --- /dev/null +++ b/1820/CH13/EX13.1/Example13_1.sce @@ -0,0 +1,39 @@ +// ELECTRIC POWER TRANSMISSION SYSTEM ENGINEERING ANALYSIS AND DESIGN
+// TURAN GONEN
+// CRC PRESS
+// SECOND EDITION
+
+// CHAPTER : 13 : SAG AND TENSION ANALYSIS
+
+// EXAMPLE : 13.1 :
+clear ; clc ; close ; // Clear the work space and console
+
+// GIVEN DATA
+c = 1600 ; // Length of conductor in feet
+L = 500 ; // span b/w conductors in ft
+w1 = 4122 ; // Weight of conductor in lb/mi
+
+// CALCULATIONS
+// For case (a)
+l = 2 * c *( sinh(L/(2*c)) ) ; // Length of conductor in ft using eq 13.6
+l_1 = L * (1 + (L^2)/(24*c^2) ) ; // Length of conductor in ft using eq 13.8
+
+// For case (b)
+d = c*( cosh( L/(2*c) ) - 1 ) ; // sag in ft
+
+// For case (c)
+w = w1/5280 ; // Weight of conductor in lb/ft . [1 mile = 5280 feet]
+T_max = w * (c + d) ; // Max conductor tension in lb
+T_min = w * c ; // Min conductor tension in lb
+
+// For case (d)
+T = w * (L^2)/(8*d) ; // Appr value of tension in lb using parabolic method
+
+// DISPLAY RESULTS
+disp("EXAMPLE : 13.1 : SOLUTION :-") ;
+printf("\n (a) Length of conductor using eq 13.6 , l = %.3f ft \n",l) ;
+printf("\n & Length of conductor using eq 13.8 , l = %.4f ft \n",l_1) ;
+printf("\n (b) Sag , d = %.1f ft \n",d) ;
+printf("\n (c) Maximum value of conductor tension using catenary method , T_max = %.1f lb \n",T_max) ;
+printf("\n Minimum value of conductor tension using catenary method , T_min = %.1f lb \n",T_min) ;
+printf("\n (d) Approximate value of tension using parabolic method , T = %.2f lb \n",T) ;
diff --git a/1820/CH13/EX13.2/Example13_2.sce b/1820/CH13/EX13.2/Example13_2.sce new file mode 100755 index 000000000..4ff3d6e49 --- /dev/null +++ b/1820/CH13/EX13.2/Example13_2.sce @@ -0,0 +1,47 @@ +// ELECTRIC POWER TRANSMISSION SYSTEM ENGINEERING ANALYSIS AND DESIGN
+// TURAN GONEN
+// CRC PRESS
+// SECOND EDITION
+
+// CHAPTER : 13 : SAG AND TENSION ANALYSIS
+
+// EXAMPLE : 13.2 :
+clear ; clc ; close ; // Clear the work space and console
+
+// GIVEN DATA
+L = 500 ; // span b/w conductors in ft
+p = 4 ; // Horizontal wind pressure in lb/sq ft
+t_i = 0.50 ; // Radial thickness of ice in inches
+d_c = 1.093 ; // outside diameter of ACSR conductor in inches
+w1 = 5399 ; // weight of conductor in lb/mi
+s = 28500 ; // ultimate strength in lb
+
+// CALCULATIONS
+// For case (a)
+w_i = 1.25 * t_i * (d_c + t_i) ; // Weight of ice in pounds per feet
+
+// For case (b)
+w = w1/5280 ; // weight of conductor in lb/ft . [1 mile = 5280 feet]
+W_T = w + w_i ; // Total vertical load on conductor in pounds per feet
+
+// For case (c)
+P = ( (d_c + 2*t_i)/(12) )*p ; // Horizontal wind force in lb/ft
+
+// For case (d)
+w_e = sqrt( P^2 + (w + w_i)^2 ) ; // Effective load on conductor in lb/ft
+
+// For case (e)
+T = s/2 ;
+d = w_e * L^2/(8*T) ; // sag in feet
+
+// For case (f)
+d_v = d * W_T/w_e ; // vertical sag in feet
+
+// DISPLAY RESULTS
+disp("EXAMPLE :13.2 : SOLUTION :-") ;
+printf("\n (a) Weight of ice in pounds per feet , w_i = %.4f lb/ft \n",w_i) ;
+printf("\n (b) Total vertical load on conductor in pounds per feet , W_T = %.4f lb/ft \n",W_T) ;
+printf("\n (c) Horizontal wind force in pounds per feet , P = %.4f lb/ft \n",P) ;
+printf("\n (d) Effective load acting in pounds per feet , w_e = %.4f lb/ft \n",w_e) ;
+printf("\n (e) Sag in feet , d = %.2f ft \n",d) ;
+printf("\n (f) Vertical Sag in feet = %.2f ft \n",d_v) ;
|