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 --- 3289/CH8/EX8.1/Ex8_1.sce | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100755 3289/CH8/EX8.1/Ex8_1.sce (limited to '3289/CH8/EX8.1/Ex8_1.sce') diff --git a/3289/CH8/EX8.1/Ex8_1.sce b/3289/CH8/EX8.1/Ex8_1.sce new file mode 100755 index 000000000..c5999edcf --- /dev/null +++ b/3289/CH8/EX8.1/Ex8_1.sce @@ -0,0 +1,29 @@ +clc + +di=0.3 //m +de=0.4 //m +v=0.3 +sigmathetamax=250*10^6 //Pa +p0=0 +pi=0 + +//solution a: +a=0.15 +b=0.2 +r=a +//sigmathetamax=pi*((b^2+a^2)/(b^2-a^2)) +pi=sigmathetamax*((b^2-a^2)/(b^2+a^2)) +disp(pi,"in Pa is= ") + +//solution b: +r=a +//sigmathetamax=-2*p0*(b^2/(b^2-a^2)) +p0=-(-sigmathetamax)*((b^2-a^2)/(2*b^2)) +disp(p0,"in Pa is= ") + +//solution c: +u=((a^3*pi)/(b^2-a^2))*(0.7+1.3*(b^2/a^2)) +disp(u,"in per E meter is= ") +sigmaz=(pi*a^2-p0*b^2)/(b^2-a^2) +disp(sigmaz,"for longitudinal stress is") + -- cgit