initial commit / add all books

5 files changed, 69 insertions, 0 deletions

diff --git a/213/CH9/EX9.1/9_1.sce b/213/CH9/EX9.1/9_1.sce
new file mode 100755
index 000000000..6d4a6b32e
--- /dev/null
+++ b/213/CH9/EX9.1/9_1.sce
@@ -0,0 +1,9 @@
+//To find inclination of track arm

+clc

+//Given:

+c=1.2,b=2.7 //m

+//Solution:

+//Calculating the inclination of the track arm to the longitudinal axis

+alpha=atan(c/(2*b))*180/%pi //degrees

+//Results:

+printf("\n\n Inclination of the track arm to the longitudinal axis, alpha = %.1f degrees.\n\n",alpha)
\ No newline at end of file
diff --git a/213/CH9/EX9.3/9_3.sce b/213/CH9/EX9.3/9_3.sce
new file mode 100755
index 000000000..d28eefb00
--- /dev/null
+++ b/213/CH9/EX9.3/9_3.sce
@@ -0,0 +1,13 @@
+//To find the angle turned

+clc

+//Given:

+alpha=18*%pi/180 //radians

+//Solution:

+//Maximum velocity is possible when

+theta1=0,theta2=180 //degrees

+//Calculating the angle turned by the driving shaft when the velocity ratio is unity

+theta3=acos(sqrt((1-cos(alpha))/(sin(alpha)^2)))*180/%pi //degrees

+theta4=180-theta3 //degrees

+//Results:

+printf("\n\n Angle turned by the driving shaft when the velocity ratio is maximum, theta = %d degrees or %d degrees.\n",theta1,theta2)

+printf(" Angle turned by the driving shaft when the velocity ratio is unity, theta = %.1f degrees or %.1f degrees.\n\n",theta3,theta4)
\ No newline at end of file
diff --git a/213/CH9/EX9.4/9_4.sce b/213/CH9/EX9.4/9_4.sce
new file mode 100755
index 000000000..36f82a206
--- /dev/null
+++ b/213/CH9/EX9.4/9_4.sce
@@ -0,0 +1,13 @@
+//To find the greatest permissible angle

+clc

+//Given:

+N=500 //rpm

+//Solution:

+//Calculating the angular velocity of the driving shaft

+omega=2*%pi*N/60 //rad/s

+//Calculating the total fluctuation of speed of the driven shaft

+q=12/100*omega //rad/s

+//Calculating the greatest permissible angle between the centre lines of the shafts

+alpha=acos((-(q/omega)+sqrt(0.12^2+4))/2)*180/%pi //degrees

+//Results:

+printf("\n\n Greatest permissible angle between the centre lines of the shafts, alpha = %.2f degrees.\n\n",alpha)
\ No newline at end of file
diff --git a/213/CH9/EX9.5/9_5.sce b/213/CH9/EX9.5/9_5.sce
new file mode 100755
index 000000000..a9b9a5f07
--- /dev/null
+++ b/213/CH9/EX9.5/9_5.sce
@@ -0,0 +1,15 @@
+//To find speeds and permissible angle

+clc

+//Given:

+N=1200,q=100 //rpm

+//Solution:

+//Calculating the greatest permissible angle between the centre lines of the shafts

+alpha=acos((-(100/1200)+sqrt(0.083^2+4))/2)*180/%pi //degrees

+//Calculating the maximum speed of the driven shaft

+N1max=N/cosd(alpha) //rpm

+//Calculating the minimum speed of the driven shaft

+N1min=N*cosd(alpha) //rpm

+//Results:

+printf("\n\n Greatest permissible angle between the centre lines of the shafts, alpha = %.1f degrees.\n",alpha)

+printf(" Maximum speed of the driven shaft, N1(max) = %d rpm.\n",N1max)

+printf(" Minimum speed of the driven shaft, N1(min) = %d rpm.\n\n",N1min)
\ No newline at end of file
diff --git a/213/CH9/EX9.7/9_7.sce b/213/CH9/EX9.7/9_7.sce
new file mode 100755
index 000000000..f8f4ebb92
--- /dev/null
+++ b/213/CH9/EX9.7/9_7.sce
@@ -0,0 +1,19 @@
+//To find speeds of shafts

+clc

+//Given:

+alpha=20 //degrees

+NA=500 //rpm

+//Solution:

+//Calculating the maximum speed of the intermediate shaft

+NBmax=NA/cosd(alpha) //rpm

+//Calculating the minimum speed of the intermediate shaft

+NBmin=NA*cosd(alpha) //rpm

+//Calculating the maximum speed of the driven shaft

+NCmax=NBmax/cosd(alpha) //rpm

+//Calculating the minimum speed of the driven shaft

+NCmin=NBmin*cosd(alpha) //rpm

+//Results:

+printf("\n\n Maximum speed of the intermediate shaft, NB(max) = %.1f rad/s.\n",NBmax)

+printf(" Minimum speed of the intermediate shaft, NB(min) = %.2f rad/s.\n",NBmin)

+printf(" Maximum speed of the driven shaft, NC(max) = %.2f rad/s.\n",NCmax)

+printf(" Minimum speed of the driven shaft, NC(min) = %.1f rad/s.\n",NCmin)
\ No newline at end of file