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 /1472/CH14/EX14.3.a | |
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 '1472/CH14/EX14.3.a')
-rwxr-xr-x | 1472/CH14/EX14.3.a/14_3.sce | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/1472/CH14/EX14.3.a/14_3.sce b/1472/CH14/EX14.3.a/14_3.sce new file mode 100755 index 000000000..50b7bf3d4 --- /dev/null +++ b/1472/CH14/EX14.3.a/14_3.sce @@ -0,0 +1,32 @@ +clc
+//initialization of varaibles
+P1=200 //psia
+P2=1 //psia
+e=0.7
+//calculations
+h1=1198.4
+h2s=863.5
+h3r=69.7
+h4r=70.3
+h3c=300.7
+h4c=355.4
+disp("For Rankine cycle, ")
+Wtr=h1-h2s
+Q1r=h1-h4r
+Wpr=h4r-h3r
+Wnetr=Wtr-Wpr
+eta1=(Wtr-Wpr)/Q1r
+wr=2545/Wtr
+printf("Back work = %.1f B/lb",Wnetr)
+printf("\n Efficiency = %.3f ",eta1)
+printf("\n Steam rate = %.1f lb/hp hr",wr)
+disp("For carnot cycle,")
+Wtc=h1-h2s
+Q1c=h1-h4c
+Wpc=h4c-h3c
+Wnetc=Wtc-Wpc
+eta2=(Wtc-Wpc)/Q1c
+wc=9.1
+printf("Back work = %.1f B/lb",Wnetc)
+printf("\n Efficiency = %.3f ",eta2)
+printf("\n Steam rate = %.1f lb/hp hr",wc)
|