diff options
Diffstat (limited to '2507/CH5/EX5.5/Ex5_5.sce')
-rwxr-xr-x | 2507/CH5/EX5.5/Ex5_5.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/2507/CH5/EX5.5/Ex5_5.sce b/2507/CH5/EX5.5/Ex5_5.sce new file mode 100755 index 000000000..06f910160 --- /dev/null +++ b/2507/CH5/EX5.5/Ex5_5.sce @@ -0,0 +1,16 @@ +clc
+clear
+printf("Example 5.5 | Page number 125 \n\n");
+//Find air temperature after throttling
+
+//Given Data
+p1 = 10//bar //inlet pressure
+t1 = 300 //°C //inlet temperature
+
+p2 = 0.1 //bar //exit pressure
+Cp = 1 //kJ/kgK // heat capacity at constant pressure
+//Solution
+//Adiabatic process
+delta_h = 0 //change in enthalpy
+t2 = delta_h/Cp + t1
+printf("Temperature of air after throttling = %.1f °C",t1)
|