summaryrefslogtreecommitdiff
path: root/3825/CH9
diff options
context:
space:
mode:
Diffstat (limited to '3825/CH9')
-rw-r--r--3825/CH9/EX9.1/Ex9_1.sce38
-rw-r--r--3825/CH9/EX9.10/Ex9_10.sce14
-rw-r--r--3825/CH9/EX9.2/Ex9_2.sce39
-rw-r--r--3825/CH9/EX9.3/Ex9_3.sce33
-rw-r--r--3825/CH9/EX9.4/Ex9_4.sce36
-rw-r--r--3825/CH9/EX9.5/Ex9_5.sce17
-rw-r--r--3825/CH9/EX9.6/Ex9_6.sce19
-rw-r--r--3825/CH9/EX9.7/Ex9_7.sce18
-rw-r--r--3825/CH9/EX9.8/Ex9_8.sce27
-rw-r--r--3825/CH9/EX9.9/Ex9_9.sce24
10 files changed, 265 insertions, 0 deletions
diff --git a/3825/CH9/EX9.1/Ex9_1.sce b/3825/CH9/EX9.1/Ex9_1.sce
new file mode 100644
index 000000000..20cbf86ab
--- /dev/null
+++ b/3825/CH9/EX9.1/Ex9_1.sce
@@ -0,0 +1,38 @@
+clc
+h1=137.77
+v1=0.0010052
+P1=0.005 //presurre in MPa
+P2=3 //pressure in MPa
+WP=v1*(P2-P1)*10^6
+mprintf("WP=%fkJ/kg\n",WP/1000)//ans vary due to roundoff error
+EtaP=0.8
+h2apostrophe=h1+((WP/1000)/EtaP)
+mprintf("h2apostrophe=%fkJ/kg\n",h2apostrophe)//ans vary due to roundoff error
+h4=2995.1
+s4=6.5422
+q1=h4-h2apostrophe
+mprintf("q1=%fkJ/kg\n",q1)//ans vary due to roundoff error
+s5=s4
+sf=0.4763
+hf=137.77
+sg=8.396
+hg=2561.6
+X5=(s5-sf)/(sg-sf)
+mprintf("X5=%f\n",X5)//ans vary due to roundoff error
+h5=(X5*hg)+(1-X5)*hf
+mprintf("h5=%fkJ/kg\n",h5)//ans vary due to roundoff error
+EtaT=0.85
+deltaH=EtaT*(h4-h5)
+mprintf("h4-h5=%fkJ/kg\n",deltaH)//ans vary due to roundoff error
+Eta=(deltaH-(h2apostrophe-h1))/(h4-h2apostrophe)
+mprintf("Eta=%f\n",Eta)//ans vary due to roundoff error
+Pout=deltaH-(h2apostrophe-h1)
+mprintf("Power output per kg of steam=%fkJ\n",Pout)//ans vary due to roundoff error
+mprintf("Steam production rate for 1 MW power output=%fkg/s\n",(10^3)/Pout)//ans vary due to roundoff error
+mprintf("Thermal efficinecy of Rankine cycle=%f",(h4-h5-(WP/1000))/(h4-h2apostrophe))//ans vary due to roundoff error
+
+
+
+
+
+
diff --git a/3825/CH9/EX9.10/Ex9_10.sce b/3825/CH9/EX9.10/Ex9_10.sce
new file mode 100644
index 000000000..22e770e05
--- /dev/null
+++ b/3825/CH9/EX9.10/Ex9_10.sce
@@ -0,0 +1,14 @@
+clc
+h1=178.8372
+hg=h1
+h4=75.1013
+h3=h4
+Eabs=211
+m=Eabs/(h1-h4)
+mprintf("m=%fkg/min\n",m)//ans vary due to roundoff error
+Etrans=300
+W=Etrans-Eabs
+mprintf("W=%fkJ/min\n",W)//ans vary due to roundoff error
+COPR=Eabs/W
+mprintf("COPR=%f\n",COPR)//ans vary due to roundoff error
+
diff --git a/3825/CH9/EX9.2/Ex9_2.sce b/3825/CH9/EX9.2/Ex9_2.sce
new file mode 100644
index 000000000..e0defb537
--- /dev/null
+++ b/3825/CH9/EX9.2/Ex9_2.sce
@@ -0,0 +1,39 @@
+clc
+h4=3456.2
+s4=7.2345
+s5=s4
+T5=265.8
+h5=2989.59
+EtaT=0.8
+WT1=EtaT*(h4-h5)
+mprintf("WT1actual=%fkJ/kg\n",WT1)//ans vary due to roundoff error
+h5apostrophe=h4-WT1
+mprintf("h5apostrophe=%fkJ/kg\n",h5apostrophe)//ans vary due to roundoff error
+h6=3482.7
+s6=8.0027
+s7=s6
+sg=8.396
+sf=0.4763
+X7=(s7-sf)/(sg-sf)
+mprintf("X7=%f\n",X7)//ans vary due to roundoff error
+hf=137.77
+hg=2561.6
+h7=(hg*X7)+(1-X7)*hf
+mprintf("h7=%fkJ/kg\n",h7)//ans vary due to roundoff error
+WT2=EtaT*(h6-h7)
+mprintf("WT2=%fkJ/kg\n",WT2)//ans in the textbook is wrong
+P2=3 //pressure in MPa
+P1=0.005 //pressure in MPa
+v=0.0010052
+WP=v*(P2-P1)*10^6
+mprintf("WP=%fkJ/kg\n",WP/1000)//ans vary due to roundoff error
+EtaP=0.6
+deltaH=(WP/1000)/EtaP
+mprintf("h2apostrophe-h1=%fkJ/kg\n",deltaH)//ans vary due to roundoff error
+h1=137.77
+h2apostrophe=h1+deltaH
+mprintf("h2apostrophe=%fkJ/kg\n",h2apostrophe)//ans vary due to roundoff error
+Eta=(WT1+WT2-(WP/1000))/((h4-h2apostrophe)+(h6-h5apostrophe))
+mprintf("Eta=%f",Eta)//ans vary due to roundoff error
+
+
diff --git a/3825/CH9/EX9.3/Ex9_3.sce b/3825/CH9/EX9.3/Ex9_3.sce
new file mode 100644
index 000000000..061fc8494
--- /dev/null
+++ b/3825/CH9/EX9.3/Ex9_3.sce
@@ -0,0 +1,33 @@
+clc
+hf1=191.83//in kJ/kg
+hg1=2584.8//in kJ/kg
+hf2=604.67//in kJ/kg
+hg2=2737.6//in kJ/kg
+sf1=0.6493//in kJ/kg K
+sg1=8.1511//in kJ/kg K
+sf2=1.7764//in kJ/kg K
+sg2=6.8943//in kJ/kg K
+h1=191.83//in kJ/kg
+h2=h1
+h3=604.67//in kJ/kg
+h4=h3
+h7=2995.7//in kJ/kg
+s7=6.5422//in kJ/kg K
+s8=s7
+X8=(s8-sf2)/(sg2-sf2)//entropy equation using quality factor
+mprintf("X8=%f\n",X8)//ans vary due to roundoff error
+h8=(X8*hg2)+(1-X8)*hf2//enthalpy equation using quality factor
+mprintf("h8=%fkJ/kg\n",h8)//ans vary due to roundoff error
+s9=s7
+X9=(s9-sf1)/(sg1-sf1)//entropy equation using quality factor
+mprintf("X9=%f\n",X9)//ans vary due to roundoff error
+h9=(X9*hg1)+(1-X9)*hf1//enthalpy equation using quality factor
+mprintf("h9=%fkJ/kg\n",h9)//ans vary due to roundoff error
+Yapostrophe=(h3-h2)/(h8-h2)//fraction of steam extracted from the turbine for preheating
+mprintf("Yapostrophe=%f\n",Yapostrophe)//ans vary due to roundoff error
+Eta=((h7-h4)-((1-Yapostrophe)*(h9-h1)))/(h7-h4)//thermal efficiency of steam power plant
+mprintf("Eta=%f",Eta)//ans vary due to roundoff error
+
+
+
+
diff --git a/3825/CH9/EX9.4/Ex9_4.sce b/3825/CH9/EX9.4/Ex9_4.sce
new file mode 100644
index 000000000..727a59e5f
--- /dev/null
+++ b/3825/CH9/EX9.4/Ex9_4.sce
@@ -0,0 +1,36 @@
+clc
+T1=300
+P1=100 //pressure in kPa
+ro=8 //=V1/V2
+gama=1.4
+T2=T1*ro^(gama-1)
+mprintf("T2=%fK\n",T2)//ans vary due to roundoff error
+P2=P1*ro^gama
+mprintf("P2=%fkPa\n",P2)//ans vary due to roundoff error
+deltau=1840
+Cv=0.7176
+T3=(deltau/Cv)+T2
+mprintf("T3=%fK\n",T3)//ans vary due to roundoff error
+P3=(P2*T3)/T2
+mprintf("P3=%fkPa\n",P3)//ans vary due to roundoff error
+a=1/8 //=V3/V4
+T4=T3*a^(gama-1)
+mprintf("T4=%fK\n",T4)//ans vary due to roundoff error
+P4=P3*a^gama
+mprintf("P4=%fkPa\n",P4)//ans vary due to roundoff error
+Eta=1-(1/ro)^(gama-1)
+mprintf("Thermal efficiency=%f\n",Eta)//ans vary due to roundoff error
+q1=deltau
+mprintf("Work done=%fkJ/kg\n",q1*Eta)//ans vary due to roundoff error
+N=1
+R=8.314*10^3
+P1=28.97 //pressure in bar
+V1=(N*R*T1)/(P1*10^5)
+mprintf("V1=%fmetre-cube/kg\n",V1)//ans vary due to roundoff error
+V2=V1/ro
+mprintf("V2=%fmetre-cube/kg\n",V2)//ans vary due to roundoff error
+Pm=(q1*Eta)/(V1-V2)
+mprintf("Pm=%fkPa",Pm)//ans vary due to roundoff error
+
+
+
diff --git a/3825/CH9/EX9.5/Ex9_5.sce b/3825/CH9/EX9.5/Ex9_5.sce
new file mode 100644
index 000000000..5f6d752b5
--- /dev/null
+++ b/3825/CH9/EX9.5/Ex9_5.sce
@@ -0,0 +1,17 @@
+clc
+P3=7 //pressure in MPa
+P1=0.1//pressure in MPa
+T1=310.15 //temperature in kelvin
+T3=2973.15 //temperature in kelvin
+ro=(P3*T1)/(T3*P1)
+mprintf("ro=%f\n",ro)//ans vary due to roundoff error
+gama=1.4
+Eta=1-(1/ro)^(gama-1)
+mprintf("Eta=%f\n",Eta)//ans vary due to roundoff error
+T2=T1*(ro^(gama-1))
+mprintf("T2=%fK\n",T2)//ans vary due to roundoff error
+Cv=0.7176
+q1=Cv*(T3-T2)
+mprintf("q1=%fkJ/kg\n",q1)//ans vary due to roundoff error
+W=q1*Eta
+mprintf("W=%fkJ/kg",W)//ans vary due to roundoff error
diff --git a/3825/CH9/EX9.6/Ex9_6.sce b/3825/CH9/EX9.6/Ex9_6.sce
new file mode 100644
index 000000000..0121e3149
--- /dev/null
+++ b/3825/CH9/EX9.6/Ex9_6.sce
@@ -0,0 +1,19 @@
+clc
+P2=4 //pressure in MPa
+P1=0.1 //pressure in MPa
+gama=1.4
+T1=323
+ro=(P2/P1)^(1/gama)
+mprintf("ro=%f\n",ro)//ans vary due to roundoff error
+T2=(P2*T1*(1/ro))/P1
+mprintf("T2=%fK\n",T2)//ans vary due to roundoff error
+q1=600
+CP=1.0047
+T3=(q1/CP)+T2
+mprintf("T3=%fK\n",T3)//ans vary due to roundoff error
+P3=P2
+rc=(T3/T2)
+mprintf("rc=%f\n",rc)//ans vary due to roundoff error
+Eta=1-((1/(gama*ro^(gama-1)))*(((rc^gama)-1)/(rc-1)))
+mprintf("Eta=%f\n",Eta)//ans vary due to roundoff error
+mprintf("Work done=%fkJ/kg",Eta*q1)//ans vary due to roundoff error
diff --git a/3825/CH9/EX9.7/Ex9_7.sce b/3825/CH9/EX9.7/Ex9_7.sce
new file mode 100644
index 000000000..e92a73568
--- /dev/null
+++ b/3825/CH9/EX9.7/Ex9_7.sce
@@ -0,0 +1,18 @@
+clc
+ro=16
+gama=1.4
+T1=310.15 //temperature in kelvin
+T2=T1*(ro^(gama-1))
+mprintf("T2=%fK\n",T2)//ans vary due to roundoff error
+deltas=1.2
+CP=1.0047
+T3=(%e^(deltas/CP))*T2
+mprintf("T3=%fK\n",T3)//ans vary due to roundoff error
+q1=CP*(T3-T2)
+rc=T3/T2
+mprintf("rc=%f\n",rc)//ans vary due to roundoff error
+mprintf("q1=%fkJ/kg\n",q1)//ans vary due to roundoff error
+Eta=1-(((rc^gama)-1)/((gama*ro^(gama-1))*(rc-1)))
+mprintf("Eta=%f",Eta)//ans vary due to roundoff error
+
+
diff --git a/3825/CH9/EX9.8/Ex9_8.sce b/3825/CH9/EX9.8/Ex9_8.sce
new file mode 100644
index 000000000..fbc6e2498
--- /dev/null
+++ b/3825/CH9/EX9.8/Ex9_8.sce
@@ -0,0 +1,27 @@
+clc
+P1=100 //pressure in kPa
+T1=300 //temperature in kelvin
+rp=8
+P2=P1*rp
+gama=1.4
+mprintf("P2=%fkPa\n",P2)//ans vary due to roundoff error
+T2=T1*rp^((gama-1)/gama)
+mprintf("T2=%fK\n",T2)//ans vary due to roundoff error
+P3=P2
+T3=1300
+Tmax=T3
+T4=T3*(1/rp)^((gama-1)/gama)
+mprintf("T4=%fK\n",T4)//ans vary due to roundoff error
+P4=P1
+Cp=1.0047
+Wc=-Cp*(T2-T1)
+mprintf("Wc=%fkJ/kg\n",Wc)//ans vary due to roundoff error
+WT=Cp*(T3-T4)
+mprintf("WT=%fkJ/kg\n",WT)//ans vary due to roundoff error
+Wnet=WT+Wc
+mprintf("Net Work done=%fkJ/kg\n",Wnet)//ans vary due to roundoff error
+q1=Cp*(T3-T2)
+mprintf("Energy added=%fkJ/kg\n",q1)//ans vary due to roundoff error
+Eta=Wnet/q1
+mprintf("Thermal efficiency=%f",Eta)//ans vary due to roundoff error
+
diff --git a/3825/CH9/EX9.9/Ex9_9.sce b/3825/CH9/EX9.9/Ex9_9.sce
new file mode 100644
index 000000000..acd06e8ba
--- /dev/null
+++ b/3825/CH9/EX9.9/Ex9_9.sce
@@ -0,0 +1,24 @@
+clc
+h2=203.1063
+s2=0.6825
+sf=0.0736
+sg=0.7094
+hf=17.9517
+hg=178.9017
+s1=s2
+X1=(s1-sf)/(sg-sf)
+mprintf("X1=%f\n",X1)//ans vary due to roundoff error
+h1=(X1*hg)+(1-X1)*hf
+mprintf("h1=%fkJ/kg\n",h1)//ans vary due to roundoff error
+h3=75.1134
+h4=h3
+COPR=(h1-h4)/(h2-h1)
+mprintf("COPR=%f\n",COPR)//ans vary due to roundoff error
+m=0.05
+mprintf("Capacity of refrigerator=%fkW\n",m*(h1-h4))//ans vary due to roundoff error
+Preq=m*(h2-h1)
+mprintf("Power required=%fkW\n",Preq)//ans vary due to roundoff error
+TL=253 //in kelvin
+TH=313 //in kelvin
+COP=TL/(TH-TL)
+mprintf("COP=%f",COP)//ans vary due to roundoff error