1 files changed, 10 insertions, 0 deletions
diff --git a/650/CH3/EX3.9/9.sce b/650/CH3/EX3.9/9.sce
new file mode 100755
index 000000000..2d42012e8
--- /dev/null
+++ b/650/CH3/EX3.9/9.sce
@@ -0,0 +1,10 @@
+clc
+u=0.032; // Ns/m^2
+Re=2000; // maximum value
+Rho=854;
+del_p=150; // N/m^2
+
+d=(32*u^2*Re/(Rho*del_p))^(1/3);
+disp("The maximum inside diameter is found to be ")
+disp(d)
+disp("m")
+\ No newline at end of file