Evolver Code to Model Capillary Rise for Wetting Balance Experiment

The Wetting Balance

The object is to calculate the capillary rise for a wetting balance experiment, such as is used to assess the wettability of a solder alloy in contact with a substrate. These solutions can be used in conjuction with wetting experiments to judge whether a particular experiment is giving results that are consistent with equilibrium as determined by surface energy minimization. Various functions are included in the code to help such determination (see the functions "maxdip", "write_profile" given at the end of your code.)
This particular code models a wetting specimen of rectangular cross section, placed in the center of a square bath. It should be relatively straightforward to modify this code for other pertinent geometries
The model parameters are: the width and thickness of the wetting specimen; the size of the bath D; the surface tension, gamma_lv, of the liquid-vapor interface; the wetting angles of the solder on the two types of faces; and the density of the solder.

Width of the dipper blade (in meters):
Thickness of dipper blade (in meters):
Wetting angle (degrees) on width:
Wetting angle (degrees) on thickness:
Surface tension of vapor interface:
Density of the solder (kg/m^3):
Size of the bath (meters):