let ( -- ) x y = remove y x