diff options
Diffstat (limited to '3685/CH5/EX5.8/Ex5_8.sce')
| -rw-r--r-- | 3685/CH5/EX5.8/Ex5_8.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/3685/CH5/EX5.8/Ex5_8.sce b/3685/CH5/EX5.8/Ex5_8.sce new file mode 100644 index 000000000..08c9d1c09 --- /dev/null +++ b/3685/CH5/EX5.8/Ex5_8.sce @@ -0,0 +1,19 @@ +clc
+// Given that
+V = 0.12 // Volume of tank in m^3
+p = 1 // Pressure in MPa
+T = 150 // Temperature in degree centigrade
+P = 0.1 // Power to peddle wheel in kW
+printf("\n Example 5.8")
+u0 = 0.718*273 // Internal energy at 0 degree Celsius
+// Function for internal energy of gas
+t=poly(0,"t")
+u = u0+(0.718*t)
+pv = 0.287*(273+t)
+U=horner(u,T)
+PV = horner(pv,T)
+hp = U+PV // At 150 degree centigrade
+m_a = P/hp
+printf("\n The rate at which air flows out of the tank is %f kg/h",m_a*3600)
+//The answers vary due to round off error
+
|