1 files changed, 16 insertions, 0 deletions
diff --git a/213/CH13/EX13.18/13_18.sce b/213/CH13/EX13.18/13_18.sce
new file mode 100755
index 000000000..8dded6a25
--- /dev/null
+++ b/213/CH13/EX13.18/13_18.sce
@@ -0,0 +1,16 @@
+//To find speed of road wheel
+clc
+//Given:
+TA=10, TB=60
+NA=1000, NQ=210, ND=NQ //rpm
+//Solution:
+//Refer Fig. 13.24 and Table 13.20
+//Calculating the speed of crown gear B
+NB=NA*(TA/TB) //rpm
+//Calculating the values of x and y
+y=200
+x=y-210
+//Calculating the speed of road wheel attached to axle P
+NC=x+y //Speed of road wheel attached to axle P, rpm
+//Results:
+printf("\n\n Speed of road wheel attached to axle P = %d rpm.\n\n",NC)
+\ No newline at end of file