Cohesive forces in water​
Housam Binous and Ahmed Bellagi

​
What is the work transferred to a large drop of water (of diameter 10 mm) in order to split it into six identical smaller drops?
​
Given : water surface tension is equal to 73 ergs/cm2
​
In[]:=
Vld=PiDld^3/6(*volumeoflargedrop*)
Out[]=
3
Dld
π
6
In[]:=
Dld=1.(*diameteroflargedropincm---CGSsystem*)
Out[]=
1.
In[]:=
Vld
Out[]=
0.523599
In[]:=
Sld=PiDld^2(*surfaceoflargedropincm2*)
Out[]=
3.14159
In[]:=
Vsd=Vld/6(*volumeofeachsmalldropis1/6thofvolumeoflargedrop*)
Out[]=
0.0872665
In[]:=
Dsd=First[x/.NSolve[Vsd==Pix^3/6,x,Reals]](*diameterofsmalldropincm---CGSsystem*)
Out[]=
0.550321
In[]:=
Ssd=PiDsd^2(*surfaceofsmalldropincm2*)
Out[]=
0.951442
In[]:=
σ
L
=73;(*watersurfacetensioninergs/cm2orequivalentlyindynes/cm*)
In[]:=
ΔS=6Ssd-Sld(*surfaceincrease*)
Out[]=
2.56706
In[]:=
(*worktranferredtothesysteminergs---workispositivebecausetosplitthelargedropintosixdropletsonehastoovercomecohesiveforcespresentintheliquid*)​​ΔW=
σ
L
ΔS
Out[]=
187.395