diff options
Diffstat (limited to '3792/CH5/EX5.19/Ex5_19.sce')
| -rw-r--r-- | 3792/CH5/EX5.19/Ex5_19.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/3792/CH5/EX5.19/Ex5_19.sce b/3792/CH5/EX5.19/Ex5_19.sce new file mode 100644 index 000000000..246d02896 --- /dev/null +++ b/3792/CH5/EX5.19/Ex5_19.sce @@ -0,0 +1,19 @@ +// SAMPLE PROBLEM 5/19
+clc;clear;funcprot(0);
+// Given data
+v_B=150;// (i) m/s
+v_A=100;// (i) m/s
+rho=400;// m
+r=-100;// m
+
+// Calculation
+omega=v_B/rho;// (k) rad/s
+r_AB=r;// (j) m
+v_rel=[v_A-(v_B+(-(omega*r)))];// (i) m/s
+a_A=0;// m/s^2
+a_B=(v_B(1))^2/rho;// m/s^2
+omegadot=0;// rad/s
+a_rel=a_A-[a_B+(omegadot*r)+(omega*-(omega*r))+(2*(omega*v_rel))];// m/s^2
+printf("\nThe instantaneous velocity,v_rel=%2.1fi m/s \nThe instantaneous acceleration,a=%1.2fk m/s^2",v_rel,a_rel);
+v_AB=v_A-v_B;// (i) m/s
+a_AB=a_A-a_B;// (j) m/s^2
|