summaryrefslogtreecommitdiff
path: root/797/CH3/EX3.3.s/3_03_solution.sce
diff options
context:
space:
mode:
Diffstat (limited to '797/CH3/EX3.3.s/3_03_solution.sce')
-rw-r--r--797/CH3/EX3.3.s/3_03_solution.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/797/CH3/EX3.3.s/3_03_solution.sce b/797/CH3/EX3.3.s/3_03_solution.sce
new file mode 100644
index 000000000..9e76c0cdb
--- /dev/null
+++ b/797/CH3/EX3.3.s/3_03_solution.sce
@@ -0,0 +1,13 @@
+//Soultion 3-03
+WD=get_absolute_file_path('3_03_solution.sce');
+datafile=WD+filesep()+'3_03_example.sci';
+clc;
+exec(datafile)
+//(a)
+P_gauge1 = rho * g * h_bottle1; //Basic Pressure formula
+P_gauge1 = P_gauge1 / 1000; //conversion from [Pa] to [kPa]
+printf("Gauge pressure of blood is %1.2f kPa", P_gauge1);
+//(b)
+P_gauge2 = P_gauge2 * 1000;
+h_bottle2 = P_gauge2 / (rho * g);
+printf("\nHeight required for maintaining 20kPa pressure is %1.2f m", h_bottle2);