summaryrefslogtreecommitdiff
path: root/3825/CH7
diff options
context:
space:
mode:
Diffstat (limited to '3825/CH7')
-rw-r--r--3825/CH7/EX7.1/Ex7_1.sce5
-rw-r--r--3825/CH7/EX7.10/Ex7_10.sce10
-rw-r--r--3825/CH7/EX7.11/Ex7_11.sce8
-rw-r--r--3825/CH7/EX7.12/Ex7_12.sce15
-rw-r--r--3825/CH7/EX7.13/Ex7_13.sce9
-rw-r--r--3825/CH7/EX7.14/Ex7_14.sce8
-rw-r--r--3825/CH7/EX7.15/Ex7_15.sce17
-rw-r--r--3825/CH7/EX7.16/Ex7_16.sce25
-rw-r--r--3825/CH7/EX7.17/Ex7_17.sce15
-rw-r--r--3825/CH7/EX7.18/Ex7_18.sce11
-rw-r--r--3825/CH7/EX7.19/Ex7_19.sce5
-rw-r--r--3825/CH7/EX7.2/Ex7_2.sce8
-rw-r--r--3825/CH7/EX7.20/Ex7_20.sce17
-rw-r--r--3825/CH7/EX7.21/Ex7_21.sce14
-rw-r--r--3825/CH7/EX7.3/Ex7_3.sce8
-rw-r--r--3825/CH7/EX7.4/Ex7_4.sce8
-rw-r--r--3825/CH7/EX7.5/Ex7_5.sce17
-rw-r--r--3825/CH7/EX7.6/Ex7_6.sce6
-rw-r--r--3825/CH7/EX7.7/EX7_7.sce13
-rw-r--r--3825/CH7/EX7.8/Ex7_8.sce11
-rw-r--r--3825/CH7/EX7.9/Ex7_9.sce8
21 files changed, 238 insertions, 0 deletions
diff --git a/3825/CH7/EX7.1/Ex7_1.sce b/3825/CH7/EX7.1/Ex7_1.sce
new file mode 100644
index 000000000..4a4102aeb
--- /dev/null
+++ b/3825/CH7/EX7.1/Ex7_1.sce
@@ -0,0 +1,5 @@
+clc
+T2=300 //temperature in Kelvin
+T1=420 //temperature in Kelvin
+Eta=1-(T2/T1)
+mprintf("maximum possible efficiency=%f",Eta)//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.10/Ex7_10.sce b/3825/CH7/EX7.10/Ex7_10.sce
new file mode 100644
index 000000000..b654cd4fa
--- /dev/null
+++ b/3825/CH7/EX7.10/Ex7_10.sce
@@ -0,0 +1,10 @@
+clc
+R=8.314
+gama=1.4
+Cv=R/(gama-1)
+mprintf("Cv=%fJ/mol K\n",Cv)
+T2=370
+T1=300
+deltas=Cv*log(T2/T1)
+mprintf("delta s=%fJ/mol K",deltas)//ans vary due to roundoff error
+
diff --git a/3825/CH7/EX7.11/Ex7_11.sce b/3825/CH7/EX7.11/Ex7_11.sce
new file mode 100644
index 000000000..1d1c9c7ea
--- /dev/null
+++ b/3825/CH7/EX7.11/Ex7_11.sce
@@ -0,0 +1,8 @@
+clc
+T1=273
+T2=373
+hsf=334.92
+hfg=2256.94
+mprintf("Ssf=%fkJ/kg K\n",hsf/T1)//ans vary due to roundoff error
+mprintf("Sfg=%fkJ/kg K\n",hfg/T2)//ans vary due to roundoff error
+
diff --git a/3825/CH7/EX7.12/Ex7_12.sce b/3825/CH7/EX7.12/Ex7_12.sce
new file mode 100644
index 000000000..674eb1de7
--- /dev/null
+++ b/3825/CH7/EX7.12/Ex7_12.sce
@@ -0,0 +1,15 @@
+clc
+m1=30 //mass of steel
+m2=150 //mass of oil
+Cp1=0.46 //steel
+Cp2=2.5 //oil
+T1=700 //steel
+T2=300 //oil
+T=((m1*Cp1*T1)+(m2*Cp2*T2))/((m1*Cp1)+(m2*Cp2))
+mprintf("T=%fK\n",T)//ans vary due to roundoff error
+deltaSsteel=integrate('m1*Cp1/T','T',T1,T)
+mprintf("deltaSsteel=%fkJ/K\n",deltaSsteel)//ans vary due to roundoff error
+deltaSoil=integrate('m2*Cp2/T','T',T2,T)
+mprintf("deltaSoil=%fkJ/K\n",deltaSoil)//ans vary due to roundoff error
+deltaSuni=deltaSsteel+deltaSoil
+mprintf("deltaSuni=%fkJ/k",deltaSuni)//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.13/Ex7_13.sce b/3825/CH7/EX7.13/Ex7_13.sce
new file mode 100644
index 000000000..e4df2e9bb
--- /dev/null
+++ b/3825/CH7/EX7.13/Ex7_13.sce
@@ -0,0 +1,9 @@
+clc
+P1=1
+P2=2
+T1=300
+T2=500
+R=8.314
+Cp=(7*R)/2
+deltas=(Cp*log(T2/T1))-(R*log(P2/P1))
+mprintf("deltas=%fkJ/kmol K",deltas)//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.14/Ex7_14.sce b/3825/CH7/EX7.14/Ex7_14.sce
new file mode 100644
index 000000000..1120a49a0
--- /dev/null
+++ b/3825/CH7/EX7.14/Ex7_14.sce
@@ -0,0 +1,8 @@
+clc
+YA=0.5//mole fraction of oxygen
+YB=0.5//mole fraction of nitrogen
+R=8.314//universal gas constant
+deltasMix=-R*((YA*log(YA))+(YB*log(YB)))//molar entropy change associated with mixing of non identical gases
+mprintf("deltasMix=%fper mol of mixture",deltasMix)//ans vary due to roundoff error
+
+
diff --git a/3825/CH7/EX7.15/Ex7_15.sce b/3825/CH7/EX7.15/Ex7_15.sce
new file mode 100644
index 000000000..088713ab8
--- /dev/null
+++ b/3825/CH7/EX7.15/Ex7_15.sce
@@ -0,0 +1,17 @@
+clc
+h1=2870.5
+s1=7.5072
+h2=504.7
+s2=1.5301
+deltassteam=s2-s1
+deltaSsys=deltassteam
+mprintf("deltassteam=%fkJ/kg\n",deltassteam)
+q=h2-h1
+Q=-q
+mprintf("q=%fkJ\n",q)
+Tsur=300
+deltaSsur=Q/Tsur
+mprintf("deltaSsur=%fkJ/K\n",deltaSsur)
+deltaSuni=deltaSsys+deltaSsur
+mprintf("deltaSsur=%fkJ/K",deltaSuni)
+
diff --git a/3825/CH7/EX7.16/Ex7_16.sce b/3825/CH7/EX7.16/Ex7_16.sce
new file mode 100644
index 000000000..542fe13fc
--- /dev/null
+++ b/3825/CH7/EX7.16/Ex7_16.sce
@@ -0,0 +1,25 @@
+clc
+P1=1*10^6 //pressure in Pascal
+h1=3052.1
+v1=0.258
+s1=7.1251
+u1=h1-(P1*10^-3*v1)
+mprintf("u1=%fkJ/kg\n",u1)//ans vary due to roundoff error
+s2=s1
+sf=1.3027
+sg=7.3598
+hf=417.54
+hg=2675.4
+vf=0.001043
+vg=1.6940
+X2=(s1-sf)/(sg-sf)
+mprintf("X2=%f\n",X2)//ans vary due to roundoff error
+h2=(hg*X2)+(1-X2)*hf
+mprintf("h2=%fkJ/kg\n",h2)//ans vary due to roundoff error
+v2=(vg*X2)+(1-X2)*vf
+mprintf("v2=%f metre-cube/kg\n",v2)//ans vary due to roundoff error
+P2=100 //in kPa
+u2=h2-(P2*v2)
+mprintf("u2=%fkJ/kg\n",u2)//ans vary due to roundoff error
+W=u1-u2
+mprintf("W=%fkJ/kg",W)//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.17/Ex7_17.sce b/3825/CH7/EX7.17/Ex7_17.sce
new file mode 100644
index 000000000..343143dce
--- /dev/null
+++ b/3825/CH7/EX7.17/Ex7_17.sce
@@ -0,0 +1,15 @@
+clc
+si=7.0248
+sg=7.3598
+sf=1.3027
+Xe=(si-sf)/(sg-sf)
+mprintf("Xe=%f\n",Xe)//ans vary due to roundoff error
+hg=2675.4
+hf=417.54
+hi=2947.95
+he=(hg*Xe)+(1-Xe)*hf
+mprintf("he=%fkJ/kg\n",he)//ans vary due to roundoff error
+Ws=20*10^3
+m=-(Ws/(he-hi))
+mprintf("m=%fkg/s",m)//ans vary due to roundoff error
+
diff --git a/3825/CH7/EX7.18/Ex7_18.sce b/3825/CH7/EX7.18/Ex7_18.sce
new file mode 100644
index 000000000..c426883db
--- /dev/null
+++ b/3825/CH7/EX7.18/Ex7_18.sce
@@ -0,0 +1,11 @@
+clc
+T1=350
+Te1=450
+Te2=250
+P1=250
+P2=100
+R=8.314
+Cp=(7*R)/2
+me1=(Cp*log(Te1/T1))-(R*log(P2/P1))
+me2=(Cp*log(Te2/T1))-(R*log(P2/P1))
+mprintf("me1(se1-si)+me2(se2-si)=%fkJ/K",me1+me2)//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.19/Ex7_19.sce b/3825/CH7/EX7.19/Ex7_19.sce
new file mode 100644
index 000000000..f3ce8172d
--- /dev/null
+++ b/3825/CH7/EX7.19/Ex7_19.sce
@@ -0,0 +1,5 @@
+clc
+T=298 //temperature in kelvin
+T1=523 //temperature in kelvin
+T2=773 //temperature in kelvin
+mprintf("Fraction of available energy lost=%f",(T*((1/T1)-(1/T2)))/(1-(T/T2)))//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.2/Ex7_2.sce b/3825/CH7/EX7.2/Ex7_2.sce
new file mode 100644
index 000000000..e877b8310
--- /dev/null
+++ b/3825/CH7/EX7.2/Ex7_2.sce
@@ -0,0 +1,8 @@
+clc
+T2=300
+T1=1400
+Eta=1-(T2/T1)
+mprintf("Eta=%f\n",Eta)//ans vary due to roundoff error
+Q1=65 //in kJ/min
+W=60 //in kJ/min
+mprintf("efficiency claimed by inventor=%f",W/Q1)//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.20/Ex7_20.sce b/3825/CH7/EX7.20/Ex7_20.sce
new file mode 100644
index 000000000..b230708bb
--- /dev/null
+++ b/3825/CH7/EX7.20/Ex7_20.sce
@@ -0,0 +1,17 @@
+clc
+h1=3025
+v1=0.1255
+s1=6.7696
+h2=2875.4
+v2=2.172
+s2=7.8349
+P1=20*10^5
+PO=10^5
+u1=h1-(P1*10^-3*v1)
+u2=h2-(PO*10^-3*v2)
+mprintf("u1=%fkJ/kg\n",u1)//ans vary due to roundoff error
+mprintf("u2=%fkJ/kg\n",u2)//ans vary due to roundoff error
+TO=298
+mprintf("phi1-phi2=%fkJ/kg",(u1+(PO*v1*10^-3)-(TO*s1))-(u2+(PO*v2*10^-3)-(TO*s2)))//ans in textbook is wrong
+
+
diff --git a/3825/CH7/EX7.21/Ex7_21.sce b/3825/CH7/EX7.21/Ex7_21.sce
new file mode 100644
index 000000000..9104f1018
--- /dev/null
+++ b/3825/CH7/EX7.21/Ex7_21.sce
@@ -0,0 +1,14 @@
+clc
+h1=2775.8
+h2=167.456
+h3=104.77
+h4=146.56
+s1=7.5984
+s2=0.5721
+s3=0.367
+s4=0.5049
+m3=((h2-h1)*10^4)/(h3-h4)
+mprintf("m3=%fkg/h\n",m3)//ans vary due to roundoff error
+TO=300
+delta=(-10^4*TO*(s2-s1))-(m3*TO*(s4-s3))
+mprintf("Net change in availability=%fkJ",delta)//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.3/Ex7_3.sce b/3825/CH7/EX7.3/Ex7_3.sce
new file mode 100644
index 000000000..2855c9c87
--- /dev/null
+++ b/3825/CH7/EX7.3/Ex7_3.sce
@@ -0,0 +1,8 @@
+clc
+TL=270
+TH=300
+COPR=TL/(TH-TL)
+mprintf("COPR=%i\n",COPR)
+QL=5*10^6 //in kJ/h
+W=(QL/3600)/COPR
+mprintf("W=%fkW",W)//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.4/Ex7_4.sce b/3825/CH7/EX7.4/Ex7_4.sce
new file mode 100644
index 000000000..b08c5130b
--- /dev/null
+++ b/3825/CH7/EX7.4/Ex7_4.sce
@@ -0,0 +1,8 @@
+clc
+TL=4.2
+TH=305
+COPR=TL/(TH-TL)
+mprintf("COPR=%f\n",COPR)//ans vary due to roundoff error
+QL=83.3
+W=QL/COPR
+mprintf("W=%fkJ",W)//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.5/Ex7_5.sce b/3825/CH7/EX7.5/Ex7_5.sce
new file mode 100644
index 000000000..de265dff3
--- /dev/null
+++ b/3825/CH7/EX7.5/Ex7_5.sce
@@ -0,0 +1,17 @@
+clc
+TL=250
+TH=291
+COPR=TL/(TH-TL)
+mprintf("COPR=%f\n",COPR)//ans vary due to roundoff error
+QL=4*10^4
+W=QL/COPR
+mprintf("W=%fkJ/d\n",W)//ans vary due to roundoff error
+CW=200 //compressor work in watts
+mprintf("Fraction of time compressor runs=%f\n",W/((CW*3600*24)/1000))//ans vary due to roundoff error
+TH=310
+COPR=TL/(TH-TL)
+mprintf("COPR=%f\n",COPR)//ans vary due to roundoff error
+W=QL/COPR
+mprintf("W=%fkJ/d\n",W)//ans vary due to roundoff error
+mprintf("fraction of time the compressor runs=%f\n",W/((CW*3600*24)/1000))//ans vary due to roundoff error
+
diff --git a/3825/CH7/EX7.6/Ex7_6.sce b/3825/CH7/EX7.6/Ex7_6.sce
new file mode 100644
index 000000000..562d24ca3
--- /dev/null
+++ b/3825/CH7/EX7.6/Ex7_6.sce
@@ -0,0 +1,6 @@
+clc
+TA=27+273 //temperature in kelvin
+TL=0+273//temperature in kelvin
+T1=150+273//temperature in kelvin
+mprintf("QL/Q1=%f\n",(TL*(T1-TA))/(T1*(TA-TL)))//ans vary due to roundoff error
+mprintf("(Q2+QH)/Q1=%f",(TA*(T1-TL))/(T1*(TA-TL)))//ans vary due to roundoff error
diff --git a/3825/CH7/EX7.7/EX7_7.sce b/3825/CH7/EX7.7/EX7_7.sce
new file mode 100644
index 000000000..bcaf30a18
--- /dev/null
+++ b/3825/CH7/EX7.7/EX7_7.sce
@@ -0,0 +1,13 @@
+clc
+Q1=50
+Q2=Q1
+T1=480
+T2=300
+mprintf("integral(dQ/T)=%fkJ/min K\n",(Q1/T1)-(Q2/T2))
+Eta=1-(T2/T1)
+mprintf("Eta=%f\n",Eta)
+W=Eta*Q1
+mprintf("Eta*Q1=%fkJ/min\n",W)
+Q2=Q1-W
+mprintf("Q2=%fkJ/min",Q2)
+
diff --git a/3825/CH7/EX7.8/Ex7_8.sce b/3825/CH7/EX7.8/Ex7_8.sce
new file mode 100644
index 000000000..7ed2c5bad
--- /dev/null
+++ b/3825/CH7/EX7.8/Ex7_8.sce
@@ -0,0 +1,11 @@
+clc
+Q=[1 1;(1/4) (1/3)]//matrix for (A),(B) LHS
+R=[1500;(2500/6)] //matrix for (A),(B),RHS
+S=inv(Q)*R//solving equation A and B
+Q2=S(1,1)
+Q3=S(2,1)
+mprintf("Q2=%fkJ\n",Q2)
+mprintf("Q3=%ikJ\n",Q3)
+
+
+
diff --git a/3825/CH7/EX7.9/Ex7_9.sce b/3825/CH7/EX7.9/Ex7_9.sce
new file mode 100644
index 000000000..72044e6b2
--- /dev/null
+++ b/3825/CH7/EX7.9/Ex7_9.sce
@@ -0,0 +1,8 @@
+clc
+T=500 //temperature in Kelvin
+W=250 //watts of motor
+h=2*3600 //time of operation in seconds
+Q=W*h
+deltaS=Q/T
+mprintf("deltaS=%fkJ/K",deltaS/1000)//ans in textbook is wrong
+