method set_y      (y : int) : unit =
    self#set_style_property "top" (string_of_px y)