diff options
Diffstat (limited to '3557/CH14/EX14.9/Ex14_9.sce')
-rw-r--r-- | 3557/CH14/EX14.9/Ex14_9.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3557/CH14/EX14.9/Ex14_9.sce b/3557/CH14/EX14.9/Ex14_9.sce new file mode 100644 index 000000000..cda4b6cdd --- /dev/null +++ b/3557/CH14/EX14.9/Ex14_9.sce @@ -0,0 +1,14 @@ +//Example 14.9//
+
+vm=(1.000-0.733);// volume fractions of matrix //(The values of vm are taken from table 14.10 and 14.11)
+Em=6.9*10^3;//MPa //polymeric matrix modulus
+vf=0.733;//volume fractions of fibers // (The values of vf are taken from table 14.10 and 14.11)
+Ef=72.4*10^3;//MPa//E- glass -reinforced epoxy
+Ec=(vm*Em)+(vf*Ef)
+mprintf("Ec = %e MPa",Ec)
+//for this case Ec=56*10^3 MPa or
+a=56;//Mpa(The values are from table 14.12)
+b=54.9;//(The values are taken from table 14.12)
+e=((a-b)/a)*100
+mprintf("\n e = %f percent",e)
+mprintf("\n The calculated value comes within 2 percent of the measured value" )
|