From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 1898/CH13/EX13.4/Ex13_4.sce | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100755 1898/CH13/EX13.4/Ex13_4.sce (limited to '1898/CH13/EX13.4/Ex13_4.sce') diff --git a/1898/CH13/EX13.4/Ex13_4.sce b/1898/CH13/EX13.4/Ex13_4.sce new file mode 100755 index 000000000..bf866097e --- /dev/null +++ b/1898/CH13/EX13.4/Ex13_4.sce @@ -0,0 +1,31 @@ +clear all; clc; + +disp("Scilab Code Ex 13.4 : ") + +//Given: +E = 70;//GPa +Ix = 61.3*10^-6; +Iy = 23.2*10^-6; +l = 5; +KLx = 2*l; //m +KLy = 0.7*(l); //m +FS = 3; //Factor of safety +sigma_y = 215; //MPa + + +Pcrx = (%pi^2*E*10^6*Ix)/(KLx^2); //Pcr = (%pi^2*EI)/(l^2) +Pcry = (%pi^2*E*10^6*Iy)/(KLy^2); //Pcr = (%pi^2*EI)/(l^2) + +Pcr = min(Pcrx,Pcry); +A = 7.5*10^-3; //mm^2 +P_allow = Pcr/FS; +sigma_cr = (Pcr*10^-3)/A; + + +if(sigma_cr