diff options
author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1808/CH6/EX6.7/Chapter6_Exampl7.sce | |
parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
download | Scilab-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.7/Chapter6_Exampl7.sce')
-rw-r--r-- | 1808/CH6/EX6.7/Chapter6_Exampl7.sce | 40 |
1 files changed, 40 insertions, 0 deletions
diff --git a/1808/CH6/EX6.7/Chapter6_Exampl7.sce b/1808/CH6/EX6.7/Chapter6_Exampl7.sce new file mode 100644 index 000000000..6fbce78a3 --- /dev/null +++ b/1808/CH6/EX6.7/Chapter6_Exampl7.sce @@ -0,0 +1,40 @@ +clc
+clear
+//INPUT DATA
+h2=215;//enthalpy in kJ/kg
+cp1=1.05;//Specific pressure
+nc=0.8;//carnot efficiency in percentage
+h1=192.56;//enthalpy in kJ/kg
+h31=98.19;//enthalpy in kJ/kg
+t3=48;//Temperature in K
+t31=62.19;//Temperature in K
+m=0.008;//mass of air in kg
+h5=47.26;//enthalpy in kJ/kg
+t0=317;//temperature in K
+s3=0.2973;//at superheated table entropy in kJ/kgK
+ha1=209.81;//at superheated table enthalpy in kJ/kg
+sa1=0.6758;//at superheated table enthalpy in kJ/kgK
+ha2=225.34;//at superheated table enthalpy in kJ/kg
+sa2=0.7209;//at superheated table entropy in kJ/kgK
+s2a=0.6984;//at superheated table entropy in kJ/kgK
+s5=0.1857;//at superheated table entropy in kJ/kgK
+
+
+//CALCULATIONS
+h2a=((h2-h1)/nc)+h1;//enthalpy in kJ/kg
+h3=h31-cp1*(t31-t3);//enthalpy in kJ/kg
+wc=m*(h2a-h1);//compressor work in kJ/s
+Rc=m*(h1-h3);//Refrigiration capacity in kW
+Rc1=Rc*60/210;//Refrigiration capacity in TR
+copv=Rc/wc;//COP of VCR system
+x4=((h3-h5)/(h1-h5));//fraction
+s4=s5++x4*(s2a-s5);//at superheated table entropy in kJ/kgK
+ic=m*t0*(s4-s3);//Ireeversibility rate in valve in kW
+
+//OUTPUT
+printf('(a)The compressive work input is %3.5f kJ/s \n (b)Refrigiration capacity is %3.2f TR \n (c)COPvcr is %3.3f \n (d)Ireeversibility rate in valve is %3.4f kW',wc,Rc1,copv,ic)
+
+
+11
+
+
|