summaryrefslogtreecommitdiff
path: root/3819/CH1/EX1.31/Ex1_31.sce
blob: 6c46b9692d06757bb6d83c00658a22c787972eb5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
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)