let win_valid (wr: win_ref) (b: b)
  : bool =
    List.mem_assoc wr b.browser_windows