1 files changed, 24 insertions, 0 deletions
diff --git a/3792/CH2/EX2.14/Ex2_14.sce b/3792/CH2/EX2.14/Ex2_14.sce
new file mode 100644
index 000000000..2aefb6540
--- /dev/null
+++ b/3792/CH2/EX2.14/Ex2_14.sce
@@ -0,0 +1,24 @@
+// Example 2_14
+clc;funcprot(0);
+// Given data
+v_A=45;// mi/hr
+v_B=30;// mi/hr
+a_A=3;// ft/sec^2
+theta_1=30;// degree
+theta_2=60;// degree
+rho=440;// The radius of curvature in ft
+
+// Calculation
+// Velocity
+v_A=v_A*(5280/3600);// ft/sec
+v_B=v_B*(5280/3600);// ft/sec
+// By the application of the law of cosines and the law of sines gives
+v_BA=sqrt(v_A^2+v_B^2-(2*v_A*v_B*cosd(theta_2)));// ft/sec
+theta=asind((v_B*sind(theta_2))/v_BA);// degree
+// Acceleration
+a_B=(v_B)^2/rho;// ft/sec^2
+a_BAx=a_B*cosd(theta_1)-a_A;// ft/sec^2
+a_BAy=a_B*sind(theta_1);// ft/sec^2
+a_BA=sqrt(a_BAx^2+a_BAy^2);// ft/sec^2
+beta=asind((a_B*sind(theta_1))/a_BA);// degree
+printf("\nv_BA=%2.1f ft/sec \ntheta=%2.1f degree \na_AB=%1.2f ft/sec^2 \nbeta=%2.1f degree",v_BA,theta,a_BA,beta);