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 /551/CH14/EX14.10 | |
| 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 '551/CH14/EX14.10')
| -rwxr-xr-x | 551/CH14/EX14.10/10.sce | 48 |
1 files changed, 48 insertions, 0 deletions
diff --git a/551/CH14/EX14.10/10.sce b/551/CH14/EX14.10/10.sce new file mode 100755 index 000000000..cd9106b66 --- /dev/null +++ b/551/CH14/EX14.10/10.sce @@ -0,0 +1,48 @@ +clc
+p1=1000; //kPa
+p2=100; //kPa
+p4=p1;
+p3=p2;
+E=2000; // Refrigerating effect produced in kJ/min
+T3=268; //K
+T1=303; //K
+y=1.4;
+
+disp("(i) Mass of air circulated per minute")
+T2=T1*(p2/p1)^((y-1)/y);
+e=cp*(T3-T2); //Refrigerating effect per kg; kJ/kg
+
+m=E/e;
+disp("m=")
+disp(m)
+disp("kg/min")
+
+
+disp("(ii) Compressor work (Wcomp.), expander work (Wexp.) and cycle work (Wcycle)")
+T4=T3*(p4/p3)^((y-1)/y);
+
+Wcomp=y/(y-1)*m*R*(T4-T3);
+disp("Compressor work =")
+disp(Wcomp)
+disp("kJ/min")
+
+Wexp=y/(y-1)*m*R*(T1-T2);
+disp("Expander work =")
+disp(Wexp)
+disp("kJ/min")
+
+W_cycle=Wcomp-Wexp;
+disp("Wcycle=")
+disp(W_cycle)
+disp("kJ/min")
+
+
+disp("(iii) C.O.P. and power required")
+COP=E/W_cycle;
+disp("COP =")
+disp(COP)
+
+P=W_cycle/60;
+disp("Power required =")
+disp(P)
+disp("kW")
\ No newline at end of file |