summaryrefslogtreecommitdiff
path: root/3720/CH6/EX6.1/Ex6_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3720/CH6/EX6.1/Ex6_1.sce')
-rw-r--r--3720/CH6/EX6.1/Ex6_1.sce9
1 files changed, 9 insertions, 0 deletions
diff --git a/3720/CH6/EX6.1/Ex6_1.sce b/3720/CH6/EX6.1/Ex6_1.sce
new file mode 100644
index 000000000..66162e627
--- /dev/null
+++ b/3720/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,9 @@
+//Example 6_1
+clc;clear;
+// Given values
+y_0=0;// Lower limit of the integral
+y_1=1;// Upper limit of the integral
+
+// Analysis
+b=-4*integrate('(y^2)','y',y_1,y_0);
+printf("The momentum-flux correction factor for fully developed laminar flow becomes %0.2f \n",b);