summaryrefslogtreecommitdiff
path: root/3392/CH15
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3392/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 '3392/CH15')
-rwxr-xr-x3392/CH15/EX15.2/Ex15_2.sce30
-rwxr-xr-x3392/CH15/EX15.3/Ex15_3.sce18
-rwxr-xr-x3392/CH15/EX15.4/Ex15_4.sce10
-rwxr-xr-x3392/CH15/EX15.5/Ex15_5.sce14
4 files changed, 72 insertions, 0 deletions
diff --git a/3392/CH15/EX15.2/Ex15_2.sce b/3392/CH15/EX15.2/Ex15_2.sce
new file mode 100755
index 000000000..da2f42dbd
--- /dev/null
+++ b/3392/CH15/EX15.2/Ex15_2.sce
@@ -0,0 +1,30 @@
+clc
+// initialization of variables
+clear
+d=250 //mm
+c=30 //mm
+t=25 //mm
+// part (a)
+a=5 //mm
+lambda=a/(2*c)
+f1l=1.22 //from the tble
+f2l=1.02
+//We don't know P yet so say P=1
+P=1
+Sfl=P/(t*2*c)*f1l+3*280*P*f2l/(2*t*c^2)
+K_IC=59*sqrt(1000)
+P=K_IC/(Sfl*sqrt(a*%pi))
+printf('part (a)')
+printf('\n P = %.1f kN',P/10^3)
+// part (b)
+a=10 //mm
+lambda=a/(2*c)
+f1l=1.33 //from the tble
+f2l=1.05
+// We don't know P yet so say P=1
+P=1
+Sfl=P/(t*2*c)*f1l+3*280*P*f2l/(2*t*c^2)
+K_IC=59*sqrt(1000)
+P=K_IC/(Sfl*sqrt(a*%pi))
+printf('\n part (b)')
+printf('\n P = %.1f kN',P/10^3)
diff --git a/3392/CH15/EX15.3/Ex15_3.sce b/3392/CH15/EX15.3/Ex15_3.sce
new file mode 100755
index 000000000..448498624
--- /dev/null
+++ b/3392/CH15/EX15.3/Ex15_3.sce
@@ -0,0 +1,18 @@
+clc
+// initialization of variables
+clear
+a=100/2 //mm
+Y=1500 //MPa
+t=6 //mm
+w=800 //mmm
+c=200 //mm
+a_c=a/c
+fl=1.045
+w=w*10^-3
+t=t*10^-3
+a=a*10^-3
+A=w*t
+Sigma=1/A
+K_I=Sigma*sqrt(%pi*a)*fl
+printf('part (a)')
+printf('\n K_I = %.2f MPa sqrt(m)',K_I)
diff --git a/3392/CH15/EX15.4/Ex15_4.sce b/3392/CH15/EX15.4/Ex15_4.sce
new file mode 100755
index 000000000..e13b27422
--- /dev/null
+++ b/3392/CH15/EX15.4/Ex15_4.sce
@@ -0,0 +1,10 @@
+clc
+// initialization of variables
+clear
+S_u=1300 //MPa
+K_C=69 // MPa sqrt(m)
+SF=2.2
+//calculations
+S_c=S_u/2.2
+a=1/%pi*(K_C/S_c)^2
+printf('a = %.2f mm',a*10^3)
diff --git a/3392/CH15/EX15.5/Ex15_5.sce b/3392/CH15/EX15.5/Ex15_5.sce
new file mode 100755
index 000000000..24b999e04
--- /dev/null
+++ b/3392/CH15/EX15.5/Ex15_5.sce
@@ -0,0 +1,14 @@
+clc
+// initialization of variables
+clear
+// For 30 mm crack
+a=30/2 // mm crack
+S_30 =600 //MPa
+a=a*10^-3
+C=S_30*sqrt(a)
+// For 120 mm crack
+a=120/2
+a=a*10^-3
+S_120=C/sqrt(a)
+printf('Sigma_120 = %d MPa',S_120)
+