From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3758/CH1/EX1.1/Ex1_1.sce   | 10 ++++++++++
 3758/CH1/EX1.10/Ex1_10.sce | 12 ++++++++++++
 3758/CH1/EX1.13/Ex1_13.sce |  8 ++++++++
 3758/CH1/EX1.14/Ex1_14.sce |  8 ++++++++
 3758/CH1/EX1.15/Ex1_15.sce | 10 ++++++++++
 3758/CH1/EX1.16/Ex1_16.sce |  7 +++++++
 3758/CH1/EX1.17/Ex1_17.sce |  8 ++++++++
 3758/CH1/EX1.18/Ex1_18.sce | 17 +++++++++++++++++
 3758/CH1/EX1.19/Ex1_19.sce |  8 ++++++++
 3758/CH1/EX1.2/Ex1_2.sce   | 10 ++++++++++
 3758/CH1/EX1.20/Ex1_20.sce | 10 ++++++++++
 3758/CH1/EX1.21/Ex1_21.sce | 18 ++++++++++++++++++
 3758/CH1/EX1.4/Ex1_4.sce   |  6 ++++++
 3758/CH1/EX1.5/Ex1_5.sce   |  6 ++++++
 3758/CH1/EX1.6/Ex1_6.sce   |  8 ++++++++
 3758/CH1/EX1.7/Ex1_7.sce   | 12 ++++++++++++
 3758/CH1/EX1.8/Ex1_8.sce   | 10 ++++++++++
 3758/CH1/EX1.9/Ex1_9.sce   | 11 +++++++++++
 18 files changed, 179 insertions(+)
 create mode 100644 3758/CH1/EX1.1/Ex1_1.sce
 create mode 100644 3758/CH1/EX1.10/Ex1_10.sce
 create mode 100644 3758/CH1/EX1.13/Ex1_13.sce
 create mode 100644 3758/CH1/EX1.14/Ex1_14.sce
 create mode 100644 3758/CH1/EX1.15/Ex1_15.sce
 create mode 100644 3758/CH1/EX1.16/Ex1_16.sce
 create mode 100644 3758/CH1/EX1.17/Ex1_17.sce
 create mode 100644 3758/CH1/EX1.18/Ex1_18.sce
 create mode 100644 3758/CH1/EX1.19/Ex1_19.sce
 create mode 100644 3758/CH1/EX1.2/Ex1_2.sce
 create mode 100644 3758/CH1/EX1.20/Ex1_20.sce
 create mode 100644 3758/CH1/EX1.21/Ex1_21.sce
 create mode 100644 3758/CH1/EX1.4/Ex1_4.sce
 create mode 100644 3758/CH1/EX1.5/Ex1_5.sce
 create mode 100644 3758/CH1/EX1.6/Ex1_6.sce
 create mode 100644 3758/CH1/EX1.7/Ex1_7.sce
 create mode 100644 3758/CH1/EX1.8/Ex1_8.sce
 create mode 100644 3758/CH1/EX1.9/Ex1_9.sce

(limited to '3758/CH1')

diff --git a/3758/CH1/EX1.1/Ex1_1.sce b/3758/CH1/EX1.1/Ex1_1.sce
new file mode 100644
index 000000000..198c78b7f
--- /dev/null
+++ b/3758/CH1/EX1.1/Ex1_1.sce
@@ -0,0 +1,10 @@
+w=4000; //weight of certain oil in kg
+v=5; //volume of given oil in cubic metre
+g=9.81; //acceleration due to gravity in m/s^2
+r=1000; //specific weight of water in kg/cubic metre
+s=w/v; //calculating specific weight of oil in kg/cubic metre
+printf('specific weight of oil is %f kg/cubic metre\n',s);
+m=s/g //mass density of oil;
+printf('mass density of oil is %f kg/cubic metre\n',m);
+p=s/r // specific gravity of oil
+printf('specific gravity of oil is %f',p);
diff --git a/3758/CH1/EX1.10/Ex1_10.sce b/3758/CH1/EX1.10/Ex1_10.sce
new file mode 100644
index 000000000..9b94128ae
--- /dev/null
+++ b/3758/CH1/EX1.10/Ex1_10.sce
@@ -0,0 +1,12 @@
+clc;
+d1=0.3;//diameter of inner cylinder in meter
+d2=0.31; //diameter of outer cylinder in meter
+t=0.98; //torque in newton-meter
+w=2*3.14; //amgular veocity in radian/sec
+h=0.3; //height of both cylinder in meter
+v=((d1/2)*w); //calculating the tangential velocity in m/sec
+y=(d2-d1)/2; //calculating thickness of plate in meter
+s=t/((2*3.14*(d1/2)*h)*(d1/2)); //calculating shear resisitance in newton/m^2
+disp(s);
+u=(s*y)/v; //calculating viscosity of liquid
+printf('viscosity of liquid is %f newton-sec/m^2',u);
diff --git a/3758/CH1/EX1.13/Ex1_13.sce b/3758/CH1/EX1.13/Ex1_13.sce
new file mode 100644
index 000000000..9f2b6fdd4
--- /dev/null
+++ b/3758/CH1/EX1.13/Ex1_13.sce
@@ -0,0 +1,8 @@
+clc;
+p1=75; //intial pressure in kg/cm^2
+p2=140; //final pressure in kg/cm^2
+dp=(p2-p1); //calculating change in pressure
+dv=-0.147; //percentage  decrease in volume 
+v=100; //original volume in percentage
+k=dp/(dv/v); //calulating bulk modulus of elasticity
+printf('bulk modulus of elasticity of liquid is %f kg/cm^2',k);
diff --git a/3758/CH1/EX1.14/Ex1_14.sce b/3758/CH1/EX1.14/Ex1_14.sce
new file mode 100644
index 000000000..4633a5aeb
--- /dev/null
+++ b/3758/CH1/EX1.14/Ex1_14.sce
@@ -0,0 +1,8 @@
+v2=0.0112; //final volume in m^3
+v1=0.0113; //initial volume in m^3
+dv=v2-v1; // calculating change in volume
+p1=6.87*10^6; //initial pressure in N/m^2
+p2=13.73*10^6; //final pressure in N/m^2
+dp=p2-p1; //calculating change in pressure
+k=-dp/(dv/v1); //calculating bulk modulus of elasticity
+printf('bulk modulus of elasticity is %f N/m^2',k);
diff --git a/3758/CH1/EX1.15/Ex1_15.sce b/3758/CH1/EX1.15/Ex1_15.sce
new file mode 100644
index 000000000..6b6cadc9a
--- /dev/null
+++ b/3758/CH1/EX1.15/Ex1_15.sce
@@ -0,0 +1,10 @@
+clc;
+dp=840 ;// pressure in kg/cm^2
+w=1025; // specific weight of water in kg/m^3
+k=24*10^3; // bulk modulus of elasticity in kg/cm^2
+v=dp/k; //v =dv/v calculating change in volume
+s=1/w; // calculating specific volume of water at surface of ocean in m^3/kg
+dv=v/w; // calculating change in specific volume between surface and depth in m^3/kg
+v1=s-dv; // calculating specific volume at depth
+w1=1/v1; // calculating specific weight of water at depth
+printf('specific weight of water at depth is %f kg/m^3',w1);
diff --git a/3758/CH1/EX1.16/Ex1_16.sce b/3758/CH1/EX1.16/Ex1_16.sce
new file mode 100644
index 000000000..3d7429ffa
--- /dev/null
+++ b/3758/CH1/EX1.16/Ex1_16.sce
@@ -0,0 +1,7 @@
+clc;
+dp=0.0018*10^4; // difference in inside and outside surface of bubble in kg/mm^2
+T=0.0075*10^3; // surface tension of water in contact in kg/mm
+Temp=20; //temperature of air in degree
+r=(2*T)/dp // calculating radius of droplet of water
+d=2*r; // calculating diameter of droplet of water
+printf('diameter of droplet of water is %f mm',d);
diff --git a/3758/CH1/EX1.17/Ex1_17.sce b/3758/CH1/EX1.17/Ex1_17.sce
new file mode 100644
index 000000000..ba760736e
--- /dev/null
+++ b/3758/CH1/EX1.17/Ex1_17.sce
@@ -0,0 +1,8 @@
+clc;
+d=0.05*10^-1; // diameter of droplet of water in cm
+Pout=1.03; // pressure outside the droplet in kg/cm^2
+T=0.0075*10^-2; // surface tension in kg/cm
+r=d/2 // radius of droplet in cm
+Pin=(2*T)/r; //calcuating pressure inside droplet in kg/cm^2
+P=Pin+Pout; // pressure intensity within the droplet of water
+printf('pressure intensity within the droplet of water is %f kg/cm^2',P);
diff --git a/3758/CH1/EX1.18/Ex1_18.sce b/3758/CH1/EX1.18/Ex1_18.sce
new file mode 100644
index 000000000..d87620729
--- /dev/null
+++ b/3758/CH1/EX1.18/Ex1_18.sce
@@ -0,0 +1,17 @@
+clc;
+d=2; //diameter of glass tube in mm
+r=(d/2)*10^-1 // radius of glass tube in cm
+T=0.0075*10^-2; // surface tension of water in kg/cm
+T1=0.052*10^-2; // surface tension of mercury in kg/cm
+// calculating capillary rise for water
+w=1000*10^-6; // specific weight of water in kg/cm^3
+s=1; //specific gravity of water 
+theta=0; // angle of contact between liquid and tube
+h=(2*T*cos(theta))/(s*w*r); // calculating height of capillary rise
+printf('height of capillary rise in water is %f cm\n',h);
+// calculating capillary rise for mercury
+s=13.6; //specific gravity of mercury
+theta=130; // angle of contact between mercury and tube
+h=(2*T1*cos(theta*(3.14/180)))/(s*w*r); // calculating height of capillary rise
+printf('height of capillary rise in mercury is %f cm/n ',h);
+disp('negative sign indicates decrease in height of mercury');
diff --git a/3758/CH1/EX1.19/Ex1_19.sce b/3758/CH1/EX1.19/Ex1_19.sce
new file mode 100644
index 000000000..376606640
--- /dev/null
+++ b/3758/CH1/EX1.19/Ex1_19.sce
@@ -0,0 +1,8 @@
+clc;
+h=0.25; //height of capillary rise in cm
+t=0.0075*10^-2; //surface tension in kg/cm
+s=1; //specific gravity of water
+w=1000*10^-6; //soecific weight of water in kg/cm^3
+r=(2*t)/(s*w*h); //calculating radius of glass tube
+d=2*r; //diameter of glass tube
+printf('diameter of glass tube is %f cm',d);
diff --git a/3758/CH1/EX1.2/Ex1_2.sce b/3758/CH1/EX1.2/Ex1_2.sce
new file mode 100644
index 000000000..5d4ba74c3
--- /dev/null
+++ b/3758/CH1/EX1.2/Ex1_2.sce
@@ -0,0 +1,10 @@
+v=5; //volume of oil in cubic meter
+w=40; //weight of oil in kilo newton
+g=9.81; //acceleration due to gravity in meter per second square
+h=9810; //specific weight of water in newton per cubic meter
+s=(w*1000)/v; //specific weight of oil in newton per cubic meter
+printf('specific weight of oil is %f N/m^3\n',s);
+m=s/g; //mass density of oil in kilogram per cubic meter
+printf('mass density of oil is %f Kg/m^3\n',m);
+f=s/h; //specific gravity of oil
+printf('specific gravity of oil is %f ',f);
diff --git a/3758/CH1/EX1.20/Ex1_20.sce b/3758/CH1/EX1.20/Ex1_20.sce
new file mode 100644
index 000000000..9296d6ee4
--- /dev/null
+++ b/3758/CH1/EX1.20/Ex1_20.sce
@@ -0,0 +1,10 @@
+clc;
+s=0.85; //specific gravity of oil
+d=1.5*10^-3; //diameter of glass tube in meter
+r=d/2; //calculating radius of glass tube in meter
+h=1.25*10^-2; //height of capillary in meter
+p=15; //bubble pressure in kg/m^2
+w=1000; //specific weight of water in kg/m^3
+p1=p-(s*w*h); //effective pressure attributable to surface tensions
+t=(p1*r)/2; //calculating unit surface energy or surface tension in kg/m
+printf('unit surface energy is %f kg/m',t);
diff --git a/3758/CH1/EX1.21/Ex1_21.sce b/3758/CH1/EX1.21/Ex1_21.sce
new file mode 100644
index 000000000..59bf2fb42
--- /dev/null
+++ b/3758/CH1/EX1.21/Ex1_21.sce
@@ -0,0 +1,18 @@
+clc;
+d=3*10^-3; //diameter of glass tube in meter
+r=d/2; //calculating radius of glass tube in meter
+//capillary rise for water
+theta=0; //angle of contact between liquid and galss tube in degree
+t=0.0736; //surface tension of water in N/m
+w=9810; //specific weight of water in N/m^3
+s=1; //specific gravity of water
+h=(2*t*cos(theta*(3.14/180))*10^3)/(s*w*r); //calculating capillary rise
+printf('capillary rise for water is %f milimeter\n',h);
+//capillary rise for mercury
+theta=130;//angle of contact between liquid and galss tube in degree
+t=0.51; //surface tension of water in N/m
+w=9810; //specific weight of water in N/m^3
+s=13.6; //specific gravity of mercury
+h=(2*t*cos(theta*3.14/180)*10^3)/(s*w*r); //calculating capillary rise
+printf('capillary rise for mercury is %f milimeter\n',h);
+printf('negative sign indicate capillary depression');
diff --git a/3758/CH1/EX1.4/Ex1_4.sce b/3758/CH1/EX1.4/Ex1_4.sce
new file mode 100644
index 000000000..169220e40
--- /dev/null
+++ b/3758/CH1/EX1.4/Ex1_4.sce
@@ -0,0 +1,6 @@
+f=0.2; // shear stress in kg/m^2
+v=0.61; // velocity in m/sec
+y=0.0000254; // distance between two plate in m
+u=(f*y)/v; //calculating dynamic viscosity 
+printf('Dymanic viscosity of fluid between plates is %f kg sec/m^2',u);  
+
diff --git a/3758/CH1/EX1.5/Ex1_5.sce b/3758/CH1/EX1.5/Ex1_5.sce
new file mode 100644
index 000000000..5cb7c9779
--- /dev/null
+++ b/3758/CH1/EX1.5/Ex1_5.sce
@@ -0,0 +1,6 @@
+t=0.216; // shear stress in N/m^2
+v=0.216; // velocity gradient in sec^-1
+m=959.42; // mass density of castor oil in kg/m^3
+u=t/v; //determining dynamic viscosity of castor oil in N sec/m^2
+k=u/m; // calculating kinematic viscosity
+printf('kinematic viscosity of castor oil is %f m^2/sec',k); 
diff --git a/3758/CH1/EX1.6/Ex1_6.sce b/3758/CH1/EX1.6/Ex1_6.sce
new file mode 100644
index 000000000..bba6962c6
--- /dev/null
+++ b/3758/CH1/EX1.6/Ex1_6.sce
@@ -0,0 +1,8 @@
+clc;
+u=4.9*10^-4; //dynamic viscosity in kg sec/m^2
+k=3.49*10^-2; //kinematic viscosity in stokes 
+k=3.49*10^-6; //converting kinematic viscosity in stokes to m^2/sec
+w=102; // mass density of water in kg/m^3
+m=u/k; //calculating mass density in kg/m^3
+s=m/w; // calculating specific gravity of liquid
+printf(' specific gravity of liquid is %f',s);
diff --git a/3758/CH1/EX1.7/Ex1_7.sce b/3758/CH1/EX1.7/Ex1_7.sce
new file mode 100644
index 000000000..2bfd420ce
--- /dev/null
+++ b/3758/CH1/EX1.7/Ex1_7.sce
@@ -0,0 +1,12 @@
+clc;
+s=2; //specific gravity of liquid
+m=102; // mass density of water in msl/m^3
+m1=1000; // mass density of water in kg/m^3
+w=2*m; // mass density of liquid in msl/m^3
+w1=2*m1; // mass density of liquid in kg/m^3
+k=5.58; // kinematic viscosity in stokes
+k1=5.58*10^-4; //kinematic viscosity in m^2/sec
+u=k1*w; // dynamic viscosity of liquid 
+printf('dynamic viscosity in matric gravitational unit is %f kg sec/m^2\n',u);
+u=k1*w1; // dynamic viscosity of liquid
+printf('dynamic viscosity in S.I unit is %f N sec/m^2',u')
diff --git a/3758/CH1/EX1.8/Ex1_8.sce b/3758/CH1/EX1.8/Ex1_8.sce
new file mode 100644
index 000000000..ac514bcc7
--- /dev/null
+++ b/3758/CH1/EX1.8/Ex1_8.sce
@@ -0,0 +1,10 @@
+clc;
+l=25; //length of plate in centimeter
+b=5; //bredth of plate in centimeter
+a=(l*b)*10^-4; //calculating area of plate in m^2
+v=2; //velocity with which plate slides in meter/sec
+theta=30; //angle of plate with surface in degree
+y=0.002 //gap between plate and inclined surface
+r=l*sin(theta*(3.14/180));//viscous resistance in kg
+u=(r*y)/(v*a); //calculating viscosity of oil
+printf('viscosity of oil is %f kg-sec/m^2',u);
diff --git a/3758/CH1/EX1.9/Ex1_9.sce b/3758/CH1/EX1.9/Ex1_9.sce
new file mode 100644
index 000000000..e8ff2ac4f
--- /dev/null
+++ b/3758/CH1/EX1.9/Ex1_9.sce
@@ -0,0 +1,11 @@
+clc;
+l=20; //length of edge of cubical block in centimeter
+theta=20; //inclination of plane with horizontal in degree
+w=20; //weight of cubical block in kg
+y=0.025*10^-3; //thickness of film im meter
+u=0.22*10^-3; //viscosity of oil in kg-sec/m^2
+f=w*sin(theta*(3.14/180)); //calculating force causing downward motion of block 
+a=(l^2)*10^-4; //calculating area of one face of cube
+t=f/a; //calculating shear resistance
+v=(t*y)/u; //calculating terminal velocity
+printf('terminal velocity is %f meter/se',v);
-- 
cgit