let
is_in_gb pos =
is_in_rect pos gb_x0 gb_y0 gb_width gb_height