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