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 /2735/CH12/EX12.2 | |
| 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 '2735/CH12/EX12.2')
| -rwxr-xr-x | 2735/CH12/EX12.2/Ex12_2.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/2735/CH12/EX12.2/Ex12_2.sce b/2735/CH12/EX12.2/Ex12_2.sce new file mode 100755 index 000000000..83e38433a --- /dev/null +++ b/2735/CH12/EX12.2/Ex12_2.sce @@ -0,0 +1,20 @@ +clc
+clear
+//Initialization of variables
+p1=100 //psia
+p2=10 //psia
+n=1.3
+T1=800 //R
+cv=0.172
+R=1.986/29
+T0=537 //R
+cp=0.24
+//calculations
+T2=T1*(p2/p1)^((n-1)/n)
+dwir=cv*(T1-T2)
+dwr=R*(T2-T1)/(1-n)
+dq=dwr-dwir
+dI=-T0*(cp*log(T2/T1) - R*log(p2/p1))
+//results
+printf("The friction of the process per pound of air = %.1f Btu/lbm",dq)
+printf("\n Loss of available energy = %.2f Btu/lbm",dI)
|