summaryrefslogtreecommitdiff
path: root/2507/CH5/EX5.5/Ex5_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '2507/CH5/EX5.5/Ex5_5.sce')
-rwxr-xr-x2507/CH5/EX5.5/Ex5_5.sce16
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)