diff options
author | prashantsinalkar | 2018-02-03 11:01:52 +0530 |
---|---|---|
committer | prashantsinalkar | 2018-02-03 11:01:52 +0530 |
commit | 7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch) | |
tree | 449d555969bfd7befe906877abab098c6e63a0e8 /3864/CH7/EX7.9/Ex7_9.sce | |
parent | d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff) | |
download | Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.tar.gz Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.tar.bz2 Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.zip |
Diffstat (limited to '3864/CH7/EX7.9/Ex7_9.sce')
-rw-r--r-- | 3864/CH7/EX7.9/Ex7_9.sce | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/3864/CH7/EX7.9/Ex7_9.sce b/3864/CH7/EX7.9/Ex7_9.sce new file mode 100644 index 000000000..d272a4ebd --- /dev/null +++ b/3864/CH7/EX7.9/Ex7_9.sce @@ -0,0 +1,42 @@ +clear +// +// +// + +//Initilization of Variables + +//stresses +p_x=-40 //N/mm**2 +p_y=80 //N/mm**2 + +q=48 //N/mm**2 //shear stress + +//Calculations + +//Max shear stress +q_max=((((p_x-p_y)*2**-1)**2)+q**2)**0.5 //N/mm**2 + +//Inclination of principal stress to plane +theta=atan(2*q*(p_x-p_y)**-1)*(180*%pi**-1)//Degrees +theta2=(theta)*2**-1 //degrees + +theta3=(theta+180)*2**-1 //degrees + +//Normal Corresponding stress +p_n=(p_x+p_y)*2**-1+(p_x-p_y)*2**-1*cos(2*(theta2+45)*%pi*180**-1)+q*sin(2*(theta2+45)*%pi*180**-1) //Degrees + +//Resultant stress +p=((p_n**2+q_max**2)**0.5) //N/mm**2 + +phi=atan(p_n*q_max**-1)*(180*%pi**-1) //Degrees + +//Inclination to the plane +alpha=((theta2+45))+(phi )//Degree + + +//Answer in book is incorrect of alpha ie41.25 + +//Result +printf("\n Planes of max shear stress: %0.2f N/mm**2",p_n) +printf("\n %0.2f N/mm*2",q_max) +printf("\n Resultant Stress is %0.2f N/mm**2",p) |