1 files changed, 12 insertions, 0 deletions
diff --git a/1379/CH13/EX13.1.5/example13_5.sce b/1379/CH13/EX13.1.5/example13_5.sce
new file mode 100755
index 000000000..38c8f8017
--- /dev/null
+++ b/1379/CH13/EX13.1.5/example13_5.sce
@@ -0,0 +1,12 @@
+
+
+//exapple 13.5 
+clc; funcprot(0);
+// Initialization of Variable
+rhoc=867;//density of cream
+rhom=1034;//density of skimmem milk
+rm=78.2/1000;//radius of skimmed milk
+rc=65.5/1000;//radius of cream
+//calculation
+r=sqrt((rhom*rm^2-rhoc*rc^2)/(rhom-rhoc));
+disp(r,"distance of xis of rotation of cream milk interface in (m):")