summaryrefslogtreecommitdiff
path: root/2120/CH9/EX9.3/ex9_3.sce
blob: 2d21a203611e4d6288840d708a6d285accf9598f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
// Exa 9.3
clc;
clear;
close;
// Given data
H2 = 3055;// in kj per kg
H3 = 2550;// in kj per kg
fie_1 = 7.15;// kj per kg k
fie_2 = 7.57;// kj per kg k
d_fie= fie_2 - fie_1;// in kj per kg k
disp(d_fie,"Change in entropy during throttling process in kJ/kg-K is :");
dH = H2 - H3;// in kj per kg
disp(dH,"Change in enthalpy during isentropic process in kJ/kg is : ");