diff options
Diffstat (limited to '3683/CH18/EX18.1')
| -rw-r--r-- | 3683/CH18/EX18.1/Ex18_1.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/3683/CH18/EX18.1/Ex18_1.sce b/3683/CH18/EX18.1/Ex18_1.sce new file mode 100644 index 000000000..e64a26f30 --- /dev/null +++ b/3683/CH18/EX18.1/Ex18_1.sce @@ -0,0 +1,12 @@ +Pu=3000//in kN
+fck=20//in MPa
+fy=415//in MPa
+l=3//unsupported length, in m
+//assume 1% steel
+Ag=Pu*10^3/(0.4*fck*0.99+0.67*fy*0.01)//in sq mm
+L=sqrt(Ag)//assuming a square column
+L=530//in mm
+Asc=0.01*L^2//in sq mm
+emin=l*10^3/500+L/30//in mm
+ep=0.05*L//>emin, hence OK
+mprintf("Column size - %d x %d mm",L,L)
|