10 files changed, 159 insertions, 0 deletions
diff --git a/172/CH5/EX5.1/ex1.sce b/172/CH5/EX5.1/ex1.sce
new file mode 100755
index 000000000..ff728fe3b
--- /dev/null
+++ b/172/CH5/EX5.1/ex1.sce
@@ -0,0 +1,10 @@
+//example 1
+//calculating height
+clear
+clc
+m=1100 //mass of car in kg
+ke=400 //kinetic energy of car in kJ
+V=(2*ke*1000/m)^0.5 //velocity of car in m/s
+g=9.807 //acc. due to gravity in m/s^2
+H=ke*1000/(m*g) //height to which the car  should be lifted so that its potential energy equals its kinetic energy
+disp('hence,the car should be raised to a height of 37.1 m to make its potential energy equal to kinetic energy')
+\ No newline at end of file
diff --git a/172/CH5/EX5.10/ex10.sce b/172/CH5/EX5.10/ex10.sce
new file mode 100755
index 000000000..8cf87ce92
--- /dev/null
+++ b/172/CH5/EX5.10/ex10.sce
@@ -0,0 +1,8 @@
+//example 10
+//calculating rate of increase of internal energy
+clear
+clc
+W=-12.8*20 //power consumed in  J/s
+Q=-10 //heat transfer rate from battery in J/s
+r=Q-W //rate of increase of internal energy
+printf("\n hence,the rate of increase of internal energy is r=%.0f J/s. \n", r)
+\ No newline at end of file
diff --git a/172/CH5/EX5.11/ex11.sce b/172/CH5/EX5.11/ex11.sce
new file mode 100755
index 000000000..0648afff6
--- /dev/null
+++ b/172/CH5/EX5.11/ex11.sce
@@ -0,0 +1,16 @@
+//example 11
+//rate of change of temperature
+clear
+clc
+Q=1500 //power produced by burning wood in J/s
+mair=1 //mass of air in kg
+mwood=5 //mass of soft pine wood in kg 
+miron=25 //mass of cast iron in kg
+Cvair=0.717 //constant volume specific heat for air in kJ/kg
+Cwood=1.38 //constant volume specific heat for wood in kJ/kg
+Ciron=0.42 //constant volume specific heat for iron in kJ/kg
+dT=75-20 //increase in temperature in Celsius
+T=(Q/1000)/(mair*Cvair+mwood*Cwood+miron*Ciron) //rate of change of temperature in K/s
+dt=(dT/T)/60 //in minutes
+printf(" hence,the rate of change of temperature is dt=%.4f K/s.\n", T)
+printf(" and time taken to reach a temperature of T=%.0f min.\n", dt)
+\ No newline at end of file
diff --git a/172/CH5/EX5.2/ex2.sce b/172/CH5/EX5.2/ex2.sce
new file mode 100755
index 000000000..2cc7f9fef
--- /dev/null
+++ b/172/CH5/EX5.2/ex2.sce
@@ -0,0 +1,8 @@
+//example 2
+//change in internal energy
+clear
+clc
+W=-5090 //work input to paddle wheel in kJ
+Q=-1500 //heat transfer from tank in kJ
+dU=Q-W //change in internal energy in kJ
+disp('hence,change in internal energy is 3590 kJ')
+\ No newline at end of file
diff --git a/172/CH5/EX5.3/ex3.sce b/172/CH5/EX5.3/ex3.sce
new file mode 100755
index 000000000..54e2fb70c
--- /dev/null
+++ b/172/CH5/EX5.3/ex3.sce
@@ -0,0 +1,25 @@
+//example 3
+//analysis of energy transfer
+clear
+clc
+g=9.806 //acceleration due to gravity in m/s^2
+m=10 //mass of stone in kg
+H1=10.2 //initial height of stone above water in metres
+H2=0 //final height in metres
+dKE1=-m*g*(H2-H1) //change in kinetic energy when stone enters state 2 in J
+dPE1=-1 //change in potential energy when stone enters state 2 in J
+printf("\n hence,when stone is about to enter state 2, dKE = %.3f J. \n",dKE1)
+printf("\n and dPE = %.3f J. \n",dPE1)
+dPE2=0 //change in potential energy when stone enters state 3 in JQ2=0 //no heat transfer when stone enters state 3 in J
+W2=0 //no work done when stone enters state 3 in J
+dKE2=-1 //change in kinetic energy when stone enters state 3
+dU2=-dKE2 //change in internal energy when stone enters state 3 in J
+printf("\n hence,when stone has just come to rest in the bucket i.e. state 3, W=0, dPE=0, dKE1 = %.3f J. \n",dKE2)
+printf("\n and dU = %.3f J. \n",dU2)
+dKE3=0 //change in kinetic energy when stone enters state 4
+dPE=0 //change in potential energy when stone enters state 4 in J
+W3=0 //no work done when stone enters state 4 in J
+dU3=-1 //change in internal energy when stone enters state 4 in J
+Q3=dU3 //heat transfer when stone enters state 4 in J
+printf("\n hence,when stone has entered state 4, dPE=0, W3=0,dKE=0, dU= %.3f J. \n",dU3)
+printf("\n and Q3= %.3f J. \n",Q3)
+\ No newline at end of file
diff --git a/172/CH5/EX5.4/ex4.sce b/172/CH5/EX5.4/ex4.sce
new file mode 100755
index 000000000..2f8e48dec
--- /dev/null
+++ b/172/CH5/EX5.4/ex4.sce
@@ -0,0 +1,19 @@
+//example 4
+//Determinig the missing properties 
+clear
+clc
+T1=300 //given temp. in Celsius
+u1=2780 //given specific internal enrgy in kJ/kg
+disp('From steam table, at T=300 C,ug=2563.0 kJ/kg.So,u1>ug ,it means the state is in the superheated vapor region.So, by interplotation,we find P=1648 kPa and v=0.1542 m^3/kg')
+P2=2000 //hiven pressure in kPa
+u2=2000 //given specific intrernal energy in kJ/kg
+disp('at P=2000 kPa,')
+uf=906.4 //in kJ/kg
+ug=2600.3 //in kJ/kg 
+x2=(u2-906.4)/(ug-uf) 
+disp('Also, under the given conditions')
+vf=0.001177 //in m^3/kg 
+vg=0.099627 //in m^3/kg
+v2=vf+x2*(vg-vf)//Specific volume for water in m^3/kg
+printf("\n hence,specific volume for water is v2 = %.5f m^3/kg. \n",v2)
+printf("\n Therefore ,this state is in the two phase region with quality x2=%.4f . \n",x2)
+\ No newline at end of file
diff --git a/172/CH5/EX5.5/ex5.sce b/172/CH5/EX5.5/ex5.sce
new file mode 100755
index 000000000..d2af49083
--- /dev/null
+++ b/172/CH5/EX5.5/ex5.sce
@@ -0,0 +1,21 @@
+//example 5
+//calculating heat transfer for the given process
+clear
+clc
+Vliq=0.05 //volume of saturated liquid in m^3
+vf=0.001043 //in m^3/kg
+Vvap=4.95 //volume of saturated water vapour in m^3
+vg=1.6940 //in m^3/kg
+m1liq=Vliq/vf //mass of liquid in kg
+m1vap=Vvap/vg //mass of vapors in kg
+u1liq=417.36 //specific internal energy of liquid in kJ/kg
+u1vap=2506.1 //specific internal energy of vapors in kJ/kg
+U1=m1liq*u1liq+m1vap*u1vap //total internal energy in kJ
+m=m1liq+m1vap //total mass in kg
+V=5 //total volume in m^3
+v2=V/m //final specific volume in m^3/kg
+disp('by interplotation we find that for steam, if vg=0.09831 m^3/kg then pressure is 2.03 MPa')
+u2=2600.5 //specific internal energy at final state in kJ/kg
+U2=m*u2 //internal energy at final state in kJ
+Q=U2-U1 //heat transfer for the process in kJ
+printf("\n hence,heat transfer for the process is Q = %.0f kJ. \n",Q)
+\ No newline at end of file
diff --git a/172/CH5/EX5.6/ex6.sce b/172/CH5/EX5.6/ex6.sce
new file mode 100755
index 000000000..4adda4d24
--- /dev/null
+++ b/172/CH5/EX5.6/ex6.sce
@@ -0,0 +1,20 @@
+//example 6
+//calculating work and heat transfer for the process
+clear
+clc
+V1=0.1 //volume of cylinder in m^3
+m=0.5 //mass of steam in kg
+v1=V1/m //specific volume of steam in m^3/kg
+vf=0.001084 //m^3/kg
+vfg=0.4614 //m^3/kg
+x1=(v1-vf)/vfg //quality
+hf=604.74 //kJ/kg
+hfg=2133.8//kJ/kg
+h2=3066.8 //final specific heat enthalpy in kJ/kg
+h1=hf+x1*hfg //initial specific enthalpy in kJ/kg
+Q=m*(h2-h1) //heat transfer for this process in kJ
+P=400 //pressure inside cylinder in kPa
+v2=0.6548 //specific enthalpy in m^3/kg
+W=m*P*(v2-v1) //work done for the process in kJ
+printf("\n hence, work done for the process, W = %.3f kJ. \n",W)
+printf("\n and heat transfer, Q=%.3f kJ.\n",Q)
+\ No newline at end of file
diff --git a/172/CH5/EX5.8/ex8.sce b/172/CH5/EX5.8/ex8.sce
new file mode 100755
index 000000000..e9eafd090
--- /dev/null
+++ b/172/CH5/EX5.8/ex8.sce
@@ -0,0 +1,18 @@
+//example 8
+//calculating change in enthalpy
+clear
+clc
+h1=273.2 //specific heat enthalpy for oxygen at 300 K
+h2=1540.2 //specific heat enthalpy for oxygen at 1500 K
+T1=300 //initial temperature in K
+T2=1500 //final temparature in K
+x=poly([0],'x');
+Cp=0.88-0.00001*x+0.54*x^2-0.33*x^3 //expression for constant pressure specific heat enthalpy for oxygen
+dh1=h2-h1 //this change in specific heat enthalpy is calculated using ideal gas tables 
+dh2=1000*integrate('0.88-0.00001*x+0.54*x^2-0.33*x^3','x',T1/1000,T2/1000) //using empirical equation
+dh3=0.922*(T2-T1) //it is claculated if we assume specific heat enthalpy to be constant and uses its value at 300K
+dh4=1.0767*(T2-T1) //it is claculated if we assume specific heat enthalpy to be constant and uses its value at 900K i.e mean of initial and final temperature
+printf("\n Hence,change in specific heat enthalpy if ideal gas tables are used is dh1=%.1f kJ/kg. \n", dh1)
+printf("\n if empirical equations are used, dh2=%.1f kJ/kg. \n", dh2)
+printf("\n if specific heat is assumed to be constant and using its value at T1, dh3=%.1f kJ/kg. \n", dh3)
+printf("\n if specific heat is assumed to be constant at its value at (T1+T2)/2, dh4=%.1f kJ/kg. \n", dh4)
+\ No newline at end of file
diff --git a/172/CH5/EX5.9/ex9.sce b/172/CH5/EX5.9/ex9.sce
new file mode 100755
index 000000000..e8574c903
--- /dev/null
+++ b/172/CH5/EX5.9/ex9.sce
@@ -0,0 +1,14 @@
+//example 9
+//determining amount of heat transfer
+clear
+clc
+P=150 //pressure of nitrogen in cylinder in kPa
+V=0.1 //initial volume of cylinder in m^3
+T1=25 //initial temperature of nitrogen in celsius
+T2=150 //final tempareture of nitrogen in celsius
+R=0.2968 //in kJ/kg-K
+m=P*V/(R*(T1+273)) //mass of nitrogen in kg
+Cv=0.745 //constant volume specific heat for nitrogen in kJ/kg-K
+W=-20 //work done on nitrogen gas in kJ
+Q=m*Cv*(T2-T1)+W //heat transfer during the process in kJ
+printf("\n hence,the heat transfer for the above process is Q=%.1f kJ. \n", Q)
+\ No newline at end of file