diff options
Diffstat (limited to '3685/CH4/EX4.5/Ex4_5.sce')
| -rw-r--r-- | 3685/CH4/EX4.5/Ex4_5.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/3685/CH4/EX4.5/Ex4_5.sce b/3685/CH4/EX4.5/Ex4_5.sce new file mode 100644 index 000000000..70775eda9 --- /dev/null +++ b/3685/CH4/EX4.5/Ex4_5.sce @@ -0,0 +1,21 @@ +clc
+V1 = 0.03 // initial volume in m^3
+P1 = 170 // Initial pressure in kPa
+P2 = 400 // Final pressure in kPa
+V2 = 0.06 // Final volume in m^3
+U = 3.15*(P2*V2-P1*V1) // internal energy in kJ
+B = [P1 P2]'
+A = [1 V1 ; 1 V2]
+x = inv(A)*B
+a = x(1) ; b = x(2)
+function P=pressure(V)
+ P = a+b*V
+endfunction
+W = intg(V1,V2,pressure)
+Q = U+W // heat flow into the system in kJ
+
+printf("\n Example 4.5")
+printf("\n The work done by the system is %f kJ",W)
+printf("\n The heat flow into the system is %f kJ",Q)
+
+
|