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 /3456/CH7 | |
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 '3456/CH7')
-rw-r--r-- | 3456/CH7/EX7.1/Ex7_1.sce | 14 | ||||
-rw-r--r-- | 3456/CH7/EX7.2/Ex7_2.sce | 13 |
2 files changed, 27 insertions, 0 deletions
diff --git a/3456/CH7/EX7.1/Ex7_1.sce b/3456/CH7/EX7.1/Ex7_1.sce new file mode 100644 index 000000000..a29a42303 --- /dev/null +++ b/3456/CH7/EX7.1/Ex7_1.sce @@ -0,0 +1,14 @@ +//Example 7.1
+//Cohesive Strength
+//Page No. 245
+clc;clear;close;
+
+E=95; //in GPa
+E=E*10^9; //conversion to Pa
+Ys=1000; //erg/cm^2
+Ys=Ys*10^-3; //conversion to J/m^2
+a0=1.6; //in angstrom
+a0=a0*10^-10; //conversion to m
+sigma_max=(E*Ys/a0)^(1/2)
+sigma_max=sigma_max*10^-9;
+printf('Cohesive strength of a silica fiber = %g GPa',sigma_max);
diff --git a/3456/CH7/EX7.2/Ex7_2.sce b/3456/CH7/EX7.2/Ex7_2.sce new file mode 100644 index 000000000..3128075ab --- /dev/null +++ b/3456/CH7/EX7.2/Ex7_2.sce @@ -0,0 +1,13 @@ +//Example 7.2
+//Fracture Stress
+//Page No. 246
+clc;clear;close;
+
+E=100; //in GPa
+E=E*10^9; //conversion to Pa
+Ys=1; //J/m^2
+a0=2.5*10^-10; //in m
+c=10^4*a0;
+sigma_f=(E*Ys/(4*c))^(1/2);
+sigma_f=sigma_f*10^-6;
+printf('Fracture Stress = %g MPa',sigma_f);
|