summaryrefslogtreecommitdiff
path: root/172/CH8/EX8.6/ex6.sce
diff options
context:
space:
mode:
Diffstat (limited to '172/CH8/EX8.6/ex6.sce')
-rwxr-xr-x172/CH8/EX8.6/ex6.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/172/CH8/EX8.6/ex6.sce b/172/CH8/EX8.6/ex6.sce
new file mode 100755
index 000000000..ebfbe454d
--- /dev/null
+++ b/172/CH8/EX8.6/ex6.sce
@@ -0,0 +1,17 @@
+//example 6
+//work done by air
+clear
+clc
+T1=600 //initial temperature of air in K
+P1=400 //intial pressure of air in kPa
+P2=150 //final pressure in kPa
+u1=435.10 //specific internal energy at temperature T1 in kJ/kg
+sT1=7.5764 //specific entropy at temperature T1 in kJ/kg-K
+R=0.287 //gas constant in kJ/kg-K
+ds=0
+sT2=ds+sT1+R*log(P2/P1) //specific entropy at temperature T2 in kJ/kg-K
+disp('we know the values of s and P for state 2.So,in order to fully determine the state,we will use steam table')
+T2=457 //final temperature in K
+u2=328.14 //specific internal energy at temperature T2 in kJ/kg
+w=u1-u2 //work done by air in kJ/kg
+printf("\n hence,work done by air is w=%.2f kJ/kg.\n",w) \ No newline at end of file