let ymax = (ref (105.) : float Pervasives.ref)