blob: 5e32a16e461c1705a322d679d1f08da3d056217b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
//Calculate fraction of load carried by fibres
//Ex:19.3
clc;
clear;
close;
ef=430;//in GPa
e=3.6;//in GPa
m=ef/e;
vf=0.15;//by volume
vm=1-vf;
x=vm/vf;
pf=m;
pc=m+x;
y=pf/pc;
disp(y,"fraction of load carried by fibres (15 % by volume) = ");
vf1=0.65
vm1=1-vf1;
z=vm1/vf1;
pc1=m+z;
zz=pf/pc1;
disp(zz,"fraction of load carried by fibres (65 % by volume) = ")
|
