summaryrefslogtreecommitdiff
path: root/1586/CH17/EX17.7
diff options
context:
space:
mode:
Diffstat (limited to '1586/CH17/EX17.7')
-rw-r--r--1586/CH17/EX17.7/EX17_7.jpgbin0 -> 107942 bytes
-rw-r--r--1586/CH17/EX17.7/EX17_7.sce19
2 files changed, 19 insertions, 0 deletions
diff --git a/1586/CH17/EX17.7/EX17_7.jpg b/1586/CH17/EX17.7/EX17_7.jpg
new file mode 100644
index 000000000..aa4c695d1
--- /dev/null
+++ b/1586/CH17/EX17.7/EX17_7.jpg
Binary files differ
diff --git a/1586/CH17/EX17.7/EX17_7.sce b/1586/CH17/EX17.7/EX17_7.sce
new file mode 100644
index 000000000..21656b1bc
--- /dev/null
+++ b/1586/CH17/EX17.7/EX17_7.sce
@@ -0,0 +1,19 @@
+clc;funcprot(0);//EXAMPLE 17.7
+// Initialisation of Variables
+f1=0.4;...............//Volume fraction of Fiber
+f2=0.6;...............//Volume fraction of Aluminium
+rho1=2.36;...........//Density of Fibers in g/cm^3
+rho2=2.70;...........//Density of Aluminium in g/cm^3
+psi1=55*10^6;..............//Modulus of elasticity of Fiber in psi
+psi2=10*10^6;..............//Modulus of elasticity of Aluminium in psi
+ts1=400000;..............//Tensile strength of fiber in psi
+ts2=5000;..............//Tensile strength of Aluminium in psi
+//Calculations
+rho=(f1*rho1)+(f2*rho2);........//Density of mixture in g/cm^3
+Ec1=(f1*psi1)+(f2*psi2);........//Modulus of elasticity of mixture in psi
+TSc=(f1*ts1)+(f2*ts2);........//Tensile Strength of mixture in psi
+Ec2=1/((f1/psi1)+(f2/psi2));........//Modulus of elasticity perpendicular to fibers in psi
+disp(rho,"Density of mixture in g/cm^3:")
+disp(Ec1,"Modulus of elasticity of mixture in psi:")
+disp(TSc,"Tensile Strength of mixture in psi:")
+disp(Ec2,"Modulus of elasticity perpendicular to fibers in psi:")