let
set_width x = width := x