summaryrefslogtreecommitdiff
path: root/3792/CH6/EX6.11/Ex6_11.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3792/CH6/EX6.11/Ex6_11.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3792/CH6/EX6.11/Ex6_11.sce')
-rw-r--r--3792/CH6/EX6.11/Ex6_11.sce32
1 files changed, 32 insertions, 0 deletions
diff --git a/3792/CH6/EX6.11/Ex6_11.sce b/3792/CH6/EX6.11/Ex6_11.sce
new file mode 100644
index 000000000..42324eff5
--- /dev/null
+++ b/3792/CH6/EX6.11/Ex6_11.sce
@@ -0,0 +1,32 @@
+// SAMPLE PROBLEM 6/11
+clc;funcprot(0);
+// Given data
+m=30;// kg
+k=0.100;// m
+m_OB=10;// kg
+m_c=7;// kg
+K=30;// kN/m
+theta=45;// degree
+l=0.375;// m
+g=9.81;// m/s^2
+
+// Calculation
+// (a)
+// T_2=[2*((1/2)*I_G*omega^2]+[(1/2)*m*v^2];
+// T_2= 6.83*v_B^2;
+T_1=0;// J
+l_b=l/sqrt(2);// m
+V_1=(2*m_OB*g*(l_b/2))+(m_c*g*l_b);// J
+V_2=0;// J
+U_12=0;// J
+v_B=sqrt(((T_1+V_1+U_12)-(V_2))/6.83);// m/s
+// (b)
+T_3=0;// J
+U_13=0;// J
+function[X]=deformation(y)
+ X(1)=(T_1+V_1+U_13)-(T_3+((-2*m_OB*g*(y(1)/2))-(m_c*g*y(1))+((1/2)*K*10^3*y(1)^2)));
+endfunction
+y=[10];
+z=fsolve(y,deformation);
+x=z(1)*1000;// mm
+printf("\n(a)The velocity of the collar as it first strikes the spring,v_B=%1.2f m/s \n(b)The maximum deformation of the spring,x=%2.1f mm",v_B,x);