summaryrefslogtreecommitdiff
path: root/1985/CH15
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1985/CH15
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1985/CH15')
-rwxr-xr-x1985/CH15/EX15.1/Chapter15_example1.sce11
-rwxr-xr-x1985/CH15/EX15.2/Chapter15_example2.sce11
2 files changed, 22 insertions, 0 deletions
diff --git a/1985/CH15/EX15.1/Chapter15_example1.sce b/1985/CH15/EX15.1/Chapter15_example1.sce
new file mode 100755
index 000000000..9fdad6918
--- /dev/null
+++ b/1985/CH15/EX15.1/Chapter15_example1.sce
@@ -0,0 +1,11 @@
+clc
+clear
+//Input data
+d=10*10^8//Difference between the principal stress in N/m^2
+c=(1*10^-12)//Stress-optic coefficient in m^2/N
+
+//Calculations
+N=(c*d)//Difference between the refractive indices
+
+//Output
+printf('The difference between the refractive indices along the principal stresses is %3.3f',N)
diff --git a/1985/CH15/EX15.2/Chapter15_example2.sce b/1985/CH15/EX15.2/Chapter15_example2.sce
new file mode 100755
index 000000000..7991e3b42
--- /dev/null
+++ b/1985/CH15/EX15.2/Chapter15_example2.sce
@@ -0,0 +1,11 @@
+clc
+clear
+//Input data
+s1=(405*10^6)//Principal stress in N/m^2
+s2=(-105*10^6)//Principal stress in N/m^2
+
+//Calculations
+tmax=((s1-s2)/2)/10^6//Maximum shearing stress in N/m^2 *10^6
+
+//Output
+printf('The maximum shearing stress is %3.0f*10^6 N/m^2',tmax)