summaryrefslogtreecommitdiff
path: root/3257/CH11/EX11.3
diff options
context:
space:
mode:
Diffstat (limited to '3257/CH11/EX11.3')
-rwxr-xr-x3257/CH11/EX11.3/Ex11_3.sce16
-rwxr-xr-x3257/CH11/EX11.3/Ex11_3.txt7
2 files changed, 23 insertions, 0 deletions
diff --git a/3257/CH11/EX11.3/Ex11_3.sce b/3257/CH11/EX11.3/Ex11_3.sce
new file mode 100755
index 000000000..6dae7da46
--- /dev/null
+++ b/3257/CH11/EX11.3/Ex11_3.sce
@@ -0,0 +1,16 @@
+// Pressure decay in composition
+clc
+k = 0.6 // given constant
+mu = 0.4// given constant
+d = 10 // diameter in mm
+px = 0 // pressure measure in N/mm^2
+px_p0 = 0.5 // pressure ratio
+printf("\n Example 11.3")
+printf("\n\n Part A:")
+if px==0 then // no function deals with the calculation for an infinite number so if statement is used here
+ printf("\n Value of X must approach infinity for pressure to decay to zero.")
+end
+
+printf("\n Part B:")
+X = - log(px_p0)/(4*k*mu/d)
+printf("\n Value of X, required to get pressure to decay to %.1f is %.2f mm. ",px_p0,X)
diff --git a/3257/CH11/EX11.3/Ex11_3.txt b/3257/CH11/EX11.3/Ex11_3.txt
new file mode 100755
index 000000000..cf02843e3
--- /dev/null
+++ b/3257/CH11/EX11.3/Ex11_3.txt
@@ -0,0 +1,7 @@
+
+ Example 11.3
+
+ Part A:
+ Value of X must approach infinity for pressure to decay to zero.
+ Part B:
+ Value of X, required to get pressure to decay to 0.5 is 7.22 mm. \ No newline at end of file