blob: a1ddb349b2777851da0f6b28d5381b9f2993e913 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
// Example 10_8
clc;funcprot(0);
// Given data
m=10;// kg
P_1=100;// The initial pressure in kPa
P_2=50;// The final pressure in MPa
beta=5*10^-5;// K^-1
rho=8770;// kg/m^3
// Calculation
// ds=s_2-s_1;
ds=-(1/rho)*beta*[(P_2-(P_1/10^3))*10^6];// J/kg.K
printf("\nThe entropy change,s_2-s_1=%0.3f J/kg.K",ds);
|
