r function

Equation of capillary