initial commit / add all books

1 files changed, 21 insertions, 0 deletions

diff --git a/3683/CH2/EX2.6/Ex2_6.sce b/3683/CH2/EX2.6/Ex2_6.sce
new file mode 100644
index 000000000..2d03a7e73
--- /dev/null
+++ b/3683/CH2/EX2.6/Ex2_6.sce
@@ -0,0 +1,21 @@
+b=200//width, in mm

+D=480//overall depth, in mm

+Ast=4*0.785*25^2//four 25 mm dia bars on tension side, in sq mm

+Asc=3*0.785*22^2//three 22 mm dia bars on compression side, in sq mm

+bottom_cover=30//in mm

+top_cover=30//in mm

+d=D-bottom_cover//effective depth, in mm

+m=18.66//modular ratio

+M=100*10^6//in N-mm

+//to find x using b(x^2)/2 + (1.5m-1)Asc(x-d')=mAst(d-x), which becomes of the form px^2+qx+r=0

+p=b/2

+q=(1.5*m-1)*Asc+m*Ast

+r=-(1.5*m-1)*Asc*top_cover-m*Ast*d

+x=(-q+sqrt(q^2-4*p*r))/(2*p)//in mm

+//sigma_cbc_dash=sigma_cbc*(x-d')/x=a*sigma_cbc

+a=(x-top_cover)/x

+sigma_cbc=M/(b*x*(d-x/3)/2+(1.5*m-1)*Asc*a*(d-top_cover))//in MPa

+sigma_st=m*sigma_cbc*(d-x)/x//in MPa

+sigma_cbc_dash=a*sigma_cbc//in MPa

+sigma_sc=1.5*m*sigma_cbc_dash//in MPa

+mprintf("Stress in concrete=%f N/mm^2\nStress in tension steel=%f N/mm^2\nStress in compression steel=%f N/mm^2",sigma_cbc,sigma_st,sigma_sc)