diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1793/CH10/EX10.1 | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '1793/CH10/EX10.1')
-rwxr-xr-x | 1793/CH10/EX10.1/10q1.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/1793/CH10/EX10.1/10q1.sce b/1793/CH10/EX10.1/10q1.sce new file mode 100755 index 000000000..81acaf8c5 --- /dev/null +++ b/1793/CH10/EX10.1/10q1.sce @@ -0,0 +1,16 @@ +clc
+//initialisation of variables
+sx= 2000 //lb/ft^3
+sy= 2500 //lb/ft^3
+T= 800 //lb/ft^3
+t= 0.348//radians
+//calculations
+s1= (sx+sy)/2+sqrt(((sy-sx)/2)^2+T^2)
+s2= (sx+sy)/2-sqrt(((sy-sx)/2)^2+T^2)
+sn= (sx+sy)/2+(sy-sx)*cos(2*t)/2-T*sin(2*t)
+Tn= (sy-sx)*sin(2*t)/2+T*cos(2*t)
+//results
+printf ('principle stress s1 = % 2f lb/ft^3 ',s1)
+printf ('principle stress s2 = % 2f lb/ft^3 ',s2)
+printf ('normal stress = % 2f lb/ft^3 ',sn)
+printf ('shear stress = % 2f lb/ft^3 ',Tn)
|