diff options
Diffstat (limited to '1793/CH13/EX13.7')
| -rwxr-xr-x | 1793/CH13/EX13.7/13_7.sce | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/1793/CH13/EX13.7/13_7.sce b/1793/CH13/EX13.7/13_7.sce new file mode 100755 index 000000000..829e37475 --- /dev/null +++ b/1793/CH13/EX13.7/13_7.sce @@ -0,0 +1,10 @@ +clc
+c=30
+b=15
+a=10
+Ka=0.3872 // from table 13.8
+H=4
+G=15
+Pa=G*H^2*Ka/2
+printf('The active force per unit length Pa = %f kN/m\n',Pa)
+printf(' The resultant will act at a vertical distance equal to H/3 = 4/3 = 1.33 m above \n the bottom of the wall and will be inclined at an angle of 15to the back face of the wall.')
|