diff options
Diffstat (limited to '1586/CH17/EX17.8/EX17_8.sce')
| -rw-r--r-- | 1586/CH17/EX17.8/EX17_8.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/1586/CH17/EX17.8/EX17_8.sce b/1586/CH17/EX17.8/EX17_8.sce new file mode 100644 index 000000000..dd77a5718 --- /dev/null +++ b/1586/CH17/EX17.8/EX17_8.sce @@ -0,0 +1,11 @@ +clc;funcprot(0);//EXAMPLE 17.8
+// Initialisation of Variables
+psi1=10.5*10^6;..............//Modulus of elasticity of Glass in psi
+psi2=0.4*10^6;..............//Modulus of elasticity of Nylon in psi
+a1=0.3;.....................//area of glass in cm^3
+a2=0.7;.....................//area of Nylon in cm^3
+//Calculations
+psi=psi1/psi2;..............//Fraction of elasticity
+fo=a1/(a1+(a2*(1/psi)));..........//Fraction of applied force carried by Glass fiber
+disp(fo,"Fraction of applied force carried by Glass fiber :")
+printf(" Almost all of the load is carried by the glass fibers.")
|