summaryrefslogtreecommitdiff
path: root/1586/CH6/EX6.6/EXP6_6.sce
diff options
context:
space:
mode:
Diffstat (limited to '1586/CH6/EX6.6/EXP6_6.sce')
-rw-r--r--1586/CH6/EX6.6/EXP6_6.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/1586/CH6/EX6.6/EXP6_6.sce b/1586/CH6/EX6.6/EXP6_6.sce
new file mode 100644
index 000000000..1ba52c4e8
--- /dev/null
+++ b/1586/CH6/EX6.6/EXP6_6.sce
@@ -0,0 +1,12 @@
+clc;funcprot(0);//EXAMPLE 6.6
+// Initialisation of Variables
+Fs=45000;.......//The flexural strength of a composite material in psi
+Fm=18*10^6;........//The flexural modulus of composite material in psi
+w=0.5;.......//wide of sample in in
+h=0.375;......//Height of sample in in
+l=5;..........//Length of sample in in
+//CALCULATIONS
+F=Fs*2*w*h^2/(3*l);......//The force required to fracture the material in lb
+delta=(l^3)*F/(Fm*4*w*h^3);.......//The deflection of the sample at fracture
+disp(F,"The force required to fracture the material in lb:")
+disp(delta,"The deflection of the sample at fracture in in")