From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3647/CH2/EX2.1/2_1.sce   | 24 ++++++++++++++++++++++++
 3647/CH2/EX2.10/2_10.sce | 18 ++++++++++++++++++
 3647/CH2/EX2.11/2_11.sce | 25 +++++++++++++++++++++++++
 3647/CH2/EX2.2/2_2.sce   | 12 ++++++++++++
 3647/CH2/EX2.3/Ex2_3.sce | 26 ++++++++++++++++++++++++++
 3647/CH2/EX2.4/2_4.sce   | 21 +++++++++++++++++++++
 3647/CH2/EX2.5/2_5.sce   | 19 +++++++++++++++++++
 3647/CH2/EX2.6/Ex2_6.sce | 25 +++++++++++++++++++++++++
 3647/CH2/EX2.7/2_7.sce   | 23 +++++++++++++++++++++++
 3647/CH2/EX2.8/Ex2_8.sce | 25 +++++++++++++++++++++++++
 3647/CH2/EX2.9/Ex2_9.sce | 22 ++++++++++++++++++++++
 11 files changed, 240 insertions(+)
 create mode 100644 3647/CH2/EX2.1/2_1.sce
 create mode 100644 3647/CH2/EX2.10/2_10.sce
 create mode 100644 3647/CH2/EX2.11/2_11.sce
 create mode 100644 3647/CH2/EX2.2/2_2.sce
 create mode 100644 3647/CH2/EX2.3/Ex2_3.sce
 create mode 100644 3647/CH2/EX2.4/2_4.sce
 create mode 100644 3647/CH2/EX2.5/2_5.sce
 create mode 100644 3647/CH2/EX2.6/Ex2_6.sce
 create mode 100644 3647/CH2/EX2.7/2_7.sce
 create mode 100644 3647/CH2/EX2.8/Ex2_8.sce
 create mode 100644 3647/CH2/EX2.9/Ex2_9.sce

(limited to '3647/CH2')

diff --git a/3647/CH2/EX2.1/2_1.sce b/3647/CH2/EX2.1/2_1.sce
new file mode 100644
index 000000000..fed9473ad
--- /dev/null
+++ b/3647/CH2/EX2.1/2_1.sce
@@ -0,0 +1,24 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//equation of motion, Mass of moment of inertia, percentage 
+//reduction in speed
+//initialisation of variables
+g=5//ft
+w=300//rev/min
+a=0.86//red/s^2
+h=2240//ft/s
+q=4//ft
+g1=32.1//ft/s
+k=3105000//ft lbf
+//CALCULATIONS
+T=(w*(2*%pi/60))/(a)//sec
+M=(q*h*(g^2))/(g1)//slug ft^3
+K=((1/2)*M)*((w*2*%pi^2)/(60))//ft lbf
+W=sqrt(k/(1/2)/M)//rad/s
+P=[(((w*2*%pi)/60)-W)/((w*2*%pi)/60)]*100//percent
+//RESULTS
+printf('The equation of motion=% f sec',T)
+printf('Mass of moment of inertia of =% f ft lbf',K)
+printf('the percentage reduction in speed=% f percent',P)
diff --git a/3647/CH2/EX2.10/2_10.sce b/3647/CH2/EX2.10/2_10.sce
new file mode 100644
index 000000000..a2e80f4d9
--- /dev/null
+++ b/3647/CH2/EX2.10/2_10.sce
@@ -0,0 +1,18 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+//torque to acceleration drum and truck
+clc
+//initialisation of variables
+v=20//ft/s
+s=150//ft
+h=2240//ft
+g=32.2//ft
+d=3//ft
+p=364.9//lbf
+q=4//ft
+//CALCULATIONS
+A=v^2/(2*s)//ft/s^2
+T=(h*(d)^2/g)*(A/q)+p*q//lbf ft
+//RESULTS
+printf('the torque to acceleration drum and truck=% f lbf ft',T)
diff --git a/3647/CH2/EX2.11/2_11.sce b/3647/CH2/EX2.11/2_11.sce
new file mode 100644
index 000000000..b7d01a6f3
--- /dev/null
+++ b/3647/CH2/EX2.11/2_11.sce
@@ -0,0 +1,25 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//gravitational force
+//initialisation of variables
+v=35//hp
+p=25//percent
+v1=30//mile/h
+q=28//in
+d=30//in
+w=3200//lbf
+t=33000//lbf
+s=88//in
+W=w*(1/v1)//lbf
+m=0.364//mile/h
+//CALCULATIONS
+N=(v1*s/60)/(14/12)*(60/(2*%pi))//rev/min
+Ne=N*6//rev/min
+E=(v*t)/(2*%pi*Ne)//lbf ft
+T=(v*0.75*t)/(2*%pi*N)//lbf ft
+P=T/(14/12)//lbf
+V=sqrt((P-W)/m)//mile/h
+//RESULTS
+printf('the gravitational force=% f mile/h',V)
diff --git a/3647/CH2/EX2.2/2_2.sce b/3647/CH2/EX2.2/2_2.sce
new file mode 100644
index 000000000..c7d940264
--- /dev/null
+++ b/3647/CH2/EX2.2/2_2.sce
@@ -0,0 +1,12 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//radius of gyration
+//initialisation of variables
+m=2.58065//slug ft^3
+w=2.144//in
+//CALCULATIONS
+R=sqrt(m/w)//ft
+//RESULTS
+printf('The radius of gyration=% f ft',R)
diff --git a/3647/CH2/EX2.3/Ex2_3.sce b/3647/CH2/EX2.3/Ex2_3.sce
new file mode 100644
index 000000000..9a247068b
--- /dev/null
+++ b/3647/CH2/EX2.3/Ex2_3.sce
@@ -0,0 +1,26 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+//distance travelled along incline before coming to rest
+clc
+//initialisation of variables
+w1=10//tonf
+r=36//in
+w=1/4//tonf
+g=14//in
+t=30//mile/h
+s=100//in
+m=20//lbf/tonf
+h=2240//lbf
+q=44//in
+g1=32.2//ft
+//CALCULATIONS
+K=(w1*h*(q^2))/(2*g1)//ft lbf 
+L=q/1.5//rad/s
+R=(2*1/2*(1/4*h/g1)*(g/12)^2)*L^2//ft lbf
+T=K+R//ft lbf
+M=m*w1//lbf
+G=w1*h*(1/s)//lbf
+S=K/(M+G)//ft
+//RESULTS
+printf('the distance travelled along incline before coming to rest=% f ft',S)
diff --git a/3647/CH2/EX2.4/2_4.sce b/3647/CH2/EX2.4/2_4.sce
new file mode 100644
index 000000000..7dc799d00
--- /dev/null
+++ b/3647/CH2/EX2.4/2_4.sce
@@ -0,0 +1,21 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//percentage fluctuation in speed
+//initialisation of variables
+g=32.2//ft
+p=275//rev/min
+w=1/2*p//ft
+d=15//hp
+h=33000//ft
+r=0.8//ft
+h1=2240//ft
+m=p*(2*%pi/60)//rad/s
+//CALCULATIONS
+W=(d*h)/w//ft lbf
+E=r*W//ft lbf
+I=(1*h1*(3)^2)/(g)//slug ft^2
+Q=(E*100)/(I*(m)^2*2)//percent
+//RESULTS
+printf('the percentage fluctuation in speed=% f percent',Q)
diff --git a/3647/CH2/EX2.5/2_5.sce b/3647/CH2/EX2.5/2_5.sce
new file mode 100644
index 000000000..5e11a292e
--- /dev/null
+++ b/3647/CH2/EX2.5/2_5.sce
@@ -0,0 +1,19 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//weight of flywheel and the work done by frictional torque
+//initialisation of variables
+w=140//rev
+r=8//in
+g=12//in
+t=30//mile/h
+q=(1/4)//tonf
+I=0.99//slug ft^3
+p=32.2//ft^2
+//CALCULATIONS
+W=(I*p)/(r/g)^2//lbf
+T=(I*(2*%pi)^2)/(2*(2*%pi)*w)//lbf ft
+//RESULTS
+printf('The weight of flywheel=% f lbf',W)
+printf('the work done by frictional torque in stopping flywheel=% f lbf ft',T)
diff --git a/3647/CH2/EX2.6/Ex2_6.sce b/3647/CH2/EX2.6/Ex2_6.sce
new file mode 100644
index 000000000..b0d056971
--- /dev/null
+++ b/3647/CH2/EX2.6/Ex2_6.sce
@@ -0,0 +1,25 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+//mass moment of inertia, kinetic enrgy and shear blades
+clc
+//initialisation of variables
+w=2//tonf
+t=250//rev/min
+g=32.2//ft
+h=2240//ft
+f=0.8//percent
+t1=60//ft
+s=1*(2/3)//min
+r=480//ft
+w1=20//ft
+//CALCULATIONS
+M=(w*h*(w^2))/g//slug ft^2
+A=(t*(w*%pi/t1))/t1*s//rad/s^2
+I=M*A//lbf ft
+K=1/2*(M)*(2*%pi/t1)^2*r*w1//ft lbf
+F=f*K/(3/12)//lbf
+//RESULTS
+printf('the mass moment of inertia =% f lbf ft',I)
+printf('the kinetic energy=% f ft lbf',K)
+printf('the average force on the shear blades=% f lbf',F)
diff --git a/3647/CH2/EX2.7/2_7.sce b/3647/CH2/EX2.7/2_7.sce
new file mode 100644
index 000000000..ad6135ae1
--- /dev/null
+++ b/3647/CH2/EX2.7/2_7.sce
@@ -0,0 +1,23 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//frictional torque retarding and tangential braking acting
+//initialisation of variables
+h=2240//ft
+w=0.06//ft
+w1=4//ft
+q=12//ft
+g=5//ft
+g1=32.2//ft
+d=100//rev/min
+f=120//sec
+//CALCULATIONS
+T=w*(w1*h)*(w1/q)//lbf ft
+I=((w1*h*(g)^2)/g1)*d*(2*%pi/60)//slug ft^2/s or lbf ft s
+M=I/T//sec
+P=430.8//lbf ft
+R=(P/2.5)//lbf
+//RESULTS
+printf('the frictional torque retarding=% f sec',M)
+printf('the tangential braking acting=% f lbf',R)
diff --git a/3647/CH2/EX2.8/Ex2_8.sce b/3647/CH2/EX2.8/Ex2_8.sce
new file mode 100644
index 000000000..26330aabf
--- /dev/null
+++ b/3647/CH2/EX2.8/Ex2_8.sce
@@ -0,0 +1,25 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+//tangential force
+clc
+//initialisation of variables
+I=179.2//lbf ft
+h=2240//ft
+w=4//ft
+w1=5//ft
+r=120//ft
+g=32.2//ft
+p=100//ft
+t=60//ft
+//CALCULATIONS
+M=(w*h*(w1)^2)/g//slug ft^3
+T=I/M//rad/s
+D=p*(2*%pi)/(t*T)//sec
+N=(p*(2*%pi)/t)/r//rad/s^2
+T1=M*N//lbf ft
+B=T1-I//lbf ft
+F=B/2*1/2//lbf
+//RESULTS
+printf('the deceleration =% f sec',D)
+printf('the tangential force on brake rim=% f lbf',F)
diff --git a/3647/CH2/EX2.9/Ex2_9.sce b/3647/CH2/EX2.9/Ex2_9.sce
new file mode 100644
index 000000000..d70a7dc83
--- /dev/null
+++ b/3647/CH2/EX2.9/Ex2_9.sce
@@ -0,0 +1,22 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+//friction of bearings is to to neglected
+clc
+//initialisation of variables
+h=2240//ft
+g=32.2//ft
+g1=15//in
+w=1200//lbf
+q=12//ft
+r=1.5//ft
+t=3.28//tonf ft
+t1=1.7//tonf ft
+x=550//ft
+s=6//ft
+//CALCULATIONS
+T=((w*(g1/q)^2)/(h*g))*(3/r)//tonf ft
+T1=t-t1+T//tonf ft
+W=(T1*h*s/(r))/(x)//ft lbf
+//RESULTS
+printf('the friction of bearings is to to neglected =% f',W)
-- 
cgit