diff options
Diffstat (limited to '3020/CH9')
-rwxr-xr-x | 3020/CH9/EX9.1/ex9_1.sce | 6 | ||||
-rwxr-xr-x | 3020/CH9/EX9.2/ex9_2.sce | 6 |
2 files changed, 12 insertions, 0 deletions
diff --git a/3020/CH9/EX9.1/ex9_1.sce b/3020/CH9/EX9.1/ex9_1.sce new file mode 100755 index 000000000..ebfc47ad6 --- /dev/null +++ b/3020/CH9/EX9.1/ex9_1.sce @@ -0,0 +1,6 @@ +clc;
+clear all;
+deltas = 10e8; // Difference between principal stress in newton per square meters
+c = 1e-12; // The stress optic coefficient in squared meters per newton
+N = c*deltas;
+disp('',N,'The difference between the refractive indices along with the principal stresses is')
diff --git a/3020/CH9/EX9.2/ex9_2.sce b/3020/CH9/EX9.2/ex9_2.sce new file mode 100755 index 000000000..a988507cc --- /dev/null +++ b/3020/CH9/EX9.2/ex9_2.sce @@ -0,0 +1,6 @@ +clc;
+clear all;
+sigma1 = 405e6; // Principal stress in newton per square meters
+sigma2 = -105e6; // Principal stress in newton per square meters
+Tmax = (sigma1-sigma2)/2;
+disp('N/m^2',Tmax,'The maximum shearing stress is')
|