diff options
Diffstat (limited to '3843/CH10/EX10.8/Ex10_8.sce')
| -rw-r--r-- | 3843/CH10/EX10.8/Ex10_8.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3843/CH10/EX10.8/Ex10_8.sce b/3843/CH10/EX10.8/Ex10_8.sce new file mode 100644 index 000000000..a1ddb349b --- /dev/null +++ b/3843/CH10/EX10.8/Ex10_8.sce @@ -0,0 +1,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);
|