diff options
Diffstat (limited to '3831/CH19/EX19.4/Ex19_4.sce')
-rw-r--r-- | 3831/CH19/EX19.4/Ex19_4.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/3831/CH19/EX19.4/Ex19_4.sce b/3831/CH19/EX19.4/Ex19_4.sce new file mode 100644 index 000000000..7b33c8310 --- /dev/null +++ b/3831/CH19/EX19.4/Ex19_4.sce @@ -0,0 +1,12 @@ +// Example 19_4
+clc;funcprot(0);
+// Given data
+mu=1.50*10^-5;// The viscosity of the CO_2 in kg/(m.s)
+T_1=300;// K
+T_2=305;// K
+k_p=1.00*10^-6;// m^2
+k_o=2.00*10^4;// The osmotic heat conductivity in m^2/s
+
+// Solution
+dp=-((mu*k_o)/k_p)*log(T_2/T_1);// N/m^2
+printf('\nThe steady state thermomolecular pressure difference across the membrane,p_2-p_1=%4.0f N/m^2',dp);
|