summaryrefslogtreecommitdiff
path: root/2015/CH8
diff options
context:
space:
mode:
Diffstat (limited to '2015/CH8')
-rwxr-xr-x2015/CH8/EX8.1/8_1.sce11
-rwxr-xr-x2015/CH8/EX8.10/8_10.sce31
-rwxr-xr-x2015/CH8/EX8.11/8_11.sce16
-rwxr-xr-x2015/CH8/EX8.12/8_12.sce18
-rwxr-xr-x2015/CH8/EX8.13/8_13.sce21
-rwxr-xr-x2015/CH8/EX8.14/8_14.sce15
-rwxr-xr-x2015/CH8/EX8.15/8_15.sce25
-rwxr-xr-x2015/CH8/EX8.16/8_16.sce15
-rwxr-xr-x2015/CH8/EX8.19/8_19.sce15
-rwxr-xr-x2015/CH8/EX8.2/8_2.sce18
-rwxr-xr-x2015/CH8/EX8.3/8_3.sce19
-rwxr-xr-x2015/CH8/EX8.4/8_4.sce24
-rwxr-xr-x2015/CH8/EX8.5/8_5.sce20
-rwxr-xr-x2015/CH8/EX8.6/8_6.sce12
-rwxr-xr-x2015/CH8/EX8.7/8_7.sce12
-rwxr-xr-x2015/CH8/EX8.8/8_8.sce31
-rwxr-xr-x2015/CH8/EX8.9/8_9.sce33
17 files changed, 336 insertions, 0 deletions
diff --git a/2015/CH8/EX8.1/8_1.sce b/2015/CH8/EX8.1/8_1.sce
new file mode 100755
index 000000000..7e3a00ccd
--- /dev/null
+++ b/2015/CH8/EX8.1/8_1.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+cc=12000 //btu/h
+pi=1565 ///watts
+ra=7 //btu/h/w
+//CALCULATIONS
+eer=cc/pi
+p(1)=cc/ra
+//RESULTS
+printf('eer is %2f',eer)
+printf('\npower consumption of first unit is %2fwatts',p(1))
diff --git a/2015/CH8/EX8.10/8_10.sce b/2015/CH8/EX8.10/8_10.sce
new file mode 100755
index 000000000..0f8ee5d07
--- /dev/null
+++ b/2015/CH8/EX8.10/8_10.sce
@@ -0,0 +1,31 @@
+
+clc
+//initialisation of variables
+ph=13.89 //pressure in bar under 36 degrees temp
+p1=1.447 //pressure in bar under -26 degrees temp
+h1=1411.4 //kj/kg
+s1=5.718 //kj/kgk
+h2=1561.7 //kj/kg
+h3= 150 //kj/kg
+h4=185.8 //kj/kg
+h5=1445.5 //kj/kg
+s5=5.327 //kj/kgk
+s5=5.327 //kj/kgk
+h6=1607.6 //kj/kg
+r=25
+//CALCULATIONS
+pi=(p1*ph)^0.5
+m1=(3.5164*r)/(h1-h4)
+mh=m1*(h2-h3)/(h5-h1)
+poc=m1*(h2-h1)
+pohc=mh*(h6-h5)
+pr=poc+pohc
+re=h1-h4
+wi=(h2-h1)+(h6-h5)
+cop=re/wi
+//RESULTS
+printf('power of lp compressor is %2fkw',poc)
+printf('\npower of hp compressor is %2fkw',pohc)
+printf('\ntotal power required is %2fkw',pr)
+printf('\nrefrigerating effect is%2fkj/kg',re)
+printf('\ncoefficient of performance is %2f',cop)
diff --git a/2015/CH8/EX8.11/8_11.sce b/2015/CH8/EX8.11/8_11.sce
new file mode 100755
index 000000000..7cd7b571f
--- /dev/null
+++ b/2015/CH8/EX8.11/8_11.sce
@@ -0,0 +1,16 @@
+clc
+//initialisation of variables
+h1=1411.4 //kj/kg
+s1=5.718 //kj/kgk
+s2=5.718 //kj/kgk
+h2=1755.7 //kj/kg
+h4=352.3 //under 13.89 bar in kj/kg
+h3=352.3 //under 13.89 bar in kj/kg
+//CALCULATIONS
+m=(3.5164*25)/(h1-h4)
+poc=m*(h2-h1)
+cop=(h1-h4)/(h2-h1)
+//RESULTS
+printf('mass flow rate of refrigerant is %2fkg/s',m)
+printf('\ncoefficient of performance is %2f',cop)
+printf('\npower of compressor is %2fkw',poc)
diff --git a/2015/CH8/EX8.12/8_12.sce b/2015/CH8/EX8.12/8_12.sce
new file mode 100755
index 000000000..da60b8448
--- /dev/null
+++ b/2015/CH8/EX8.12/8_12.sce
@@ -0,0 +1,18 @@
+clc
+//initialisation of variables
+h1=178.73 //under -20 degrees in kj/kg
+h5=185.66 //under 5 degrees in kj/kg
+h3=79.71 //under 10.84 degrees in kj/kg
+h6=79.71 //under 10.84 degrees in kj/kg
+h4=79.71 //under 10.84 degrees in kj/kg
+h2=219.33 //kj/kg
+//CALCULATIONS
+m1=(7*211)/(h1-h4)
+mh=(5*211)/(h5-h4)
+h8=((m1*h1)+(mh*h5))/(m1+mh)
+poc=(m1+mh)*(h2-h8)
+cop=(12*211)/poc
+//RESULTS
+printf('power of compressor is %2fkj/min',poc)
+printf('\nrefrigerant flow rate is %2fkg/min',mh)
+printf('\ncoefficient of performance is %2f',cop)
diff --git a/2015/CH8/EX8.13/8_13.sce b/2015/CH8/EX8.13/8_13.sce
new file mode 100755
index 000000000..5ec4f14c8
--- /dev/null
+++ b/2015/CH8/EX8.13/8_13.sce
@@ -0,0 +1,21 @@
+clc
+//initialisation of variables
+h1=185.38 //under -5 degrees temp in kj/kg
+s1=0.6991 //nder -5 degrees temp in kj/kgk
+ps2=7.449 //under 30 degrees in bar
+s2=0.6991 //under 30 degrees in bar
+h2=203.9 //kj/kg
+h3=64.59 //kj/kg
+h4=64.59 //kj/kg
+//CALCULATIONS
+he=h2-h3
+wi=h2-h1
+cop1=he/wi
+mf=84400/he
+pr=(mf/3600)*(wi)
+coe=pr*1
+//RESULTS
+printf('coefficient of performance is %2f',cop1)
+printf('\nmass flow rate of refrigerant is %2fkg/h',mf)
+printf('\npower required is %2fkw',pr)
+printf('\ncost of electricity is %2frs',coe)
diff --git a/2015/CH8/EX8.14/8_14.sce b/2015/CH8/EX8.14/8_14.sce
new file mode 100755
index 000000000..ad4dd1faa
--- /dev/null
+++ b/2015/CH8/EX8.14/8_14.sce
@@ -0,0 +1,15 @@
+clc
+//initialisation of variables
+t1=1100 //K
+t2=275 //K
+g=1.4
+pa=101.32
+qs=250 //kj/kg
+r=0.287 //kj/kgK
+//CALCULATIONS
+p1=(t1/t2)^(3.5)*pa //(g/g-1)=3.5
+pb=2.2075*p1
+va=(r*t2)/pa
+vb=(r*t1)/pb
+mep=(0.75*qs)/(va-vb)
+printf('mean effective pressure is %2f units',mep)
diff --git a/2015/CH8/EX8.15/8_15.sce b/2015/CH8/EX8.15/8_15.sce
new file mode 100755
index 000000000..eecfa1b30
--- /dev/null
+++ b/2015/CH8/EX8.15/8_15.sce
@@ -0,0 +1,25 @@
+clc
+//initialisation of variables
+ps2=0.008129 //under 4 degree temp in bar
+ps3=0.047534 //under32 degree temp in bar
+v=0.75 //volume in m*m*m
+vf=0.001
+h1=50.4 //under 12 degree temp in kj/kg
+h2=16.8 //kj/kg
+hf3=16.8 //kj/kg
+hfg3=2492.1 //kj/kg
+x3=0.98
+vg3=157.27 //under 4 degree temparature
+//CALCULATIONS
+pr=ps3/ps2
+mfr=v/vf
+re=mfr*(h1-h2)
+h3=hf3+(x3*hfg3)
+mf3=re/(h3-h1)
+vv=mf3*x3*vg3
+//RESULTS
+disp('pressures in flash chamber are ps2=0.008129 and ps3=0.047534')
+printf('\npressure ratio is %2f',pr)
+printf('\nthe refrigeration effect is %2fkj/kg',re)
+printf('\namount of makeup water is %2fkg/min',mf3)
+printf('\nvolume of water entering the ejector is %2fm*m*m/min',vv)
diff --git a/2015/CH8/EX8.16/8_16.sce b/2015/CH8/EX8.16/8_16.sce
new file mode 100755
index 000000000..2914d3d2b
--- /dev/null
+++ b/2015/CH8/EX8.16/8_16.sce
@@ -0,0 +1,15 @@
+clc
+//initialisation of variables
+h1=272.763 //under 300 k temp in kj/kg
+s1=6.4125 //under 300 k temp in kj/kg
+h2=230.347 //under 200 k temp in kj/kg1
+s2=4.9216 //under 300 k temp in kj/kg
+hf=-133.347 //kj/kg
+t1=300 //temp in k
+//CALCULATIONS
+y=(h1-h2)/(h1-hf)
+mw=(t1*(s2-s1))-(h2-h1)
+x=mw/0.1044
+//RESULTS
+printf('fraction of oxygen condensed is %2f',y)
+printf('\nwork required is %2f',x) //answer is wrong in tb
diff --git a/2015/CH8/EX8.19/8_19.sce b/2015/CH8/EX8.19/8_19.sce
new file mode 100755
index 000000000..1259bbcbc
--- /dev/null
+++ b/2015/CH8/EX8.19/8_19.sce
@@ -0,0 +1,15 @@
+clc
+//initialisation of variables
+t1=300 //temp in k
+sf=2.9409 //kj/kgk
+s1=6.44125 //kj/kgk
+hf=-133.347 //kj/kg
+h1=272.763 //kj/kg
+w=-4690.5
+//CALCULATIONS
+mw=(t1*(sf-s1)-(hf-h1))
+fom=mw/w
+//RESULTS
+printf('minimum work is %2fkj/kg of o2 liquefied',mw)
+printf('\nfigure of merit is %2f',fom)
+//no 8.17 and 8.19 in tb print mistake
diff --git a/2015/CH8/EX8.2/8_2.sce b/2015/CH8/EX8.2/8_2.sce
new file mode 100755
index 000000000..ff0918310
--- /dev/null
+++ b/2015/CH8/EX8.2/8_2.sce
@@ -0,0 +1,18 @@
+clc
+//initialisation of variables
+t1=278 //temparature in k
+t2=300 //temparature in k
+hf2=21 //kj/kg
+hfg2=2489.7 //kj/kg
+h3=113.1 //under 300 k in kj/kg
+x2=0.8
+p=3.154 //power
+//CALCULATIONS
+cop=t1/(t2-t1)
+h2=hf2+(x2*hfg2)
+re=h2-h3
+pr=p/cop
+//RESULTS
+printf('cop is %2f',cop)
+printf('\npower required is%2fkw/ton of refrigeration',pr)
+printf('\nrefrigeration effect is %2fkj/kg',re)
diff --git a/2015/CH8/EX8.3/8_3.sce b/2015/CH8/EX8.3/8_3.sce
new file mode 100755
index 000000000..87e653a0b
--- /dev/null
+++ b/2015/CH8/EX8.3/8_3.sce
@@ -0,0 +1,19 @@
+clc
+//initialisation of variables
+t1=253 //temp in k
+t3=313 //temp in k
+cp=1.005 //kj/kg
+r=4 //bar
+g=1.4
+//CALCULATIONS
+t2=(t1*(r)^((g-1)/g))
+t4=(t3/(r)^((g-1)/g))
+re=cp*(t1-t4)
+wi=cp*((t2-t3)-(t1-t4))
+cop=re/wi
+ma=(3.5164*10)/re
+p=ma*wi
+//RESULTS
+printf('cop is %2f',cop)
+printf('\nmass of refrigeration is %2fkg/s',ma)
+printf('\npower required to drive the unit is %2fkw',p)
diff --git a/2015/CH8/EX8.4/8_4.sce b/2015/CH8/EX8.4/8_4.sce
new file mode 100755
index 000000000..d3395d14f
--- /dev/null
+++ b/2015/CH8/EX8.4/8_4.sce
@@ -0,0 +1,24 @@
+
+clc
+//initialisation of variables
+t1=261 //temp in k
+t3=310 //temp in k
+cp=1.005 //kj/kg
+r=5
+//CALCULATIONS
+t2=(t1*(r)^((g-1)/g))
+t4=(t3/(r)^((g-1)/g))
+re=cp*(t1-t4)
+ma=(3.5164*3600)/re
+woc=cp*(t2-t1)
+woe=cp*(t3-t4)
+nw=woc-woe
+cop1=re/nw
+cop2=t1/(t3-t1)
+reff=cop1/cop2
+//RESULTS
+printf('temparature at states 2 and 4 are %2fk and %2fk',t2,t4)
+printf('\nmass of air per hour is %2fkg/h',ma)
+printf('\nnet work required is %2fkj/kg',nw)
+printf('\ncoefficient of perfoemance is %2f',cop1)
+printf('\nrelative efficiency is %2f',reff)
diff --git a/2015/CH8/EX8.5/8_5.sce b/2015/CH8/EX8.5/8_5.sce
new file mode 100755
index 000000000..c7c5e961b
--- /dev/null
+++ b/2015/CH8/EX8.5/8_5.sce
@@ -0,0 +1,20 @@
+clc
+//initialisation of variables
+h1=176.48 //under -25 degrees temp in kj/kg
+s1=0.7127 //under -25 degrees temp in kj/kgk
+h2=215.17 //under 58 degrees temp in kj/kg
+h3=79.71 //under 45 degrees temp in kj/kg
+h4=79.71 //under 45 degrees temp in kj/kg
+no=20 // number of tons
+//CALCULATIONS
+w=h2-h1
+re=h1-h4
+cop=re/w
+ha=no*3.5164
+cr=ha/re
+pr=cr*w
+//RESULTS
+printf('the refrigeration effect is %2fkj/kg',re)
+printf('\ncoefficient of performance is %2f',cop)
+printf('\npower required is %2fkw',pr)
+printf('\ncirculating rate of refrigerant is %2fkg/s',cr)
diff --git a/2015/CH8/EX8.6/8_6.sce b/2015/CH8/EX8.6/8_6.sce
new file mode 100755
index 000000000..ae81af6c6
--- /dev/null
+++ b/2015/CH8/EX8.6/8_6.sce
@@ -0,0 +1,12 @@
+clc
+//initialisation of variables
+h1=176.48 //under -25 degrees temp in kj/kg
+h2=215.17 //kj/kg
+h4=74.59 //kj/kg
+//CALCULATIONS
+re=h1-h4
+w=h2-h1
+cop=re/w
+//RESULTS
+printf('the refrigeration effect is %2fkj/kg',re)
+printf('\ncoefficient of performance is %2f',cop)
diff --git a/2015/CH8/EX8.7/8_7.sce b/2015/CH8/EX8.7/8_7.sce
new file mode 100755
index 000000000..6593b5e02
--- /dev/null
+++ b/2015/CH8/EX8.7/8_7.sce
@@ -0,0 +1,12 @@
+clc
+//initialisation of variables
+h1=179.43 //under -25 degrees temp in kj/kg
+h2=219.03 //kj/kg
+h4=74.59 //kj/kg
+//CALCULATIONS
+re=h1-h4
+w=h2-h1
+cop=re/w
+//RESULTS
+printf('the refrigeration effect is %2fkj/kg',re)
+printf('\ncoefficient of performance is %2f',cop)
diff --git a/2015/CH8/EX8.8/8_8.sce b/2015/CH8/EX8.8/8_8.sce
new file mode 100755
index 000000000..2c5913aa5
--- /dev/null
+++ b/2015/CH8/EX8.8/8_8.sce
@@ -0,0 +1,31 @@
+clc
+//initialisation of variables
+h2=1472.6 //kj/kg
+s2=4.898 //kj/kgk
+sf1=0.510 //kj/kgk
+sfg1=5.504 //kj/kgk
+hf1=126.2 //kj/kg
+hfg1=1304.3 //kj/kg
+h4=362.1 //under 38 degrees in kj/kg
+h2=1472.6 //kj/kg
+h3=362.1 //under 38 degrees in kj/kg
+t1=261 //temp in k
+t2=311 //temp in k
+//CALCULATIONS
+x1=(s2-sf1)/sfg1
+h1=hf1+(x1*hfg1)
+re=h1-h4
+w=h2-h1
+cop=re/w
+hr=h2-h3
+ca=(2*re*50)/(3600*3.5164)
+pom=100*w/3600
+ccop=t1/(t2-t1)
+rff=cop/ccop
+//RESULTS
+printf('coefficient of performance is %2f',cop)
+printf('\nheat rejected in the condenser is%2fkj/kg',hr)
+printf('\nrefrigerating effect is%2fkj/kg',re)
+printf('\ncapacity of motor is%2frons of refrigeration',ca)
+printf('\npower of motor is %2fkw',pom)
+printf('\nrefrigerating befficiency is %2f',rff)
diff --git a/2015/CH8/EX8.9/8_9.sce b/2015/CH8/EX8.9/8_9.sce
new file mode 100755
index 000000000..1b07b3436
--- /dev/null
+++ b/2015/CH8/EX8.9/8_9.sce
@@ -0,0 +1,33 @@
+
+clc
+//initialisation of variables
+hf1=-7.53 //kj/kg
+hfg1=245.8 //kj/kg
+x1=0.6
+sf1=-0.04187 //kj/kgk
+t1=268 //temp in degrees
+sf2=0.2513 //kj/kgk
+hf2=81.25 //kj/kg
+hfg2=121.5 //kj/kg
+t2=298 //temp in k
+h4=81.25 //under 20 degrees in kj/kg
+h3=81.25 //under 20 degrees in kj/kg
+sh=4.2 //kj/kgk
+lt=335 //kj/kg
+reff=0.5
+sfg1= 1 //kj/kg
+s2= 1 //kj/kg
+//CALCULATIONS
+h1=hf1+(x1*hfg1)
+s1=sf1+(x1*sfg1)
+x2=((s2-sf2)/hfg2)*t2
+h2=hf2+(x2*hfg2)
+re=h1-h4
+are=re*reff
+he=sh*10+lt
+ma=(are*6*60)/he
+//RESULTS
+printf('refrigerating effect is%2fkj/kg',re)
+printf('\nactual refrigerating effect is%2fkj/kg',are)
+printf('\nheat to be extracted to produce 1kg of ice is %2fkj/kg of ice',he)
+printf('\nmass of ice formed is %2fkg/day',ma)
generated by cgit (git 2.34.1) at 2024-12-20 13:53:11 +0000