initial commit / add all books

1 files changed, 26 insertions, 0 deletions

diff --git a/3792/CH5/EX5.17/Ex5_17.sce b/3792/CH5/EX5.17/Ex5_17.sce
new file mode 100644
index 000000000..238d910c4
--- /dev/null
+++ b/3792/CH5/EX5.17/Ex5_17.sce
@@ -0,0 +1,26 @@
+// SAMPLE PROBLEM 5/17

+clc;clear;funcprot(0);

+// Given data

+omega=2;// rad/sec

+theta=45;// degree

+OCbar=450;// mm

+CAbar=225;// mm

+

+// Calculation

+// v_A=omega_CA*r_CA;

+// v_A=(225/sqrt(2))omega_CA*(i-j)

+OPbar=sqrt((OCbar-CAbar)^2+(CAbar)^2);// mm

+r=OPbar;// mm

+omega=omega;//(k) rad/s

+O=omega*r;// mm/s

+// Substitution into the relative-velocity equation gives

+// (225/sqrt(2))omega_CA*(i-j)=(450*sqrt(2)j+xdoti)

+// Equating separately the coefficients of the i and j terms yields

+omega_CA=O/(225/sqrt(2));// mm/s

+xdot=(225/sqrt(2))*omega_CA;// mm/s

+v_rel=xdot;// mm/s

+v_A=CAbar*abs(omega_CA);// mm/s

+v_P=OPbar*omega;// mm/s

+v_AP=abs(v_rel);// mm/s

+omega_AC=v_A/CAbar;// rad/s

+printf("\nThe actual angular velocity of CA,omega_CA=%1.0f rad/s \nThe velocity of A relative to the rotating slot in OD,xdot=v_rel=%3.2f mm/s \nThe velocity of pin A,v_A=%3.0f mm/s",omega_CA,xdot,v_A);