diff options
Diffstat (limited to '3831/CH9/EX9.11')
| -rw-r--r-- | 3831/CH9/EX9.11/Ex9_11.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/3831/CH9/EX9.11/Ex9_11.sce b/3831/CH9/EX9.11/Ex9_11.sce new file mode 100644 index 000000000..86c027d95 --- /dev/null +++ b/3831/CH9/EX9.11/Ex9_11.sce @@ -0,0 +1,11 @@ +// Example 9_11
+clc;funcprot(0);
+// Given data
+mu=10.1*10^-3;// The viscosity of the water in kg/(m.s)
+L=10.0;// The length of the pipe in m
+V_m=0.500;// The maximum velocity of the fluid in m/s
+T=20.0;// °C
+
+// Solution
+S_pW=(2*%pi*mu*L*V_m^2)/(T+273.15);// The entropy production rate in W/K
+printf('\nThe entropy production rate,(S_p)_W=%1.3e W/K',S_pW);
|