1 files changed, 11 insertions, 0 deletions
diff --git a/1052/CH18/EX18.1/181.sce b/1052/CH18/EX18.1/181.sce
new file mode 100755
index 000000000..a6bd74c8b
--- /dev/null
+++ b/1052/CH18/EX18.1/181.sce
@@ -0,0 +1,11 @@
+clc;
+//Example 18.1
+//page no 225
+printf("\n Example 18.1 page no 225\n\n");
+//there is a sudden expansion in which the diameter D1 doubls to D2,D2=2D1
+//if D1=1 then D2=2
+D1=1//diameter D1
+D2=2//diameter D2
+K_se=[1-(D1/D2)^2]^2// coefficent of sudden expansion 
+printf("\n K_se coeff. of sudden expansion=%f ",K_se);
+