8 files changed, 83 insertions, 0 deletions
diff --git a/3886/CH10/EX10.13/10_13.sce b/3886/CH10/EX10.13/10_13.sce
new file mode 100644
index 000000000..117f8007c
--- /dev/null
+++ b/3886/CH10/EX10.13/10_13.sce
@@ -0,0 +1,12 @@
+//Determine radius of gyration
+//refer fig.10.23
+//composite body may be divided into 
+//1.a solid block of size (80*120*100 mm) and 2.two semicircular grooves each of 40 mm radius and 80 mm length
+//Let's assign random value to rho
+rho=1
+//Ig=1.029*10^8*rho
+//Ix2=Ig+M2*d'^2
+Ixx=10.0816*(10^8)*rho
+M=557876.14*rho  //units
+k=sqrt(Ixx/M)  //mm
+printf("\nk=%.2f mm",k)
diff --git a/3886/CH10/EX10.13/10_13.txt b/3886/CH10/EX10.13/10_13.txt
new file mode 100644
index 000000000..c706d22d0
--- /dev/null
+++ b/3886/CH10/EX10.13/10_13.txt
@@ -0,0 +1,4 @@
+ 
+--> exec('E:\My program EM\10. Centre of gravity and mass moment of inertia\10.13.sce', -1)
+
+k=42.51 mm
+\ No newline at end of file
diff --git a/3886/CH10/EX10.14/10_14.sce b/3886/CH10/EX10.14/10_14.sce
new file mode 100644
index 000000000..0caf2b0fa
--- /dev/null
+++ b/3886/CH10/EX10.14/10_14.sce
@@ -0,0 +1,26 @@
+//Moment of Inertia of flywheel
+//refer fig. 10.24
+//Moment of inertia of rim
+aRo=1.5/2
+aRi=1.4/2
+at=0.30
+rho=7200  //kg/m^3
+I1=((%pi)*0.3*7200*(0.75^4-0.7^4))/(2)  //units
+//Moment of inertia of hub
+bRo=0.25/2  //m
+bRi=0.1/2  //m
+bt=0.2  //m
+I2=(%pi)*(0.2*7200)*(0.125^4-0.05^4)/(2)  //units
+//Moment of inertia of Arms
+A=8000*(10^-9)  //m^2
+l=0.575  //m
+d=(0.575/2)+0.125  //m
+M=l*A*rho  //kg
+//there are six such arms
+I3=6*0.03312*((0.575)^2/(12))*(0.4125^2)  //units
+//moment of inertia of flywheel
+I=I1+I2+I3  //units
+printf("\nmoment of inertia of flywheel=%.2f units",I)
+
+
+
diff --git a/3886/CH10/EX10.14/10_14.txt b/3886/CH10/EX10.14/10_14.txt
new file mode 100644
index 000000000..98023a3c2
--- /dev/null
+++ b/3886/CH10/EX10.14/10_14.txt
@@ -0,0 +1,4 @@
+ 
+--> exec('E:\My program EM\10. Centre of gravity and mass moment of inertia\10.14.sce', -1)
+
+moment of inertia of flywheel=259.44 units
+\ No newline at end of file
diff --git a/3886/CH10/EX10.4/10_4.sce b/3886/CH10/EX10.4/10_4.sce
new file mode 100644
index 000000000..527e1339f
--- /dev/null
+++ b/3886/CH10/EX10.4/10_4.sce
@@ -0,0 +1,12 @@
+//Locate centre of gravity
+//refer fig. 10.5
+W1=0.6*0.75*0.5*25000  //N
+W2=(%pi*(0.2^2)*0.3*25000)/(4)  //N
+sumWi=7889.38
+sumWixi=3241.57
+sumWiyi=2593.25
+sumWizi=1745.91
+xbar=(sumWixi)/(sumWi)
+ybar=(sumWiyi)/(sumWi)
+zbar=(sumWizi)/(sumWi)
+printf("\nxbar=%.3f m\nybar=%.3f m\nzbar=%.3f m",xbar,ybar,zbar)
diff --git a/3886/CH10/EX10.4/10_4.txt b/3886/CH10/EX10.4/10_4.txt
new file mode 100644
index 000000000..a0ec67862
--- /dev/null
+++ b/3886/CH10/EX10.4/10_4.txt
@@ -0,0 +1,6 @@
+ 
+--> exec('E:\My program EM\10. Centre of gravity and mass moment of inertia\10.4.sce', -1)
+
+xbar=0.411 m
+ybar=0.329 m
+zbar=0.221 m
+\ No newline at end of file
diff --git a/3886/CH10/EX10.5/10_5.sce b/3886/CH10/EX10.5/10_5.sce
new file mode 100644
index 000000000..443b4c898
--- /dev/null
+++ b/3886/CH10/EX10.5/10_5.sce
@@ -0,0 +1,13 @@
+//Locate centroid
+//Refer fig.10.6
+//lets assign random value to w
+w=1
+sumWi=1053.98*w
+sumWixi=95055.54*w
+sumWiyi=125214.83*w
+sumWizi=59201.4*w
+xbar=(sumWixi)/(sumWi)
+ybar=(sumWiyi)/(sumWi)
+zbar=(sumWizi)/(sumWi)
+printf("\nxbar=%.2f mm\nybar=%.2f mm\nzbar=%.2f mm",xbar,ybar,zbar)
+
diff --git a/3886/CH10/EX10.5/10_5.txt b/3886/CH10/EX10.5/10_5.txt
new file mode 100644
index 000000000..4c265f11d
--- /dev/null
+++ b/3886/CH10/EX10.5/10_5.txt
@@ -0,0 +1,6 @@
+ 
+--> exec('E:\My program EM\10. Centre of gravity and mass moment of inertia\10.5.sce', -1)
+
+xbar=90.19 mm
+ybar=118.80 mm
+zbar=56.17 mm
+\ No newline at end of file