1 files changed, 36 insertions, 0 deletions
diff --git a/698/CH17/EX17.6/P6_prev_prob_with_different_angles.sce b/698/CH17/EX17.6/P6_prev_prob_with_different_angles.sce
new file mode 100644
index 000000000..f50a64b89
--- /dev/null
+++ b/698/CH17/EX17.6/P6_prev_prob_with_different_angles.sce
@@ -0,0 +1,36 @@
+clc
+//Example 17.5
+//Previous problem with different angles
+
+//------------------------------------------------------------------------------
+
+//Given data
+//diameter of gear
+d=0.25 //m
+r=d/2
+//torque
+Mt=200 //Nm
+//number of teeth
+Ng=45
+//angles
+phi_n=20 //degrees
+alpha=30 //degrees
+
+res6=mopen(TMPDIR+'6_prev_prob_with_different_angles.txt','wt')
+
+//tangential force
+Ft=Mt/r
+mfprintf(res6,'(a)Ft=Mt/r\n\t=%d N\n\n',Ft)
+
+//Separating force
+Fr=Ft*(tand(phi_n)/cosd(alpha))
+mfprintf(res6,'(b)Fr=Ft*tan(phi_n)/cos(alpha)\n\t=%d N\n\n',Fr)
+
+//Axial thrust force
+Fa=Ft*tand(alpha)
+mfprintf(res6,'(c)Fa=Ft*tan(alpha)\n\t=%d N',Fa)
+
+mclose(res6)
+editor(TMPDIR+'6_prev_prob_with_different_angles.txt')
+//------------------------------------------------------------------------------
+//-----------------------------End of program-----------------------------------