diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3750/CH1/EX1.2 | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '3750/CH1/EX1.2')
| -rw-r--r-- | 3750/CH1/EX1.2/Ex1_2.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/3750/CH1/EX1.2/Ex1_2.sce b/3750/CH1/EX1.2/Ex1_2.sce new file mode 100644 index 000000000..ede3b39ff --- /dev/null +++ b/3750/CH1/EX1.2/Ex1_2.sce @@ -0,0 +1,24 @@ +//Strength Of Material By G.H.Ryder
+//Chapter 1
+//Example 2
+// To Calculate Strain energy
+P=10,000; //Tension 100d, Unit in KN
+E=205,000; //Young's Modulus, Unit in N/mm^2
+RootDia=16.6; //Root diameter of thread, Unit in mm
+AreaOfCore=%pi*(RootDia^2)/4 //Unit in mm^2
+ShankDia=20; // Diameter at Shank, Unit in mm
+AreaAtShank=%pi*(ShankDia^2)/4; //Unit in mm^2
+ThreadLength=25; //Unit in mm
+ShankLength=50; // Unit in mm
+StressInScrew=P/AreaOfCore; //Unit in N/mm^2
+StressInShank=P/AreaAtShank; //Unit in N/mm^2
+TotalSE=(StressInScrew^2)*AreaOfCore*ThreadLength+(StressInShank^2)*(AreaAtShank*ShankLength)/(2*E);
+// Total Strain Energy, Unit in N/mm^2
+//If Shank is turned down to root diameter(16.6mm) for same maximum stress
+StressInBolt=P/AreaOfCore; //Unit in N/mm^2
+NewSE=((StressInBolt^2)*(AreaOfCore)*(ThreadLength+ShankLength))/(2*E)
+//Strain Energy after shank is turned down to root diameter, Unit in Nmm
+printf("Total Strain Energy=%f Nmm\n", TotalSE)
+printf("Strain Energy after Shank is turned down to root diameter=%f Nmm\n", NewSE)
+
+
|