let ( // ) x f = filter x ~f