initial commit / add all books

18 files changed, 267 insertions, 0 deletions

diff --git a/1571/CH8/EX8.1/Chapter8_Example1.sce b/1571/CH8/EX8.1/Chapter8_Example1.sce
new file mode 100755
index 000000000..380272661
--- /dev/null
+++ b/1571/CH8/EX8.1/Chapter8_Example1.sce
@@ -0,0 +1,14 @@
+clc

+clear

+

+//INPUT

+l=80;//latent heat of fusion in cal

+j=4.2*10^7;//joules constant in ergs/cal

+w=-0.092*10^6;//work done in changing phase change in ergs

+

+//CALCULATIONS

+q=l*j;//heat added in ergs

+du=q-w;//internal energy in ergs

+

+//OUTPUT

+mprintf('the change in internal energy is %3.2f ergs',du)

diff --git a/1571/CH8/EX8.10/Chapter8_Example10.sce b/1571/CH8/EX8.10/Chapter8_Example10.sce
new file mode 100755
index 000000000..f45f36acb
--- /dev/null
+++ b/1571/CH8/EX8.10/Chapter8_Example10.sce
@@ -0,0 +1,18 @@
+clc

+clear

+

+//INPUT

+p1=76;//inital pressure in cm

+t1=290;//inital temperature in K

+y=1.4;//coefficent of expansion

+dv=2;//ratio of inital to fianl volume when air expands isothermally 

+dv1=2;//ratio of inital to final volume when air expands adiabatically

+

+//CALCULATIONS

+p2=p1/dv;//final pressure when air expands isothermally in cm of hg

+t2=t1;//final temperature when air expands isothermally in K

+t3=t2*(1/dv1)^(y-1);//temprature when air expands adiabatically in K

+p3=p2*(1/dv1)^(y);//final pressure when air expands adiabatically in mm of hg

+

+//OUTPUT

+mprintf('final pressure when air expands isothermally in cm of hg %3.2f mm of hg \n final temperature when air expands isothermally is %3.2f K \n temprature when air expands adiabatically is %3.2f K \n final pressure when air expands adiabatically is %3.2f mm of hg',p2,t2,t3,p3)

diff --git a/1571/CH8/EX8.11/Chapter8_Example11.sce b/1571/CH8/EX8.11/Chapter8_Example11.sce
new file mode 100755
index 000000000..662a8c3f6
--- /dev/null
+++ b/1571/CH8/EX8.11/Chapter8_Example11.sce
@@ -0,0 +1,16 @@
+clc

+clear

+

+//INPUT

+p=76*13.6*981;//pressure of air in dynes/sq.cm

+v=11100;//volume expanded in ml

+t1=273;//inital temperature in K

+t2=274;//final temperature in K

+cv=2.411;//specific heat at constant volume in cal/K

+j=4.2*10^7;//joules constant in ergs/cal

+//CALCULATIONS

+w=p*v*log(t2/t1);//work done in ergs

+h=cv*(t2-t1)+w/j;//heat supplied in cal

+

+//OUTPUT

+mprintf('the work done is %3.2f erg \n the heat supplied is %3.3f cal',w,h)

diff --git a/1571/CH8/EX8.12/Chapter8_Example12.sce b/1571/CH8/EX8.12/Chapter8_Example12.sce
new file mode 100755
index 000000000..a31c7c0bb
--- /dev/null
+++ b/1571/CH8/EX8.12/Chapter8_Example12.sce
@@ -0,0 +1,17 @@
+clc

+clear

+

+//INPUT

+p=10^6;//pressure of air in dynes

+d=0.0001293;//density of air in gm/cc

+t1=273;//inital temperature in K

+dv=2;//ratio of inital volume to final volume

+y=1.4;//coefficient of expansion

+

+//CALCULATIONS

+r=p/(d*t1);//universal gas constant in dynes.cc/gm.K

+t2=t1*(dv)^(y-1);//final temperature in K

+w=r*(t2-t1)/(y-1);//work done in adiabatic compression in ergs

+

+//OUTPUT

+mprintf('work done in adiabatic compression is %3.2f ergs',w)

diff --git a/1571/CH8/EX8.13/Chapter8_Example13.sce b/1571/CH8/EX8.13/Chapter8_Example13.sce
new file mode 100755
index 000000000..1907a2c2d
--- /dev/null
+++ b/1571/CH8/EX8.13/Chapter8_Example13.sce
@@ -0,0 +1,13 @@
+clc

+clear

+

+//INPUT

+m=5;//mass of air in gm

+cv=0.172;//specific heat at constant volume cal/gm

+dt=10;//changi in temperature in K

+

+//CALCULATIONS

+ie=m*cv*dt;//change in internal energy in cal

+

+//OUTPUT

+mprintf('change in internal energy is %3.2f cal',ie)

diff --git a/1571/CH8/EX8.14/Chapter8_Example14.sce b/1571/CH8/EX8.14/Chapter8_Example14.sce
new file mode 100755
index 000000000..948975211
--- /dev/null
+++ b/1571/CH8/EX8.14/Chapter8_Example14.sce
@@ -0,0 +1,19 @@
+clc

+clear

+

+//INPUT

+v1=10^3;//inital volume in cc

+v2=2*v1;//final volume in cc

+p1=76*13.6*981;//pressure in dyne/sq.cm

+t1=273;//intial temperature in K

+d=1.29;//density of the gas gm/lit

+cv=0.168;//specific heat at constant volume in cal/gm

+

+//CALCULATIONS

+t2=(v2/v1)*t1;//final temperature in K

+r=0.068;//universal gas constant in cal

+cp=cv+r;//specific heat at constant pressure in cal

+q=d*cp*(t2-t1);//heat supplied in cal

+

+//OUTPUT

+mprintf('the heat supplied to the gas is %3.2f cal',q)

diff --git a/1571/CH8/EX8.15/Chapter8_Example15.sce b/1571/CH8/EX8.15/Chapter8_Example15.sce
new file mode 100755
index 000000000..9abb0e9af
--- /dev/null
+++ b/1571/CH8/EX8.15/Chapter8_Example15.sce
@@ -0,0 +1,14 @@
+clc

+clear

+

+//INPUT

+t=303;//temperature of the one mole of the argon in K

+v1=1;//intial volume in litres

+v2=10;//final volume in litres

+r=8.31*10^7;//universal gas constant in ergs/K.mol

+

+//CALCULATIONS

+w=r*t*log(v2/v1);//work done in isothermal expansion in ergs

+

+//OUTPUT

+mprintf('the work done in isothermal expansion is %3.2f ergs',w)

diff --git a/1571/CH8/EX8.16/Chapter8_Example16.sce b/1571/CH8/EX8.16/Chapter8_Example16.sce
new file mode 100755
index 000000000..fa5916b99
--- /dev/null
+++ b/1571/CH8/EX8.16/Chapter8_Example16.sce
@@ -0,0 +1,14 @@
+clc

+clear

+

+//INPUT

+dv=4;//final volume of neon in lit

+t=273;//temperature of the gas in K

+n=2.6/22.4;//the no.of moles of neon

+r=1.98;//universal gas constant in cal/K.mol

+

+//CALCULATIONS

+w=n*t*r*log(dv);//work done by gas in ergs

+

+//OUTPUT

+mprintf('the work done by 2.6lit of neon is %3.2f ergs',w)

diff --git a/1571/CH8/EX8.18/Chapter8_Example18.sce b/1571/CH8/EX8.18/Chapter8_Example18.sce
new file mode 100755
index 000000000..e4d6693d4
--- /dev/null
+++ b/1571/CH8/EX8.18/Chapter8_Example18.sce
@@ -0,0 +1,13 @@
+clc

+clear

+

+//INPUT

+dv=10^(-3);//ratio of initial and final volume

+t1=10^5;//initial temperature in K

+y=1.66;//coefficient of expansion

+

+//CALCULATIONS

+t2=t1*(dv)^(y-1);//final temperature in K

+

+//OUTPUT

+mprintf('final temperature of the gas is %3.2f K',t2)

diff --git a/1571/CH8/EX8.19/Chapter8_Example19.sce b/1571/CH8/EX8.19/Chapter8_Example19.sce
new file mode 100755
index 000000000..f8a901aeb
--- /dev/null
+++ b/1571/CH8/EX8.19/Chapter8_Example19.sce
@@ -0,0 +1,14 @@
+clc

+clear

+

+//INPUT

+p1=8;//intial pressure in cm of hg

+p2=6;//final pressure in cm of hg

+v1=1000;//intial volume in cc

+v2=1190;//final volume in cc

+

+//CALCULATIONS

+y=log(p1/p2)/log(v2/v1);//coefficient of expansion

+

+//OUTPUT

+mprintf('the coefficent of expansion is %3.2f',y)

diff --git a/1571/CH8/EX8.2/Chapter8_Example2.sce b/1571/CH8/EX8.2/Chapter8_Example2.sce
new file mode 100755
index 000000000..16ef0f676
--- /dev/null
+++ b/1571/CH8/EX8.2/Chapter8_Example2.sce
@@ -0,0 +1,17 @@
+clc

+clear

+

+//INPUT

+m=1;//mass in gm

+l=536;//latent heat in cal/gm

+j=4.2*10^7;//joules constant in ergs/cal

+v=1649;//volume of water in cc

+p=76*13.6*981;//pressure of water in dynes/sq.cm

+

+//CALCULATIONS

+dq=m*l*j;//heat supplied in ergs

+dw=p*v;//work done in ergs

+du=dq-dw;//internal energy developed in ergs

+

+//OUTPUT

+mprintf('internal energy of water is %3.2f ergs',du)

diff --git a/1571/CH8/EX8.3/Chapter8_Example3.sce b/1571/CH8/EX8.3/Chapter8_Example3.sce
new file mode 100755
index 000000000..45a445ad0
--- /dev/null
+++ b/1571/CH8/EX8.3/Chapter8_Example3.sce
@@ -0,0 +1,13 @@
+clc

+clear

+

+//INPUT

+dv=10;//ratio of original volume to final volume

+t1=293;//inital temperature in K

+y=1.41;//coefficent of expansion

+

+//CALCULATIONS

+t2=t1*(dv)^(y-1);//final temperature in K

+

+//OUTPUT

+mprintf('the final temperature is %3.2f K',t2)

diff --git a/1571/CH8/EX8.4/Chapter8_Example4.sce b/1571/CH8/EX8.4/Chapter8_Example4.sce
new file mode 100755
index 000000000..09479cb8c
--- /dev/null
+++ b/1571/CH8/EX8.4/Chapter8_Example4.sce
@@ -0,0 +1,14 @@
+clc

+clear

+

+//INPUT

+t=273;//temperature of earth at height h in K

+p=760;//pressure in mm of hg

+dp=1;//change in pressure in mm of hg

+y=1.418;//coefficient of expansion

+

+//CALCULATIONS

+dt=((y-1)/y)*dp*t/p;//change in temperature in deg.C

+

+//OUTPUT

+mprintf('the change in temperature is %3.3f deg.C',dt)

diff --git a/1571/CH8/EX8.5/Chapter8_Example5.sce b/1571/CH8/EX8.5/Chapter8_Example5.sce
new file mode 100755
index 000000000..481a36360
--- /dev/null
+++ b/1571/CH8/EX8.5/Chapter8_Example5.sce
@@ -0,0 +1,15 @@
+clc

+clear

+

+//INPUT

+p1=2;//pressure initial in atm

+p2=1;//pressure final in atm

+t1=288;//inital temperature in K

+y=1.4;//coefficent of expansion

+

+//CALCULATIONS

+t2=t1*(p2/p1)^((y-1)/y);//final temperature in K

+dt=t1-t2;//drop in temperature in K

+

+//OUTPUT

+mprintf('drop in temperature is %3.2f K',dt)

diff --git a/1571/CH8/EX8.6/Chapter8_Example6.sce b/1571/CH8/EX8.6/Chapter8_Example6.sce
new file mode 100755
index 000000000..75aaf063f
--- /dev/null
+++ b/1571/CH8/EX8.6/Chapter8_Example6.sce
@@ -0,0 +1,13 @@
+clc

+clear

+

+//INPUT

+t1=288;//inital temperature in K

+dv=1/2;//ratio of inital to final volume

+y=1.4;//coefficient of expansion

+

+//CALCULATIONS

+t2=t1*(dv)^(y-1);//final temperature in K

+

+//OUTPUT

+mprintf('the final temperature is %3.1f K',t2)

diff --git a/1571/CH8/EX8.7/Chapter8_Example7.sce b/1571/CH8/EX8.7/Chapter8_Example7.sce
new file mode 100755
index 000000000..dc420e833
--- /dev/null
+++ b/1571/CH8/EX8.7/Chapter8_Example7.sce
@@ -0,0 +1,16 @@
+clc

+clear

+

+//INPUT

+y=1.4;//coefficent of exapnsion

+p1=1;//standard pressure in atm

+dv=50;//ratio of initial volume to final volume

+t1=273;//standard temperature in K

+

+//CALCULATIONS

+p2=p1*dv;//final pressure when slowly compressed in atm

+p3=p1*(dv)^(y);//final pressure when suddenly compressed in atm

+t2=t1*(dv)^(y-1);//rise in temperature when it is suddenly compressed in K

+

+//OUTPUT

+mprintf('the final pressure when it is compressed slowly is %3fatm \n the final pressure when it is compressed suddenly is %3.2fatm \n the rise in temperature when it is suddenly compressed is %3.0fK',p2,p3,t2)

diff --git a/1571/CH8/EX8.8/Chapter8_Example8.sce b/1571/CH8/EX8.8/Chapter8_Example8.sce
new file mode 100755
index 000000000..23f0de712
--- /dev/null
+++ b/1571/CH8/EX8.8/Chapter8_Example8.sce
@@ -0,0 +1,14 @@
+clc

+clear

+

+//INPUT

+y=1.5;//coefficient of expansion

+dp=1/8;//ratio of inital pressure to final pressure

+t1=300;//inital tempreature in K

+

+//CALCULATIONS

+t2=t1*(dp)^((1-y)/y);//change in temperature in K

+t3=t2-t1;//rise in temperature in K

+

+//OUTPUT

+mprintf('the rise in temperature is %3.2f K',t3)

diff --git a/1571/CH8/EX8.9/Chapter8_Example9.sce b/1571/CH8/EX8.9/Chapter8_Example9.sce
new file mode 100755
index 000000000..005ca3e92
--- /dev/null
+++ b/1571/CH8/EX8.9/Chapter8_Example9.sce
@@ -0,0 +1,13 @@
+clc

+clear

+

+//INPUT

+t1=400;//inital temperature in K

+dv=2;//ratio of volumes final and inital

+r=8.31*10^7;//universal gas constant in ergs/kg.K

+

+//CALCULATIONS

+w=r*t1*log(2);//work done in expanding isothermally in ergs

+

+//OUTPUT

+mprintf('the work done in expanding isothermally is %3.2f ergs',w)