3 files changed, 103 insertions, 0 deletions
diff --git a/509/CH12/EX12.1/12_1.sci b/509/CH12/EX12.1/12_1.sci
new file mode 100644
index 000000000..867923c1d
--- /dev/null
+++ b/509/CH12/EX12.1/12_1.sci
@@ -0,0 +1,17 @@
+// Chapter 12 Example 1//
+clc
+clear
+// span length=l,ultimate strength=s,safety factor=sf//
+l=160;// in m//
+s=8000;// in N//
+sf=4;
+// working stress=t//
+t=s/sf;
+printf("\n Working Stress T = %.2f N\n",t);
+//sag of line=d,weight of conductor=w//
+w=4;// in N/m //
+d=w*l^2/(8*t);
+printf("\n Sag of the line = %.2f m\n",d);
+// length of conductor in spans=L//
+L=l+((w^2*l^3)/(24*t^2));
+printf("\n Length of the conductor in spans = %.2f m\n",L);
+\ No newline at end of file
diff --git a/509/CH12/EX12.2/12_2.sci b/509/CH12/EX12.2/12_2.sci
new file mode 100644
index 000000000..0ad4b794a
--- /dev/null
+++ b/509/CH12/EX12.2/12_2.sci
@@ -0,0 +1,25 @@
+//Chapter 12 Example 2//
+clc
+clear
+// safety factor=w,maximum strength=s,working stress=t//
+sf=2;
+s=800;// in kg//
+t=s/sf;
+printf("\n Working stress = %.2f kg\n",t); 
+// height of one support=h,height of support at other end=h1//
+h=70;
+h1=40;
+// length of span=l,distance of minimum point from the lower support=x1//
+l=160;
+w=0.35;// in kg/m //
+x1=(l/2)-((t*(h-h1))/(w*l));
+printf("\n Minimum point is at distance of %.2f m from lower support.\n",x1);
+h2=65;
+x1=(l/2)-((t*(h-h2))/(w*l));
+printf("\n Minimum point is at distance of %.2f m from lower span.\n",x1);
+// Thus the minimum point lies inside the span i.e 44.29 m from lower span//
+// sag from lower support =d1//
+d1=(w*x1^2)/(2*t);
+printf("\n Distance of sag from lower support = %.2f m\n",d1);
+mgc=h2-d1;
+printf("\n The minimum ground clearance = %.2f m\n",mgc);
+\ No newline at end of file
diff --git a/509/CH12/EX12.3/12_3.sci b/509/CH12/EX12.3/12_3.sci
new file mode 100644
index 000000000..a3f08ddd1
--- /dev/null
+++ b/509/CH12/EX12.3/12_3.sci
@@ -0,0 +1,61 @@
+// Chapter 12 Example 3//
+clc
+clear
+// from data given in the question -->> diameter of each strand=d,number of layers=n//
+//diameter of conductor=D//
+d=6.30;// in mm//
+n=4;
+D=(2*n-1)*d/10;// divide by 10 to convert from mm to cm//
+printf("\n Total diameter of conductor = %.2f cm\n",D);
+//tensile strength=s,safety factor=sf,working stress=t//
+s=1250;// in kg//
+sf=5;
+t=s/sf;
+printf("\n Working stress is given by %.2f kg\n",t);
+// span length=l,weight of conductor=w,sag in stil air=d//
+l=200;// in m//
+w=0.4;// in kg/m //
+d=(w*l^2)/(8*t);
+printf("\n Sag in still air = %.2f m\n",d);
+// sag if conductor covered by ice//
+// weight of ice=wi,thickness of ice=ti,density of ice=pi//
+ti=0.5;// in cms//
+pi=915;// in kg/m^3 //
+wi=%pi*((D+ti)*10^-2*ti*10^-2)*pi;// to convert from cms to ms//
+wt=w+wi;
+d=(wt*l^2)/(8*t);
+printf("\n Total sag if conductor is covered by ice = %.2f m\n",d);
+// sag is conductor is covered by ice and in presence of wind pressure //
+// wind loading=ww,effective wind loadong=we,wind pressure=p//
+p=10*10^-2;// in kg/cm^2  //
+ww=(D+2*ti)*p;
+we=sqrt(ww^2+(w+wi)^2);
+printf("\n Effective Loading = %.3f kg/m\n",we);
+d=(we*l^2)/(8*t);
+printf("\n The total sag will be %.2f m\n",d);
+// angle at which sag acts=sa//
+sa=atand(ww/(wi+w));
+printf("\n Angle at which sag acts is %.2f degrees to the vertical\n",sa);
+//vertical sag=d1//
+d1=d*cosd(sa);
+printf("\n Vertical sag = %.2f m\n",d1);
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+