initial commit / add all books

7 files changed, 110 insertions, 0 deletions

diff --git a/2132/CH2/EX2.1/Example2_1.sce b/2132/CH2/EX2.1/Example2_1.sce
new file mode 100755
index 000000000..52551238f
--- /dev/null
+++ b/2132/CH2/EX2.1/Example2_1.sce
@@ -0,0 +1,17 @@
+//Example 2.1

+clc;

+clear;

+close;

+

+//Given data :

+V=10;//in m^3

+W=80;//in kN

+g=9.81;//gravity accelerat

+w_water=9.81;//specific weight of water

+format('v',6);

+w=W/V;//specific weight in kN/m^3

+disp(w,"Specific weight of liquid in kN/m^3 : ");

+mass_density=w*1000/g;//kg/m^3

+disp(mass_density,"Mass density of liquid in kg/m^3 : ");

+specific_gravity=w/w_water;//unitless

+disp(specific_gravity,"Specific gravity : ");

diff --git a/2132/CH2/EX2.2/Example2_2.sce b/2132/CH2/EX2.2/Example2_2.sce
new file mode 100755
index 000000000..3868baa09
--- /dev/null
+++ b/2132/CH2/EX2.2/Example2_2.sce
@@ -0,0 +1,14 @@
+//Example 2.2

+clc;

+clear;

+close;

+

+//Given data :

+p1=750;//N/cm^2

+p2=1400;//N/cm^2

+dvBYV=-0.150;//in %

+format('v',9);

+dp=p2-p1;//in N/cm^2

+dp=dp*10^4;//in N/m^2

+K=-dp/(dvBYV/100);//N/m^2

+disp(K,"Bulk modulus(N/m^2) : ");

diff --git a/2132/CH2/EX2.3/Example2_3.sce b/2132/CH2/EX2.3/Example2_3.sce
new file mode 100755
index 000000000..9588365ab
--- /dev/null
+++ b/2132/CH2/EX2.3/Example2_3.sce
@@ -0,0 +1,16 @@
+//Example 2.3

+clc;

+clear;

+close;

+

+//Given data :

+Kwater=2.10*10^6;//kN/m^2

+Kair=140;//kN/m^2

+dvBYV=-1;//in %

+format('v',9);

+//For Water : 

+dp=-Kwater*dvBYV/100;//kN/m^2

+disp(dp,"Increase of pressure in water in kN/m^2");

+//For Air : 

+dp=-Kair*dvBYV/100;//kN/m^2

+disp(dp,"Increase of pressure in air in kN/m^2");

diff --git a/2132/CH2/EX2.4/Example2_4.sce b/2132/CH2/EX2.4/Example2_4.sce
new file mode 100755
index 000000000..3d692e27e
--- /dev/null
+++ b/2132/CH2/EX2.4/Example2_4.sce
@@ -0,0 +1,15 @@
+//Example 2.4

+clc;

+clear;

+close;

+

+//Given data :

+A=0.2;//m^2

+dy=0.02/100;//m

+du=20/100;//cm/s

+mu=0.001;//Ns/m^2

+tau=mu*du/dy;//in N/m^2

+F=tau*A;//N

+disp(F,"Force required in N : ");

+Power=F*du;//Watts

+disp(Power,"Power required in W : ");

diff --git a/2132/CH2/EX2.5/Example2_5.sce b/2132/CH2/EX2.5/Example2_5.sce
new file mode 100755
index 000000000..c790616a5
--- /dev/null
+++ b/2132/CH2/EX2.5/Example2_5.sce
@@ -0,0 +1,12 @@
+//Example 2.5

+clc;

+clear;

+close;

+//Given data :

+format('e',10);

+mu=0.1;//Ns/m^2

+Sp_gravity_liquid=2.1;

+mass_density_water=1000;//in kg/m^3

+rho=Sp_gravity_liquid*mass_density_water;//kg/m^3

+v=mu/rho;//m^2/sec

+disp(v,"Kinematic viscosity of liquid in m^2/sec : ");

diff --git a/2132/CH2/EX2.6/Example2_6.sce b/2132/CH2/EX2.6/Example2_6.sce
new file mode 100755
index 000000000..9cdcc4e4b
--- /dev/null
+++ b/2132/CH2/EX2.6/Example2_6.sce
@@ -0,0 +1,22 @@
+//Example 2.6

+clc;

+clear;

+close;

+//Given data :

+format('v',6);

+d=2;//in mm

+d=d/1000;//in m

+sigma_water=0.073;//N/m

+sigma_mercury=0.510;//N/m

+//Water-glass contact

+w1=9.81;//kN/m^3(specific weight of water)

+w1=w1*10^3;//N/m^3

+theta=0;//in degree

+h=4*sigma_water*cosd(theta)/w1/d;//in mm

+disp(h*1000,"capillary rise for water glass contact in mm : ");

+//Mercury-glass contact

+w2=13.6*9.81;//kN/m^3(specific weight of mercury)

+w2=w2*10^3;//N/m^3

+theta=130;//in degree

+h=4*sigma_mercury*cosd(theta)/w2/d;//in mm

+disp(h*1000,"capillary rise for mercury glass contact in mm: ");

diff --git a/2132/CH2/EX2.7/Example2_7.sce b/2132/CH2/EX2.7/Example2_7.sce
new file mode 100755
index 000000000..ae74b6cb6
--- /dev/null
+++ b/2132/CH2/EX2.7/Example2_7.sce
@@ -0,0 +1,14 @@
+//Example 2.7

+clc;

+clear;

+close;

+

+//Given data :

+format('v',5);

+d=6;//in mm

+d=d/1000;//in m

+sigma=0.0755;//N/m

+//At equillibrium : p*%pi*r^2=sigma*2*%pi*r

+r=d/2;//in m

+p=2*sigma/r;//N/m^2

+disp(p,"Intensity of pressure in N/m^2 or Pascals : ");