let
ymin = (ref (-5.) : float
Pervasives
.ref)