initial commit / add all books

8 files changed, 179 insertions, 0 deletions

diff --git a/2063/CH10/EX10.1/10_1.sce b/2063/CH10/EX10.1/10_1.sce
new file mode 100755
index 000000000..87633a106
--- /dev/null
+++ b/2063/CH10/EX10.1/10_1.sce
@@ -0,0 +1,21 @@
+clc

+clear

+//Input data

+T1=273;//The temperature of ice in K

+T2=298;//Temperature of water at room in K

+COP=2.1;//Cop of the plant

+ne=90;//Overall electrochemical efficiency in percentage

+w=15;//Weight of ice produced per day in tonnes

+cw=4.187;//Specific heat of water in kJ/kg degrees celcius

+Li=335;//Latent heat of ice in kJ/kg

+mi=1;//Mass of ice produced at 0 degrees celcius

+

+//Calculations

+m=(w*1000)/(24*60);//Mass of ice produced in kg/min

+h=(mi*cw*(T2-T1))+Li;//Heat extracted from 1kg of water at 25 degrees celcius to produce 1kg of ice at 0 degrees celcius in kJ/kg

+Q=m*h;//Total heat extracted in kJ

+W=Q/COP;//Work done by the compressor in kJ/kg

+P=W/(60*(ne/100));//Power of compressor in kW

+

+//Output

+printf('Power rating of the compressor-motor unit if the cop of the plant is 2.1 is %3.1f kW',P)

diff --git a/2063/CH10/EX10.2/10_2.sce b/2063/CH10/EX10.2/10_2.sce
new file mode 100755
index 000000000..75da2e64a
--- /dev/null
+++ b/2063/CH10/EX10.2/10_2.sce
@@ -0,0 +1,20 @@
+clc

+clear

+//Input data

+m=400;//Mass of fruits supplied to a cold storage in kg

+T1=293;//Temperature at which fruits are stored in K

+T2=268;//Temperature of cold storage in K

+t=8;//The time untill which fruits are cooled in hours

+hfg=105;//Latent heat of freezing in kJ/kg

+Cf=1.25;//Specific heat of fruit

+TR=210;//One tonne refrigeration in kJ/min

+

+//Calculations

+Q1=m*Cf*(T1-T2);//Sensible heat in kJ

+Q2=m*hfg;//Latent heat of freezing in kJ

+Q=Q1+Q2;//Heat removed from fruits in 8 hrs

+Th=(Q1+Q2)/(t*60);//Total heat removed in one minute in kJ/kg

+Rc=Th/TR;//Refrigerating capacity of the plant in TR

+

+//Output

+printf('The refrigeration capacity of the plant is %3.3f TR',Rc)

diff --git a/2063/CH10/EX10.3/10_3.sce b/2063/CH10/EX10.3/10_3.sce
new file mode 100755
index 000000000..8d9a7bf23
--- /dev/null
+++ b/2063/CH10/EX10.3/10_3.sce
@@ -0,0 +1,13 @@
+clc

+clear

+//Input data

+T1=300;//The maximum temperature at which carnot cycle operates in K

+T2=250;//The minimum temperature at which carnot cycle operates in K

+

+//Calculations

+COPr=T2/(T1-T2);//COP of the refrigerating machine

+COPh=T1/(T1-T2)//COP of heat pump

+n=((T1-T2)/T1)*100;//COP or efficiency of the heat engine in percentage

+

+//Output data

+printf('(a)COP of the machine when it is operated as a refrigerating machine is %3.2f\n (b)COP when it is operated as heat pump is %3.2f\n (c)COP or efficiency of the Heat engine is %3.2f percent',COPr,COPh,n)

diff --git a/2063/CH10/EX10.4/10_4.sce b/2063/CH10/EX10.4/10_4.sce
new file mode 100755
index 000000000..4b70c37e0
--- /dev/null
+++ b/2063/CH10/EX10.4/10_4.sce
@@ -0,0 +1,26 @@
+clc

+clear

+//Input data

+m=20000;//The storage capacity of fish in a storage plant in kg

+T1=298;//Supplied temperature of fish in K

+T2=263;//Temperature of cold storage in which fish are stored in K

+T3=268;//Freezing point of fish in K

+Caf=2.95;//Specific heat of fish above freezing point in kJ/kg K

+Cbf=1.25;//Specific heat of below freezing point in kJ/kg K

+W=75;//Work required by the plant in kW

+TR=210;//One tonne refrigeration in kJ/min

+hfg=230;//Latent heat of fish in kJ/kg

+

+//Calculations

+COPr=T2/(T1-T2);//COP of reversed carnot cycle

+COPa=0.3*COPr;//Given that actual COP is 0.3 times of reversed COP

+Hr=(COPa*W)*60;//Heat removed by the plant in kJ/min

+C=Hr/TR;//Capacity of the plant in TR

+Q1=m*Caf*(T1-T3);//Heat removed from the fish above freezing point in kJ

+Q2=m*Cbf*(T3-T2);//Heat removed from fish below freezing point in kJ

+Q3=m*hfg;//Total latent heat of the fish in kJ

+Q=Q1+Q2+Q3;//Total heat removed by the plant in kJ

+T=(Q/Hr)/60;//Time taken to achieve cooling in hrs 

+

+//Output data

+printf('(a)Capacity of the plant is %3.2f TR\n (b)Time taken to achieve cooling is %3.2f hours',C,T)

diff --git a/2063/CH10/EX10.5/10_5.sce b/2063/CH10/EX10.5/10_5.sce
new file mode 100755
index 000000000..63b2ca755
--- /dev/null
+++ b/2063/CH10/EX10.5/10_5.sce
@@ -0,0 +1,22 @@
+clc

+clear

+//Input data

+T2=298;//Maximum temperature at which CO2 machine works in K

+T1=268;//Minimum temperature at which CO2 machine works in K

+sf1=-0.042;//Liquid entropy at 268 K in kJ/kg K

+hfg1=245.3;//Latent heat of gas at 268 K in kJ/kg

+sf2=0.251;//Liquid entropy in kJ/kg K

+hfg2=121.4;//Latent heat of gas at 298 K in kJ/kg

+hf1=-7.54;//Liquid enthalpy at 268 K in kJ/kg

+hf2=81.3;//Liquid enthalpy at 298 K in kJ/kg

+hf3=81.3;//Enthalpy at point 3 in graph in kJ/kg

+

+//Calculations

+s2=sf2+(hfg2/T2);//Entropy at point 2 from the graph in kJ/kg K

+x1=(s2-sf1)/(hfg1/T1);//Dryness fraction at point 1

+h1=hf1+(x1*hfg1);//Enthalpy at point 1 in kJ/kg

+h2=hf2+hfg2;//Enthalpy at point 2 in kJ/kg

+COP=(h1-hf3)/(h2-h1);//Coefficient of performance for a CO2 machine working at given temperatures

+

+//Output data

+printf('Theoretical COP for a CO2 machine working at given temperatures is %3.2f',COP)

diff --git a/2063/CH10/EX10.6/10_6.sce b/2063/CH10/EX10.6/10_6.sce
new file mode 100755
index 000000000..d46d7f7a9
--- /dev/null
+++ b/2063/CH10/EX10.6/10_6.sce
@@ -0,0 +1,24 @@
+clc

+clear

+//Input data

+T2=298;//Maximum temperature at which ammonia refrigerating system works in K

+T1=263;//Minimum temperature at which ammonia refrigerating system works in K

+mf=5;//Fluid flow rate in kg/min

+sf1=0.5443;//Liquid entropy at 298 K in kJ/kg K

+sf2=1.1242;//Liquid entropy at 263 K in kJ/kg K

+hfg1=1297.68;//Latent heat at 298 K in kJ/kg

+hfg2=1166.94;//Latent heat at 263 K in kJ/kg

+hf1=135.37;//Liquid enthalpy at point 1 in graph in kJ/kg

+hf2=298.9;//Liquid enthalpy at point 2 in graph in kJ/kg

+TR=210;//One tonne refrigeration in TR

+

+//Calculations

+s2=sf2+(hfg2/T2);//Entropy at point 2 in kJ/kg

+x1=(s2-sf1)/(hfg1/T1);//Dryness fraction at point 1

+h1=hf1+(x1*hfg1);//Enthalpy at point 1 in kJ/kg

+h=h1-hf2;//Heat extracted of refrigerating effect produced per kg of refrigerant in kJ/kg

+ht=mf*h;//Total heat extracted at a fluid flow rate of 5 kg/min in kJ/min

+C=ht/TR;//Capacity of refrigerating in TR

+

+//Output

+printf('The capacity of refrigerator is %3.0f TR',C)

diff --git a/2063/CH10/EX10.7/10_7.sce b/2063/CH10/EX10.7/10_7.sce
new file mode 100755
index 000000000..031f7363e
--- /dev/null
+++ b/2063/CH10/EX10.7/10_7.sce
@@ -0,0 +1,22 @@
+clc

+clear

+//Input data

+T1=263;//Minimum temperature at which ammonia refrigerating machine works in K

+T2=303;//Maximum temperature at which ammonia refrigerating machine works in K

+x1=0.6;//Dryness fraction of ammonia during suction stroke

+sf1=0.5443;//Liquid entropy at 263 K in kJ/kg K

+hfg1=1297.68;//Latent heat at 263 K in kJ/kg

+sf2=1.2037;//Liquid entropy at 303 K in kJ/kg K

+hfg2=1145.8;//Latent heat at 303 K in kJ/kg

+hf1=135.37;//Liquid enthalpy at 263 K in kJ/kg

+hf2=323.08;//Liquid enthalpy at 303 K in kJ/kg

+

+//Calculations

+s1=sf1+((x1*hfg1)/T1);//Entropy at point 1 in kJ/kg K

+x2=(s1-sf2)/(hfg2/T2);//Entropy at point 2 in kJ/kg K

+h1=hf1+(x1*hfg1);//Enthalpy at point 1 in kJ/kg

+h2=hf2+(x2*hfg2);//Enthalpy at point 2 in kJ/kg

+COP=(h1-hf2)/(h2-h1);//Theoretical COP of ammonia refrigerating machine

+

+//Output

+printf('The theoretical COP of a ammonia refrigerating machine working between given temperatures is %3.2f',COP)

diff --git a/2063/CH10/EX10.8/10_8.sce b/2063/CH10/EX10.8/10_8.sce
new file mode 100755
index 000000000..95413e54c
--- /dev/null
+++ b/2063/CH10/EX10.8/10_8.sce
@@ -0,0 +1,31 @@
+clc

+clear

+//Input data

+T1=263;//Minimum temperature at which Vapour compression refrigerator using methyl chloride operates in K

+T2=318;//Maximum temperature at which Vapour compression refrigerator using methyl chloride operates in K

+sf1=0.183;//Entropy of the liquid in kJ/kg K

+hfg1=460.7;//Enthalpy of the liquid in kJ/kg

+sf2=0.485;//Entropy of the liquid in kJ/kg K

+hfg2=483.6;//Enthalpy of the liquid in kJ/kg

+x2=0.95;//Dryness fraction at point 2

+hf3=133.0;//Enthalpy of the liquid in kJ/kg

+W=3600;//Work to be spent corresponding to 1kW/hour

+Cw=4.187;//Specific heat of water in kJ/kg degrees celcius

+mi=1;//Mass of ice produced at 0 degrees celcius

+Li=335;//Latent heat of ice in kJ/kg

+hf1=45.4;//Enthalpy of liquid at 263 K in kJ/kg

+hf2=133;//Enthalpy of liquid at 318 K in kJ/kg

+

+//Calculations

+s2=sf2+((x2*(hfg2-hf2))/T2);//Enthalpy at point 2 in kJ/kg

+x1=(s2-sf1)/((hfg1-hf1)/T1);//Dryness fraction at point 1

+h1=hf1+(x1*hfg1);//Enthalpy at point 1 in kJ/kg

+h2=hf2+(x2*hfg2);//Enthalpy at point 2 in kJ/kg

+COP=(h1-hf3)/(h2-h1);//Theoretical COP

+COPa=0.6*COP;//Actual COP which is 60 percent of theoretical COP

+H=W*COPa;//Heat extracted or refrigeration effect produced per kW hour in kJ

+Hw=(mi*Cw*10)+Li;//Heat extracted from water at 10 degrees celcius for the formation of 1 kg of ice at 0 degrees celcius

+I=H/Hw;//Amount of ice produced in kg/kW hr

+

+//Output

+printf('The amount of ice produced is %3.2f kg/kW hr',I)