diff options
Diffstat (limited to '3819/CH1/EX1.31/Ex1_31.sce')
| -rw-r--r-- | 3819/CH1/EX1.31/Ex1_31.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3819/CH1/EX1.31/Ex1_31.sce b/3819/CH1/EX1.31/Ex1_31.sce new file mode 100644 index 000000000..6c46b9692 --- /dev/null +++ b/3819/CH1/EX1.31/Ex1_31.sce @@ -0,0 +1,15 @@ +// A Textbook of Fluid Mecahnics and Hydraulic Machines - By R K Bansal
+// Chapter 1-Properties of Fluid
+// Problem 1.31
+
+//Given Data Set in the Problem
+h=2*10^-3
+st=0.073575
+theta=0
+dens=1000
+g=9.81
+
+//Calculations
+//Using rise=4*surface tension/(density *g *diameter of capillary)
+d=4*st/(dens*g*h)
+mprintf("The diameter of the capillary is %f cm",d*100)
|