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

---
 3720/CH2/EX2.1/Ex2_1.sce | 19 +++++++++++++++++++
 3720/CH2/EX2.2/Ex2_2.sce |  7 +++++++
 3720/CH2/EX2.3/Ex2_3.sce | 25 +++++++++++++++++++++++++
 3720/CH2/EX2.4/Ex2_4.sce | 12 ++++++++++++
 3720/CH2/EX2.5/Ex2_5.sce | 14 ++++++++++++++
 5 files changed, 77 insertions(+)
 create mode 100644 3720/CH2/EX2.1/Ex2_1.sce
 create mode 100644 3720/CH2/EX2.2/Ex2_2.sce
 create mode 100644 3720/CH2/EX2.3/Ex2_3.sce
 create mode 100644 3720/CH2/EX2.4/Ex2_4.sce
 create mode 100644 3720/CH2/EX2.5/Ex2_5.sce

(limited to '3720/CH2')

diff --git a/3720/CH2/EX2.1/Ex2_1.sce b/3720/CH2/EX2.1/Ex2_1.sce
new file mode 100644
index 000000000..f4ad6ca54
--- /dev/null
+++ b/3720/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,19 @@
+// Example 2_1
+clc;clear;funcprot(0);
+// Given values
+p=100; // The pressure of air in kPa
+T=25+273; // The temperature of air in K
+R=0.287; // The gas constant of air in (kPa.m^3)/(kg.K)
+
+//Calculation
+
+rho=p/(R*T); // From ideal gas relation
+printf('The density of air,rho =%0.2f kg/m^3\n',rho);
+
+rho_1=1000; // Density of water in kg/m^3
+SG=rho /rho_1; // The specific gravity of air
+printf('The specific gravity of air,SG =%0.5f \n',SG);
+
+V=4*5*6; // The volume of air in m^3
+m=rho*V; // The mass of air in the room in kg
+printf('The mass of air,m =%0.0f kg\n',m);
diff --git a/3720/CH2/EX2.2/Ex2_2.sce b/3720/CH2/EX2.2/Ex2_2.sce
new file mode 100644
index 000000000..6d68de72e
--- /dev/null
+++ b/3720/CH2/EX2.2/Ex2_2.sce
@@ -0,0 +1,7 @@
+// Example 2_2
+clc;clear;funcprot(0);
+//Properties
+P_sat=4.25;//The vapor pressure of water at 30°C in KPa
+//Analysis
+P_min=P_sat;
+printf('The minimum pressure allowed in the system to avoid cavitation P_min=%0.2f kPa\n',P_min);
diff --git a/3720/CH2/EX2.3/Ex2_3.sce b/3720/CH2/EX2.3/Ex2_3.sce
new file mode 100644
index 000000000..cfea0bd1f
--- /dev/null
+++ b/3720/CH2/EX2.3/Ex2_3.sce
@@ -0,0 +1,25 @@
+// Example 2_3
+clc;clear;funcprot(0);
+//Given values
+T_1=20;// degree celsius
+T_2=50;//degree celsius
+P_1=1;// atm
+P_2=100;//atm
+rho_1=998.0;// The density of water in kg/m^3
+
+//Properties
+//The coefficient of volume expansion at the average temperature T_avg=35°C
+beta=0.337*10^-3;// k^-1
+alpha=4.80*10^-5;//The isothermal compressibility of water in atm^-1
+
+// Calculation
+//(a)
+gradT=(T_2-T_1);// K
+gradrho=-(beta*rho_1*gradT);// The change in density in kg/m^3
+rho_2=rho_1+gradrho;// The density of water at 50°C and 1 atm in kg/m^3
+printf('The density of water at 50°C and 1 atm is rho_2 =%0.0f kg/m^3\n',rho_2);
+//(b)
+gradP=(P_2-P_1);
+gradrho=alpha*rho_1*gradP;// kg/m^3
+rho_2=rho_1+gradrho;//The density of water at 100 atm and 20°C in kg/m^3
+printf('The density of water at 100 atm and 20°C is rho_2 =%0.1f kg/m^3\n',rho_2);
diff --git a/3720/CH2/EX2.4/Ex2_4.sce b/3720/CH2/EX2.4/Ex2_4.sce
new file mode 100644
index 000000000..74e2c7565
--- /dev/null
+++ b/3720/CH2/EX2.4/Ex2_4.sce
@@ -0,0 +1,12 @@
+// Example 2_4
+clc;clear;funcprot(0);
+// Given values
+l=0.0015; // Gap between two cylinders in m
+T=1.8; // Torque in N.m
+L=.4; //  Length  in m
+R=.06; // Outer radius of inner cylinder in m
+n=300/60; // Number of revolutions per unit time (seconds)
+
+//Calculation
+mu=(T*l/(4*%pi^2*R^3*n*L)); // Viscosity of the fluid in N.s/m^2
+printf('The viscosity of the fluid,mu =%0.3f N.s/m^2\n',mu);
diff --git a/3720/CH2/EX2.5/Ex2_5.sce b/3720/CH2/EX2.5/Ex2_5.sce
new file mode 100644
index 000000000..3a1d407a6
--- /dev/null
+++ b/3720/CH2/EX2.5/Ex2_5.sce
@@ -0,0 +1,14 @@
+// Example 2_5
+clc;clear;funcprot(0);
+// Given values
+T=20;// degree celsius
+sigma_s=0.073; // the surface tension of water in N/m
+phi=0; // the contact angle of water with glass in degree
+rho=1000;// kg/m^3
+g=9.81;// m/s^2
+R=0.3*10^-3; // Radius of glass tube in m
+
+//Calculation
+h=((2*sigma_s)/(rho*g*R))*cos(phi);// the capillary rise of water in m
+h=h*100;// m to cm
+printf('The capillary rise of water in a tube h=%0.1f cm\n',h);
-- 
cgit