summaryrefslogtreecommitdiff
path: root/1808/CH6/EX6.13/Chapter6_Exampl13.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1808/CH6/EX6.13/Chapter6_Exampl13.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '1808/CH6/EX6.13/Chapter6_Exampl13.sce')
-rw-r--r--1808/CH6/EX6.13/Chapter6_Exampl13.sce40
1 files changed, 40 insertions, 0 deletions
diff --git a/1808/CH6/EX6.13/Chapter6_Exampl13.sce b/1808/CH6/EX6.13/Chapter6_Exampl13.sce
new file mode 100644
index 000000000..54bee5b1a
--- /dev/null
+++ b/1808/CH6/EX6.13/Chapter6_Exampl13.sce
@@ -0,0 +1,40 @@
+clc
+clear
+//INPUT DATA
+cpv=2.805;//specific pressure in kJ/kg K
+cp1=4.606;//specific pressure in kJ/kg K
+p1=10.01;//pressure in MPa
+p2=1.2;//pressure in MPa
+hf1=298.9;//enthalpy in kJ/kg
+hf2=44.7;//enthalpy in kJ/kg
+hg1=1466;//enthalpy in kJ/kg
+hg2=1406;//enthalpy in kJ/kg
+sf1=1.124;//entropy in kJ/kgK
+sf2=0.188;//entropy in kJ/kgK
+sg1=5.039;//entropy in kJ/kgK
+sg2=5.785;//entropy in kJ/kgK
+vf1=0.128;//volume in m^3/kg
+vf2=0.963;//volume in m^3/kg
+t1=253;//temperature in K
+t11=243.42;//temperature in K
+t21=298;//temperature in K
+t2=404.78;//temperature in K
+t3=293;//temperature in K
+
+//CALCULATIONS
+s1=sg2+cpv*log(t1/t11);//entropy in kJ/kg K
+h1=hg2+cpv*(t1-t11);//enthalpy in kJ/kg
+h2=hg1+cpv*(t2-t21);//enthalpy in kJ/kg
+h3=hf1+cp1*(t21-t3);//enthalpy in kJ/kg
+cop=((h1-h3)/(h2-h1));//COP of the system
+P=1.5*210/(cop*60);//Power of the motor in kW
+
+//OUTPUT
+printf('(a)COP is %3.2f \n (b)Power of the motor is %3.3f kW',cop,P)
+
+
+
+
+
+
+