diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2705/CH7/EX7.8 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '2705/CH7/EX7.8')
| -rwxr-xr-x | 2705/CH7/EX7.8/Ex7_8.sce | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/2705/CH7/EX7.8/Ex7_8.sce b/2705/CH7/EX7.8/Ex7_8.sce new file mode 100755 index 000000000..711505b0c --- /dev/null +++ b/2705/CH7/EX7.8/Ex7_8.sce @@ -0,0 +1,39 @@ +clear;
+clc;
+disp('Example 7.8');
+
+// aim : To determine
+// the change of entropy
+
+// Given values
+m = .3;// [kg]
+P1 = 350;// [kN/m^2]
+T1 = 273+35;// [K]
+P2 = 700;// [kN/m^2]
+V3 = .2289;// [m^3]
+cp = 1.006;// [kJ/kg K]
+cv = .717;// [kJ/kg K]
+
+// solution
+// for constant volume process
+R = cp-cv;// [kJ/kg K]
+// using PV=mRT
+V1 = m*R*T1/P1;// [m^3]
+
+// for constant volume process P/T=constant,so
+T2 = T1*P2/P1;// [K]
+s21 = m*cv*log(P2/P1);// formula for entropy change for constant volume process
+mprintf('\n The change of entropy in constant volume process is = %f kJ/kg K\n',s21);
+
+// 'For the above part result given in the book is wrong
+
+V2 = V1;
+// for constant pressure process
+T3 = T2*V3/V2;// [K]
+s32 = m*cp*log(V3/V2);// [kJ/kg K]
+
+mprintf('\n The change of entropy in constant pressure process is = %f kJ/kg K\n',s32);
+
+// there is misprint in the book's result
+
+// End
|