summaryrefslogtreecommitdiff
path: root/24/CH15
diff options
context:
space:
mode:
Diffstat (limited to '24/CH15')
-rwxr-xr-x24/CH15/EX15.1/Example15_1.sce19
-rwxr-xr-x24/CH15/EX15.1/Example15_1_result.txt5
-rwxr-xr-x24/CH15/EX15.2/Example15_2.sce11
-rwxr-xr-x24/CH15/EX15.2/Example15_2_result.txt2
-rwxr-xr-x24/CH15/EX15.3/Example15_3.sce10
-rwxr-xr-x24/CH15/EX15.3/Example15_3_result.txt2
-rwxr-xr-x24/CH15/EX15.4/Example15_4.sce11
-rwxr-xr-x24/CH15/EX15.4/Example15_4_result.txt2
-rwxr-xr-x24/CH15/EX15.5/Example15_5.sce12
-rwxr-xr-x24/CH15/EX15.5/Example15_5_result.txt2
-rwxr-xr-x24/CH15/EX15.6/Example15_6.sce10
-rwxr-xr-x24/CH15/EX15.6/Example15_6_result.txt2
-rwxr-xr-x24/CH15/EX15.7/Example15_7.sce16
-rwxr-xr-x24/CH15/EX15.7/Example15_7_result.txt2
-rwxr-xr-x24/CH15/EX15.8/Example15_8.sce16
-rwxr-xr-x24/CH15/EX15.8/Example15_8_result.txt2
16 files changed, 124 insertions, 0 deletions
diff --git a/24/CH15/EX15.1/Example15_1.sce b/24/CH15/EX15.1/Example15_1.sce
new file mode 100755
index 000000000..8549a7e2d
--- /dev/null
+++ b/24/CH15/EX15.1/Example15_1.sce
@@ -0,0 +1,19 @@
+//Given that
+l = 3.5 //in meter
+b = 4.2 //in meter
+h = 2.4 //in meter
+g = 9.8 //in m/s^2
+
+//Sample Problem 15-1a
+printf("**Sample Problem 15-1a**\n")
+P = 1.0*1.01*10^5 //in N/m^2
+density_air = 1.21 //in kg/m^3 at 1atm pressure
+V = l*b*h //Volume of the air
+W = density_air*V*g //Weight of the air
+printf("The weight of the air in the room is equal to %fkg\n", W)
+
+//Sample Problem 15-1b
+printf("\n**Sample Problem 15-1b**\n")
+A = l*b
+F = P*A
+printf("The magnitude of atmosphere force on the floor of the room is %eN\n", F) \ No newline at end of file
diff --git a/24/CH15/EX15.1/Example15_1_result.txt b/24/CH15/EX15.1/Example15_1_result.txt
new file mode 100755
index 000000000..a3abf798a
--- /dev/null
+++ b/24/CH15/EX15.1/Example15_1_result.txt
@@ -0,0 +1,5 @@
+**Sample Problem 15-1a**
+The weight of the air in the room is equal to 418.350240kg
+
+**Sample Problem 15-1b**
+The magnitude of atmosphere force on the floor of the \ No newline at end of file
diff --git a/24/CH15/EX15.2/Example15_2.sce b/24/CH15/EX15.2/Example15_2.sce
new file mode 100755
index 000000000..afa11509d
--- /dev/null
+++ b/24/CH15/EX15.2/Example15_2.sce
@@ -0,0 +1,11 @@
+//Given that
+deltaP = 9.3*10^3 //in N/m^2
+density_water = 998 //in kg/m^3
+g = 9.8 //in m/s^2
+
+//Sample Problem 15-2
+printf("**Sample Problem 15-2**\n")
+//deltaP = density_water*g*L
+//therefore
+L = deltaP/(density_water*g)
+printf("The diver started at a depth of %fm", L) \ No newline at end of file
diff --git a/24/CH15/EX15.2/Example15_2_result.txt b/24/CH15/EX15.2/Example15_2_result.txt
new file mode 100755
index 000000000..899a74737
--- /dev/null
+++ b/24/CH15/EX15.2/Example15_2_result.txt
@@ -0,0 +1,2 @@
+*Sample Problem 15-2**
+The diver started at a depth of 0.950881m \ No newline at end of file
diff --git a/24/CH15/EX15.3/Example15_3.sce b/24/CH15/EX15.3/Example15_3.sce
new file mode 100755
index 000000000..d133f9fbd
--- /dev/null
+++ b/24/CH15/EX15.3/Example15_3.sce
@@ -0,0 +1,10 @@
+//Given that
+density_water = 998 //in kg/m^3
+l = 135*10^-3 //in meter
+d = 12.3*10^-3 //in meter
+g = 9.8 //in m/s^2
+
+//Sample Problem 15-3
+printf("**Sample Problem 15-3**\n")
+d_oil = density_water*g*l/(g*(l+d)) //pressure at same height should be same
+printf("The density of the oil is %fkg/m^3", d_oil) \ No newline at end of file
diff --git a/24/CH15/EX15.3/Example15_3_result.txt b/24/CH15/EX15.3/Example15_3_result.txt
new file mode 100755
index 000000000..11a085145
--- /dev/null
+++ b/24/CH15/EX15.3/Example15_3_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 15-3**
+The density of the oil is 914.663951kg/m^3 \ No newline at end of file
diff --git a/24/CH15/EX15.4/Example15_4.sce b/24/CH15/EX15.4/Example15_4.sce
new file mode 100755
index 000000000..96a187999
--- /dev/null
+++ b/24/CH15/EX15.4/Example15_4.sce
@@ -0,0 +1,11 @@
+//Given that
+density_ice = 917 //in kg/m^3
+density_seawater = 1024 //in kg/m^3
+
+//Sample Problem 15-4
+printf("**Sample Problem 15-4**\n")
+//Using archimedies principle
+//density_seawater*Vs*g = density_ice*Vt*g
+//fractoin of non-visible part 'f' is
+f = density_ice/density_seawater //Vs/Vt
+printf("The fraction of the visible part is equal to %f", (1-f)) \ No newline at end of file
diff --git a/24/CH15/EX15.4/Example15_4_result.txt b/24/CH15/EX15.4/Example15_4_result.txt
new file mode 100755
index 000000000..e306c15cb
--- /dev/null
+++ b/24/CH15/EX15.4/Example15_4_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 15-4**
+The fraction of the visible part is equal to 0.104492 \ No newline at end of file
diff --git a/24/CH15/EX15.5/Example15_5.sce b/24/CH15/EX15.5/Example15_5.sce
new file mode 100755
index 000000000..dc1eacb3e
--- /dev/null
+++ b/24/CH15/EX15.5/Example15_5.sce
@@ -0,0 +1,12 @@
+//Given that
+R = 12.0 //in meter
+m = 196 //in kg
+density_He = 0.160 //in kg/m^3
+density_air = 1.25 //in kg/m^3
+g = 9.8 //in m/s^2
+
+//Sample Problem 15-5
+printf("**Sample Problem 15-5**\n")
+Vb = 4/3*%pi*R^3
+PayLoad = (density_air*Vb*g - (density_He*Vb*g + m*g))/g
+printf("The maximum mass attached can be %fkg", PayLoad) \ No newline at end of file
diff --git a/24/CH15/EX15.5/Example15_5_result.txt b/24/CH15/EX15.5/Example15_5_result.txt
new file mode 100755
index 000000000..2236b75c1
--- /dev/null
+++ b/24/CH15/EX15.5/Example15_5_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 15-5**
+The maximum mass attached can be 7693.670127kg \ No newline at end of file
diff --git a/24/CH15/EX15.6/Example15_6.sce b/24/CH15/EX15.6/Example15_6.sce
new file mode 100755
index 000000000..0cae039ea
--- /dev/null
+++ b/24/CH15/EX15.6/Example15_6.sce
@@ -0,0 +1,10 @@
+//Given that
+Ao = 3*10^-4 //in m^2
+Vo = 30*10^-2 //in m/s
+A = 3*10^-7*10^-4 //in m^2
+V = 0.05*10^-2 //in m/s
+
+//Sample Problem 15-6
+printf("**Sample Problem 15-6**\n")
+n = (Ao*Vo)/(A*V)
+printf("Number of capillaries a person should have %e", n) \ No newline at end of file
diff --git a/24/CH15/EX15.6/Example15_6_result.txt b/24/CH15/EX15.6/Example15_6_result.txt
new file mode 100755
index 000000000..658639afa
--- /dev/null
+++ b/24/CH15/EX15.6/Example15_6_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 15-6**
+Number of capillaries a person should have 6.000000e+009 \ No newline at end of file
diff --git a/24/CH15/EX15.7/Example15_7.sce b/24/CH15/EX15.7/Example15_7.sce
new file mode 100755
index 000000000..718263188
--- /dev/null
+++ b/24/CH15/EX15.7/Example15_7.sce
@@ -0,0 +1,16 @@
+exec('Bernauli.sci', -1)
+
+//Given that
+Ao = 1.2*10^-4 //in m^2
+A = 0.35*10^-4 //in m^2
+h = 45*10^-3 //in m
+density_water = 998 //in kg/m^3
+
+//Sample Problem 15-7
+printf("**Sample Problem 15-7\n")
+A = [A, Ao]
+deltaP = 0 //in N/m^2
+density = density_water
+V = fsolve([0,0], Bernauli)
+FlowRate = A(1)*V(1)
+printf("The volume flow rate from the tap is equal to %fcm^3/s", FlowRate*10^6) \ No newline at end of file
diff --git a/24/CH15/EX15.7/Example15_7_result.txt b/24/CH15/EX15.7/Example15_7_result.txt
new file mode 100755
index 000000000..a455e8022
--- /dev/null
+++ b/24/CH15/EX15.7/Example15_7_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 15-7
+The volume flow rate from the tap is equal to 34.364361cm^3/s \ No newline at end of file
diff --git a/24/CH15/EX15.8/Example15_8.sce b/24/CH15/EX15.8/Example15_8.sce
new file mode 100755
index 000000000..92a6b3520
--- /dev/null
+++ b/24/CH15/EX15.8/Example15_8.sce
@@ -0,0 +1,16 @@
+exec('Bernauli.sci', -1)
+
+//Given that
+density_Ethanol = 791 //in kg/m^3
+A1 = 1.20*10^-3 //in m^2
+A2 = A1/2
+//Pressure in narrower section is lesser
+deltaP = -4120 //in N/m^2
+
+//Sample Problem 15-8
+printf("**Sample Problem 15-8**\n")
+A = [A1, A2]
+density = density_Ethanol
+h = 0
+V = fsolve([0, 1], Bernauli)
+printf("The volume flow rate is %e m^3/s", abs(A1*V(1))) \ No newline at end of file
diff --git a/24/CH15/EX15.8/Example15_8_result.txt b/24/CH15/EX15.8/Example15_8_result.txt
new file mode 100755
index 000000000..6cb047269
--- /dev/null
+++ b/24/CH15/EX15.8/Example15_8_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 15-8**
+The volume flow rate is 2.236125e-003 m^3/s \ No newline at end of file