A Surface Evolver script was written to move the fiber to its equilibrium
position where solder capillary and fiber elastic forces balance. Run once
every 30 Evolver iterations, this script was a Newton's method root finder
which set equal the forces given by derivatives of equation 1 and
the appendix. The derivative of capillary force with respect to
and
was calculated by a central difference method.