summaryrefslogtreecommitdiff
path: root/1586/CH4/EX4.8
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1586/CH4/EX4.8
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 '1586/CH4/EX4.8')
-rw-r--r--1586/CH4/EX4.8/EXP4_8.jpgbin0 -> 141801 bytes
-rw-r--r--1586/CH4/EX4.8/EXP4_8.sce12
2 files changed, 12 insertions, 0 deletions
diff --git a/1586/CH4/EX4.8/EXP4_8.jpg b/1586/CH4/EX4.8/EXP4_8.jpg
new file mode 100644
index 000000000..164dbdfa9
--- /dev/null
+++ b/1586/CH4/EX4.8/EXP4_8.jpg
Binary files differ
diff --git a/1586/CH4/EX4.8/EXP4_8.sce b/1586/CH4/EX4.8/EXP4_8.sce
new file mode 100644
index 000000000..3eeac93e6
--- /dev/null
+++ b/1586/CH4/EX4.8/EXP4_8.sce
@@ -0,0 +1,12 @@
+clc;funcprot(0);//EXAMPLE 4.8
+// Initialisation of Variables
+U=[0 0 1];.......//Tensile stree direction in [001] plane
+V1=[0 -1 1];......//Tensile stree direction of slip direction in [0-11] plane
+V2=[1 1 1];......//Tensile stree direction of slip plane normal to[011] plane
+rho1=3000;.......//Tensile stress of crystal in psi
+lam=acos((U*V1')/(norm(U)*norm(V1)));.......//The angle between the tensile stress direction [001] and the slip direction [0-11] from the dot product
+phy=acos((U*V2')/(norm(U)*norm(V2)));......//The angle between the tensile stress direction [001] and normal to the slip plane [111]
+rho=rho1*(cos(lam)*cos(phy));....//The resolved Shear stess in psi
+disp(lam*(180/%pi),"The angle between the tensile stress direction [001] and the slip direction [0-11]:")
+disp(phy*(180/%pi),"The angle between the tensile stress direction [001] and normal to the slip plane [111]:")
+disp(rho,"The resolved Shear stess in psi:")