1 files changed, 21 insertions, 0 deletions
diff --git a/1379/CH13/EX13.1.1/example13_1.sce b/1379/CH13/EX13.1.1/example13_1.sce
new file mode 100755
index 000000000..10805776a
--- /dev/null
+++ b/1379/CH13/EX13.1.1/example13_1.sce
@@ -0,0 +1,21 @@
+
+
+//exapple 13.1 
+clc; funcprot(0);
+// Initialization of Variable
+rho=998;
+g=9.81;
+pi=3.1428;
+omega=2*pi*1055/60;//angular rotation
+r=2.55/100//radius outer
+ld=1.55/100;//liq. depth
+l=10.25/100;
+//calculation
+//part1
+a=r*omega^2/g;
+disp(a,"ratio of cetrifugal force & gravitational force is:");
+//part2
+ri=r-ld;//radius internal
+V=pi*(r^2-ri^2)*l;
+sigma=(omega^2*V)/(g*log(r/ri));
+disp(sigma,"equivalent to gravity settling tank of crossectional area of in (m^2):")